X-Git-Url: https://ocean-lang.org/code/?p=ocean;a=blobdiff_plain;f=csrc%2Foceani.mdc;h=f41e8fd50f41b7902eadd965ac333b7d6b3abd38;hp=c2a19ce0c7744190c2fedba910f7205c851e83db;hb=025b04b80f75fd004da2b5e884b35233ede2f6f5;hpb=234ae7c044ea183c719799a5369b2cfcbc69fd27

diff --git a/csrc/oceani.mdc b/csrc/oceani.mdc
index c2a19ce..f41e8fd 100644
--- a/csrc/oceani.mdc
+++ b/csrc/oceani.mdc
@@ -2346,7 +2346,7 @@ function will be needed.
 		| ERROR ${ tok_err(c, "Syntax error in struct field", &$1); }$
 
 	Field -> IDENTIFIER : Type = Expression ${ {
-			int ok;	// UNTESTED
+			int ok;
 
 			$0 = calloc(1, sizeof(struct fieldlist));
 			$0->f.name = $1.txt;
@@ -2375,9 +2375,9 @@ function will be needed.
 	static void structure_print_type(struct type *t, FILE *f);
 
 ###### value functions
-	static void structure_print_type(struct type *t, FILE *f)	// UNTESTED
-	{	// UNTESTED
-		int i;	// UNTESTED
+	static void structure_print_type(struct type *t, FILE *f)
+	{
+		int i;
 
 		fprintf(f, "struct %.*s\n", t->name.len, t->name.txt);
 
@@ -2398,8 +2398,8 @@ function will be needed.
 	}
 
 ###### print type decls
-	{	// UNTESTED
-		struct type *t;	// UNTESTED
+	{
+		struct type *t;
 		int target = -1;
 
 		while (target != 0) {