diff options
Diffstat (limited to 'Testing/Semantic/t5-4.p')
-rw-r--r-- | Testing/Semantic/t5-4.p | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/Testing/Semantic/t5-4.p b/Testing/Semantic/t5-4.p new file mode 100644 index 0000000..a31211f --- /dev/null +++ b/Testing/Semantic/t5-4.p @@ -0,0 +1,14 @@ +(* ERROR: function updating non-local variable *) +program main( input, output ); + var a: integer; + + function foo(b: integer): integer; + begin + foo := a; + a := b + end; + +begin + +end. + |