Add the tiger source code bundle from the book site
Signed-off-by: jmug <u.g.a.mariano@gmail.com>
This commit is contained in:
parent
915660c8a7
commit
33d8bac511
87 changed files with 3252 additions and 0 deletions
13
tiger/testcases/test14.tig
Normal file
13
tiger/testcases/test14.tig
Normal file
|
|
@ -0,0 +1,13 @@
|
|||
/* error : compare rec with array */
|
||||
|
||||
let
|
||||
|
||||
type arrtype = array of int
|
||||
type rectype = {name:string, id: int}
|
||||
|
||||
var rec := rectype {name="aname", id=0}
|
||||
var arr := arrtype [3] of 0
|
||||
|
||||
in
|
||||
if rec <> arr then 3 else 4
|
||||
end
|
||||
Loading…
Add table
Add a link
Reference in a new issue