vyvojova verze 0.7alfa (dema ted nejsou funkci)

[svn/Cll1h/.git] / demo.c

diff --git a/demo.c b/demo.c
new file mode 100644 (file)
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");
+  }
+  }
+ }
+ }
+*/
+}