1 files changed, 53 insertions, 0 deletions
diff --git a/projects/12/MemoryTest/Main.jack b/projects/12/MemoryTest/Main.jack
new file mode 100644
index 0000000..a9817f4
--- /dev/null
+++ b/projects/12/MemoryTest/Main.jack
@@ -0,0 +1,53 @@
+// This file is part of www.nand2tetris.org
+// and the book "The Elements of Computing Systems"
+// by Nisan and Schocken, MIT Press.
+// File name: projects/12/MemoryTest/Main.jack
+
+/** Test program for the OS Memory class. */
+class Main {
+
+    /** Performs various memory manipulations. */
+    function void main() {
+        var int temp, err;
+        var Array a, b, c;
+        
+        do Memory.poke(8000, 333);       // RAM[8000] = 333
+        let temp = Memory.peek(8000);
+        do Memory.poke(8001, temp + 1);  // RAM[8001] = 334
+        
+        let a = Array.new(3);            // uses Memory.alloc
+        let a[2] = 222;
+        do Memory.poke(8002, a[2]);      // RAM[8002] = 222
+        
+		let err = 0;
+        let b = Array.new(3);
+        let b[1] = a[2] - 100;
+		if (b = a) {					  // Fail compare if b = a
+			let err = 1; }
+        do Memory.poke(8003, b[1] + err); // RAM[8003] = 122
+        
+		let err = 0;
+        let c = Array.new(500);
+        let c[499] = a[2] - b[1];
+		if (c = a) {					  // Fail compare if c = a
+			let err = 1; }
+		if (c = b) {					  // Fail compare if c = b
+			let err = err + 10; }
+        do Memory.poke(8004, c[499]+err); // RAM[8004] = 100
+        
+        do a.dispose();                   // uses Memory.deAlloc
+        do b.dispose();
+        
+		let err = 0;
+        let b = Array.new(3);
+        let b[0] = c[499] - 90;
+		if (b = c) {					  // Fail compare if b = c
+			let err = 1; }
+        do Memory.poke(8005, b[0] + err); // RAM[8005] = 10
+        
+        do c.dispose();
+        do b.dispose();
+        
+        return;
+    }
+}