#95: added 10-program.txt

test/10-program.txt

@@ -0,0 +1,29 @@
+## PROGRAM
+
+# program entry
+<< 1 >> dup eval
+-> stack should be << 1 >>, 1
+erase
+
+# program imbrication
+<< 1 << 2 >> >>
+-> stack should be << 1 << 2 >> >>
+erase
+
+# program evaluation
+<< 1 << 2 >> >> dup eval
+-> stack should be << 1 << 2 >> >>, 1, << 2 >>
+erase
+
+# program 1 arg
+default
+10
+<< -> n << 0 1 n for i i 2 * inv + next >> >>
+eval
+-> stack should be 1.4644841269841269841
+erase
+
+# program several args
+0 1 10 << -> u0 u1 n << u0 u1 1 n start dup2 + rot drop next swap drop >> >> eval
+eval
+-> stack should be 89