From ff12ef4eea67453c1a6c1fa4614b74adf7c3caca Mon Sep 17 00:00:00 2001 From: Rose Hogenson Date: Fri, 16 May 2025 16:43:49 -0700 Subject: Fix spelling in GenSym --- codegen.sml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'codegen.sml') 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 -- cgit v1.3.1