X-Git-Url: https://git.harvie.cz/?a=blobdiff_plain;f=demo.c;fp=demo.c;h=bbb8e0dc018f9f79ad69438369352787859d80d9;hb=4a48705a32280d90f6f1005003e3d1f4abeb9de0;hp=0000000000000000000000000000000000000000;hpb=30628092e1e87a9273d018bb5547f7dba0afd430;p=svn%2FCll1h%2F.git

diff --git a/demo.c b/demo.c
new file mode 100644
index 0000000..bbb8e0d
--- /dev/null
+++ b/demo.c
@@ -0,0 +1,28 @@
+#include "cll1.h"
+
+program2
+{
+ repeat(2)
+ {
+  printf("Tohle cele delam 2x:\n");
+  repeat(3) printf("Tohle delam 3x...\n");
+ }
+/*
+ for(create(_Iatom,_IStack),_Iatom->_23=1,push(_Iatom,_Istack);_Iatom->_23||pop(_Iatom,_Istack)&&0;_Iatom->_23--)
+ {
+  printf("_Iatom->_23=[%d] _Iatom->I=[%d]\n",_Iatom->_23,_Iatom->I);
+ for range(_Iatom->I,1,2)
+ {
+  printf("Tohle cele delam 2x:\n");
+  for(create(_Iatom,_IStack),_Iatom->_23=1,push(_Iatom,_Istack);_Iatom->_23||pop(_Iatom,_Istack)&&0;_Iatom->_23--)
+  {
+   printf("_Iatom->_23=[%d] _Iatom->I=[%d]\n",_Iatom->_23,_Iatom->I);
+  for range(_Iatom->I,1,3)
+  {
+   printf("Tohle delam 3x...\n");
+  }
+  }
+ }
+ }
+*/
+}