X-Git-Url: https://ocean-lang.org/code/?a=blobdiff_plain;f=csrc%2Foceani.mdc;h=c3ec2a035d2c127863e0b2081f7b60ed2fc2ad4b;hb=892c803c5bdee976d367da244276255e1034aeac;hp=5e26237d7463b0f4e63939c553170959c1006ce0;hpb=c2a0a93d47f0a1d63c1a794d8f5cf99e04a85588;p=ocean

diff --git a/csrc/oceani.mdc b/csrc/oceani.mdc
index 5e26237..c3ec2a0 100644
--- a/csrc/oceani.mdc
+++ b/csrc/oceani.mdc
@@ -264,6 +264,7 @@ structures can be used.
 		}
 		## free context vars
 		## free context types
+		## free context storage
 		exit(context.parse_error ? 1 : 0);
 	}
 
@@ -618,9 +619,9 @@ A separate function encoding these cases will simplify some code later.
 	static int type_compat(struct type *require, struct type *have, int rules)
 	{
 		if ((rules & Rboolok) && have == Tbool)
-			return 1;
+			return 1;	// NOTEST
 		if ((rules & Rnolabel) && have == Tlabel)
-			return 0;
+			return 0;	// NOTEST
 		if (!require || !have)
 			return 1;
 
@@ -772,7 +773,7 @@ A separate function encoding these cases will simplify some code later.
 		t->size = size;
 		t->align = size > sizeof(void*) ? sizeof(void*) : size;
 		if (t->size & (t->align - 1))
-			t->size = (t->size | (t->align - 1)) + 1;
+			t->size = (t->size | (t->align - 1)) + 1;	// NOTEST
 		return t;
 	}
 
@@ -1318,7 +1319,7 @@ For this we have `scope_finalize()`.
 		c->local = calloc(1, c->local_size);
 	}
 
-###### free context vars
+###### free context storage
 	free(context.global);
 	free(context.local);