From 22b8b7e2478e3b205c89cc7a700058bfe39175f2 Mon Sep 17 00:00:00 2001
From: Rose Hogenson <rosehogenson@posteo.net>
Date: Sun, 2 Jun 2024 09:17:55 -0700
Subject: Add strings and IO.

---
 elab.sml | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'elab.sml')

diff --git a/elab.sml b/elab.sml
index 2895894..a99758a 100644
--- a/elab.sml
+++ b/elab.sml
@@ -10,6 +10,9 @@ struct
     | "sub" => Syntax.PSub
     | "mul" => Syntax.PMul
     | "div" => Syntax.PDiv
+    | "read" => Syntax.PRead
+    | "write" => Syntax.PWrite
+    | "writeErr" => Syntax.PWriteErr
     | _ => raise Fail ("invalid op: " ^ s)
 
   fun enumerate (l : 'a list) : (int * 'a) list =
-- 
cgit v1.3.1