HCoop / hcoop / debian / mlton.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
Import Upstream version 20180207
[hcoop/debian/mlton.git] / regression / lex.sml
1
2 fun token0(tokFn) = tokFn
3
4 and token1(tokFn, value) = tokFn(value)
5
6 val a = token1(fn _ => "1", 2)
mlton packaging