diff options
Diffstat (limited to 'Testing/Semantic/t1-1b.p')
-rw-r--r-- | Testing/Semantic/t1-1b.p | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/Testing/Semantic/t1-1b.p b/Testing/Semantic/t1-1b.p new file mode 100644 index 0000000..5a16e62 --- /dev/null +++ b/Testing/Semantic/t1-1b.p @@ -0,0 +1,16 @@ +(* ERROR: variable redeclared *) +program main( input, output ); + var a: integer; + + procedure boo; + begin + end; + + function boo(b:integer):integer; + begin + boo := 1 + end; + +begin +end. + |