From b3f2fd686bc781996687deaadbe721b3300e4aba Mon Sep 17 00:00:00 2001 From: Rose Hogenson Date: Fri, 10 Feb 2023 15:06:47 -0800 Subject: Write a first draft of the compiler. Sorry I haven't been better about these commit messages. You're not my mom. --- gensym.sml | 5 +++++ 1 file changed, 5 insertions(+) create mode 100644 gensym.sml (limited to 'gensym.sml') diff --git a/gensym.sml b/gensym.sml new file mode 100644 index 0000000..7a5f123 --- /dev/null +++ b/gensym.sml @@ -0,0 +1,5 @@ +structure Gensym = +struct + val counter : int ref = ref 0 + fun new () : int = (counter := (!counter + 1) ; !counter) +end -- cgit v1.3.1