adam@2012: fun main () = adam@2012: b <- source True; adam@2012: let adam@2012: fun textboxList xs = adam@2012: adam@2012: {List.mapX (fn src => adam@2012: ) xs} adam@2012:
adam@2012: adam@2012:
adam@2012:
adam@2012: in adam@2012: s <- source "foo"; adam@2012: return adam@2012: adam@2012: {textboxList (s :: s :: [])} adam@2012: adam@2012: end