Test that instance fields across class and superclass work correctly.

As it so happens, yksom already respects this new facet of the SOM spec (SOM-st/SOM#44), so the test alone is sufficient.
ltratt · Jun 16, 2020 · f707b6c · f707b6c
1 parent 0263235
commit f707b6c
Show file tree

Hide file tree

Showing 2 changed files with 35 additions and 0 deletions.
diff --git a/lang_tests/inst_var_at_put_superclass/test.som b/lang_tests/inst_var_at_put_superclass/test.som
@@ -0,0 +1,25 @@
+"
+VM:
+  status: success
+  stdout:
+    1
+    2
+    4
+    3
+"
+
+test = test_super (
+    | d c |
+
+    run = (
+        self instVarAt: 1 put: 1.
+        self instVarAt: 2 put: 2.
+        self instVarAt: 3 put: 3.
+        self instVarAt: 4 put: 4.
+
+        a println.
+        b println.
+        c println.
+        d println.
+    )
+)
diff --git a/lang_tests/inst_var_at_put_superclass/test_super.som b/lang_tests/inst_var_at_put_superclass/test_super.som
@@ -0,0 +1,10 @@
+test_super = (
+    | a b |
+
+    f = (
+        (self instVarAt: 1) println.
+        (self instVarAt: 2) println.
+        (self instVarAt: 3) println.
+        (self instVarAt: 4) println.
+    )
+)