Register map

1 files changed, 1 insertions, 1 deletions

diff --git a/parser.fun b/parser.fun
index ae5f2e3..d49f895 100644
--- a/parser.fun
+++ b/parser.fun
@@ -3781,7 +3781,7 @@ functor Parser(structure Tree: TREE; structure P: PPC;
         Printf out `"return " Popt pea ea `";" %
     | pstmt' _ StmtBreak out = Printf out `"break;" %
     | pstmt' _ StmtContinue out = Printf out `"continue;" %
-    | pstmt' _ StmtNone _ = raise Unreachable
+    | pstmt' _ StmtNone out =  Printf out `";" %
 
   and pCompBody off (S as (StmtCompound _)) out =
     Printf out A2 pstmt' (off - 1) S %