diff options
| author | Rose Hogenson <rosehogenson@posteo.net> | 2025-05-16 16:43:49 -0700 |
|---|---|---|
| committer | Rose Hogenson <rosehogenson@posteo.net> | 2025-05-16 16:46:51 -0700 |
| commit | ff12ef4eea67453c1a6c1fa4614b74adf7c3caca (patch) | |
| tree | 64911f7bb622075ce740c5ac4d1559295845f7d1 /codegen.sml | |
| parent | 907ade52d0703e95b2e29bd8933b1f57a3ba3e09 (diff) | |
| download | sml-ff12ef4eea67453c1a6c1fa4614b74adf7c3caca.tar.zst | |
Fix spelling in GenSym
Diffstat (limited to 'codegen.sml')
| -rw-r--r-- | codegen.sml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/codegen.sml b/codegen.sml index 67b2d30..0bd86be 100644 --- a/codegen.sml +++ b/codegen.sml @@ -162,7 +162,7 @@ struct | Syntax.CPrimop (Syntax.PEq, [x, y], [res], [k]) => Syntax.OEq (translate res, translateVal x, translateVal y) :: go k | Syntax.CPrimop (Syntax.PIf, [b], [], [k1, k2]) => let - val trueLabel = Gensym.new () + val trueLabel = GenSym.new () in Syntax.OIf (translateVal b, trueLabel) :: go k2 |