X-Git-Url: http://svarog.pmf.uns.ac.rs/gitweb/?p=mjc2wsl.git;a=blobdiff_plain;f=samples%2Fpos-neg.mj;fp=samples%2Fpos-neg.mj;h=0000000000000000000000000000000000000000;hp=79fd45477cdf06766f76b6f4ec2a60ec3b803f09;hb=77e39fac55f1a366814d35e75659cb6d88cca4e1;hpb=306587b78e421a7221952e44adde831723748e4c

diff --git a/samples/pos-neg.mj b/samples/pos-neg.mj
deleted file mode 100644
index 79fd454..0000000
--- a/samples/pos-neg.mj
+++ /dev/null
@@ -1,42 +0,0 @@
-program P
-	final int size = 10;
-	class Table {
-		int[] pos;
-		int[] neg;
-	}
-	Table val;
-{
-	void main()
-		int x, i;
-	{ //---------- Initialize val
-		val = new Table;
-		val.pos = new int[size]; 
-		val.neg = new int[size];
-		i = 0;
-		while (i < size) {
-			val.pos[i] = 0; 
-			val.neg[i] = 0;
-			i++;
-		}
-	//---------- Read values
-		read(x);
-		while (x != 0) {
-			if (0 <= x && x < size) {
-				val.pos[x]++;
-			} else if (-size < x && x < 0) {
-				val.neg[-x]++;
-			}
-			read(x);
-		}
-	
-	// output everything
-		i = 0;
-		while (i < size) {
-			print(i,3);
-			print(val.pos[i],5);
-			print(val.neg[i],5);
-			print(chr(10));
-			i++;
-		}
-	}
-}