msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

some bug fixes in type check and solve

Browse Source
This commit is contained in:
aarne
2004-11-01 21:41:18 +00:00
parent 42ff99469a
commit 2bd22e078a
6 changed files with 73 additions and 40 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
examples/gfcc/Imper.gf
View File

@@ -25,8 +25,8 @@ abstract Imper = {
Decl : (A : Typ) -> (Var A -> Stm) -> Stm ;
Assign : (A : Typ) -> Var A -> Exp A -> Stm -> Stm ;
While : Exp TInt -> Stm -> Stm -> Stm ;
IfElse : Exp TInt -> Stm -> Stm -> Stm -> Stm ;
While : Exp (TNum TInt) -> Stm -> Stm -> Stm ;
IfElse : Exp (TNum TInt) -> Stm -> Stm -> Stm -> Stm ;
Block : Stm -> Stm -> Stm ;
Printf : (A : Typ) -> Exp A -> Stm -> Stm ;
Return : (A : Typ) -> Exp A -> Stm ;