summaryrefslogtreecommitdiff
path: root/tiger-compiler/tests/good/record-set-to-nil.tig
diff options
context:
space:
mode:
Diffstat (limited to 'tiger-compiler/tests/good/record-set-to-nil.tig')
-rw-r--r--tiger-compiler/tests/good/record-set-to-nil.tig23
1 files changed, 23 insertions, 0 deletions
diff --git a/tiger-compiler/tests/good/record-set-to-nil.tig b/tiger-compiler/tests/good/record-set-to-nil.tig
new file mode 100644
index 0000000..bf544cc
--- /dev/null
+++ b/tiger-compiler/tests/good/record-set-to-nil.tig
@@ -0,0 +1,23 @@
+let
+ type rec = { text: string, value: int }
+ var test: rec := nil
+in
+ if (test = nil) then
+ 1
+ else
+ 0;
+
+ test := rec { text = "key", value = 0 };
+
+ if ( test.value = 1 ) then
+ -1
+ else
+ 100;
+
+ test := nil;
+
+ if (test = nil) then
+ 1
+ else
+ 0
+end