1 files changed, 1 insertions, 1 deletions
diff --git a/app/IR.hs b/app/IR.hs
index 50c7493..fa987e5 100644
--- a/app/IR.hs
+++ b/app/IR.hs
@@ -25,7 +25,7 @@ data StrTable =
   StrTable Int (M.Map String Int) (M.Map Int String)
   deriving (Show)
 
-emptystrtable = StrTable 0 M.empty M.empty
+emptystrtable = StrTable 1 M.empty M.empty
 
 strtablize t@(StrTable nxt fwd rev) str =
   case fwd M.!? str of