X-Git-Url: https://ocean-lang.org/code/?a=blobdiff_plain;f=csrc%2Foceani.mdc;h=47d5f8a30a1aaffbca3a72240ed907f2c44e6f26;hb=5ee1c8be5ae9055defa1f3ea29cbdf906ea51a52;hp=bd2c41afc02a1daa34ed6921fb60ba12e6ea4638;hpb=ab9eaaed0253451cd4a7d478d6adf26059dd4a7e;p=ocean

diff --git a/csrc/oceani.mdc b/csrc/oceani.mdc
index bd2c41a..47d5f8a 100644
--- a/csrc/oceani.mdc
+++ b/csrc/oceani.mdc
@@ -1814,13 +1814,18 @@ defined.
 			    cast(binode, cs->condpart)->op == Block) {
 				printf(":\n");
 				print_exec(cs->condpart, indent+1, bracket);
-				do_indent(indent, "then:\n");
-				print_exec(cs->thenpart, indent+1, bracket);
+				if (cs->thenpart) {
+					do_indent(indent, "then:\n");
+					print_exec(cs->thenpart, indent+1, bracket);
+				}
 			} else {
 				printf(" ");
 				print_exec(cs->condpart, 0, bracket);
-				printf(":\n");
-				print_exec(cs->thenpart, indent+1, bracket);
+				if (cs->thenpart) {
+					printf(":\n");
+					print_exec(cs->thenpart, indent+1, bracket);
+				} else
+					printf("\n");
 			}
 		}
 		for (cp = cs->casepart; cp; cp = cp->next) {