gitweb on Svarog

projekti pod git sistemom za održavanje verzija -- projects under the git version control system
move samples to 'alpha-mj' subfolder
[mjc2wsl.git] / samples / fields.mj
diff --git a/samples/fields.mj b/samples/fields.mj
deleted file mode 100644 (file)
index f29fb26..0000000
+++ /dev/null
@@ -1,44 +0,0 @@
-program F
-       class HolderClass {
-               int simple;
-               int[] arry;
-       }
-       
-       HolderClass holder;
-       
-{
-       void main()
-               int i, size;
-       {
-               holder = new HolderClass;
-               holder.simple = 5;
-               
-               print(holder.simple,10);
-               
-               print(chr(10));
-               
-               size = 5;
-               holder.arry = new int[size];
-               holder.arry[0] = size+1;
-               i = 1;
-               while (i < size){
-                       holder.arry[i] = holder.arry[i-1]-1;
-                       i++;
-               }
-               
-               i = 0;
-               while (i < size){
-                       print(holder.arry[i],3);
-                       i++;
-               }
-               print(chr(10));
-               
-               i = 0;
-               while (i < size){
-                       holder.arry[i]--;
-                       print(holder.arry[i],3);
-                       i++;
-               }
-               
-       }
-}
\ No newline at end of file
Svarog.pmf.uns.ac.rs/gitweb maintanance Doni Pracner