parent
ab270e2246
commit
c064359888
1 changed files with 1 additions and 1 deletions
|
@ -11,7 +11,7 @@ let tests_typeof =
|
||||||
, Term.(Fun (x, Fun (y, Binop (Var x, Plus, Var y))))
|
, Term.(Fun (x, Fun (y, Binop (Var x, Plus, Var y))))
|
||||||
, Some Type.(Arrow (Int, Arrow (Int, Int))) )
|
, Some Type.(Arrow (Int, Arrow (Int, Int))) )
|
||||||
; (* Not typed variable *)
|
; (* Not typed variable *)
|
||||||
"x", Term.(Var "x"), Some Type.(Var "x")
|
"x", Term.(Var "x"), None
|
||||||
; (* Binary operation *)
|
; (* Binary operation *)
|
||||||
"1 + 2", Term.(Binop (IntConst 1, Plus, IntConst 2)), Some Type.Int
|
"1 + 2", Term.(Binop (IntConst 1, Plus, IntConst 2)), Some Type.Int
|
||||||
; (* Pair *)
|
; (* Pair *)
|
||||||
|
|
Reference in a new issue