diff options
author | Tucker Evans <tuckerevans24@gmail.com> | 2019-09-29 21:30:48 -0400 |
---|---|---|
committer | Tucker Evans <tuckerevans24@gmail.com> | 2019-09-29 21:35:19 -0400 |
commit | d6b038578577f7c0f4eeb95e35e6a2113e6d9732 (patch) | |
tree | 68609b4f92b701a0d1363c4905d0929018d3923b /Testing/Semantic/t5-3.p | |
parent | 82dc3cf8d980b010a1cf2e3ac1c438c1412a21f8 (diff) | |
parent | 4f66397e285f7742bdf5bfd9f723e10104486ce2 (diff) |
Merge branch 'master' of git.tuckerevans.com:/srv/git/private/pascal_compiler
Fix white space at end of lines in Testing files
Diffstat (limited to 'Testing/Semantic/t5-3.p')
-rw-r--r-- | Testing/Semantic/t5-3.p | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/Testing/Semantic/t5-3.p b/Testing/Semantic/t5-3.p new file mode 100644 index 0000000..6494ae0 --- /dev/null +++ b/Testing/Semantic/t5-3.p @@ -0,0 +1,18 @@ +(* ERROR: function passed wrong number/type of arguments *) +program main( input, output ); + var b: integer; + var y: real; + var a: array[1 .. 13] of integer; + var z: array[1 .. 13] of real; + + function foo(a: integer; x: real): integer; + begin + foo := a + end; +begin + b := foo(y,b) + foo(b,y,10) +end. + + + + |