diff options
Diffstat (limited to 'tiger-compiler/tests/good/record-set-to-nil.tig')
| -rw-r--r-- | tiger-compiler/tests/good/record-set-to-nil.tig | 23 |
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 |
