Mercurial > repos > rhope
view teststring.rhope @ 139:a68e6828d896
Global stores and transactions are working. Definately leaks memory on retries. Probably a fair number of bugs to work out. However, a basic test program works.
author | Mike Pavone <pavone@retrodev.com> |
---|---|
date | Fri, 19 Nov 2010 04:04:14 -0500 |
parents | 4d5ea487f810 |
children |
line wrap: on
line source
Main[] { barbaz <- [right]Append["baz"] ,right <- ["foobar"]Slice[3] { Print[~] { Print[right] { Print[barbaz] { bar,baz <- [barbaz]Slice[3] { Print[bar] { Print[baz] { If[[bar]=[ [["b"]Append["a"]]Append["r"] ]] { Print["Comparison OK"] { ,delim,after <-["foshizzlemynizzle"]Partition["my"] { Print[~] { Print[delim] { Print[after] }}} } }{ Print["Comparison failed"] } }}} }}}} }