diff options
Diffstat (limited to 'Sil/Util')
| -rw-r--r-- | Sil/Util/Printer.icl | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/Sil/Util/Printer.icl b/Sil/Util/Printer.icl index af3d072..d35281b 100644 --- a/Sil/Util/Printer.icl +++ b/Sil/Util/Printer.icl @@ -98,6 +98,8 @@ where else` = case else of Nothing -> "" Just e -> " else {\r\n" <+ print st` e <+ "\r\n" <+ st <+ "}" + print st (While c do) = st <+ "while (" <+ c <+ ") {\r\n" <+ + print (incIndent st) do <+ "\r\n" <+ st <+ "}" print st stm = st <+ stm printersperse :: a [b] -> String | toString a & toString b |