Skip to content

Commit

Permalink
fix #57
Browse files Browse the repository at this point in the history
  • Loading branch information
dm0n3y committed Nov 8, 2024
1 parent af6c63d commit 2524649
Showing 1 changed file with 4 additions and 4 deletions.
8 changes: 4 additions & 4 deletions src/hazel/Grammar.re
Original file line number Diff line number Diff line change
Expand Up @@ -60,15 +60,15 @@ module Pat = {
let sort = Sort.of_str("Pat");
let pat = nt(sort);

let bool_lit = alt([c("true"), c("false")]);
// let bool_lit = alt([c("true"), c("false")]);

let cons_ap = seq([pat, brc(L, "("), comma_sep(pat), brc(R, ")")]);
let operand =
alt([
t(Int_lit),
t(Float_lit),
t(Id_lower),
bool_lit,
// bool_lit,
//Constructor
t(Id_upper),
seq([brc(L, "("), comma_sep(pat), brc(R, ")")]),
Expand All @@ -95,7 +95,7 @@ module Exp = {
let sort = Sort.of_str("Exp");
let exp = nt(sort);

let bool_lit = alt([c("true"), c("false")]);
// let bool_lit = alt([c("true"), c("false")]);

let rul =
seq([op(~break=(true, false), "|"), nt(Pat.sort), op("=>"), exp]);
Expand Down Expand Up @@ -127,7 +127,7 @@ module Exp = {
t(Float_lit),
t(Id_lower),
t(Id_upper), // constructors
bool_lit,
// bool_lit,
seq([brc(L, "("), comma_sep(exp), brc(R, ")")]),
seq([brc(L, "["), comma_sep(exp), brc(R, "]")]),
]);
Expand Down

0 comments on commit 2524649

Please sign in to comment.