Paris8/compilateurMIPS
Archived
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

add sc

Browse source
This commit is contained in:
Mylloon 2022-12-10 15:50:34 +01:00
parent ceaafba460
commit ea27236f04
Signed by: Anri
GPG key ID: A82D63DFF8D1317F
1 changed files with 6 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
parser.mly
View file

@ -71,7 +71,7 @@ block:
/* { */ /* { */
| Lbracedeb ; b = block { b } | Lbracedeb ; b = block { b }
/* instr; ... */ /* instr ... */
| i = instr ; b = block { i @ b } | i = instr ; b = block { i @ b }
/* } */ /* } */
@ -79,26 +79,26 @@ block:
; ;
instr: instr:
/* return x */ /* return x; */
| Lreturn ; e = expr ; Lsc { [ Return { expr = e ; pos = $startpos } ] } | Lreturn ; e = expr ; Lsc { [ Return { expr = e ; pos = $startpos } ] }
/* type v */ /* type v; */
| t = Ltype ; v = Lvar ; Lsc { | t = Ltype ; v = Lvar ; Lsc {
[ Decl { name = v ; type_t = t ; pos = $startpos(t) } ] [ Decl { name = v ; type_t = t ; pos = $startpos(t) } ]
} }
/* type v = e */ /* type v = e; */
| t = Ltype ; v = Lvar ; Lassign ; e = expr ; Lsc | t = Ltype ; v = Lvar ; Lassign ; e = expr ; Lsc
{ [ Decl { name = v ; type_t = t ; pos = $startpos(t) } { [ Decl { name = v ; type_t = t ; pos = $startpos(t) }
; Assign { var = v ; expr = e ; pos = $startpos(v) } ] ; Assign { var = v ; expr = e ; pos = $startpos(v) } ]
} }
/* v = e */ /* v = e; */
| v = Lvar ; Lassign ; e = expr ; Lsc { | v = Lvar ; Lassign ; e = expr ; Lsc {
[ Assign { var = v ; expr = e ; pos = $startpos($2) } ] [ Assign { var = v ; expr = e ; pos = $startpos($2) } ]
} }
/* function() */ /* function(); */
| f = Lvar ; a = args_expr ; Lsc { | f = Lvar ; a = args_expr ; Lsc {
[ Do { expr = Call { func = f ; args = a ; pos = $startpos(a) } ; pos = $startpos} ] [ Do { expr = Call { func = f ; args = a ; pos = $startpos(a) } ; pos = $startpos} ]
} }