shithub: sl

Info  •  Files  •  Log  •  Branches

get_type: element with size 0 does not happen, replace with an assert

--- a/src/types.c

+++ b/src/types.c

@@ -40,11 +40,7 @@

 	if(iscons(t)){

 		if(isarray){

 			fltype_t *eltype = get_type(car_(cdr_(t)));

-			assert(eltype != nil);

-			if(eltype->size == 0){

-				MEM_FREE(ft);

-				lerrorf(FL_ArgError, "invalid array element type");

-			}

+			assert(eltype != nil && eltype->size > 0);

 			ft->elsz = eltype->size;

 			ft->eltype = eltype;

 			ft->init = cvalue_array_init;