internal: Ensure to only pass TYPEINI trees to astTypeIniFlush()

src/compiler/ast-node-typeini.bas

@@ -410,6 +410,7 @@ function astTypeIniFlush overload _
 
 	dim as ASTNODE ptr n = any, nxt = any, t = any, l = any
 
+	assert( astIsTYPEINI( initree ) )
 	assert( astIsVAR( target ) or astIsDEREF( target ) or _
 	        astIsFIELD( target ) or astIsIDX( target ) )
 
@@ -475,6 +476,10 @@ function astTypeIniFlush overload _
 		case AST_NODECLASS_TYPEINI_CTORLIST
 			t = hCallCtorList( t, n, target )
 
+		case AST_NODECLASS_TYPEINI_SCOPEINI, AST_NODECLASS_TYPEINI_SCOPEEND
+
+		case else
+			assert( FALSE )
 		end select
 
 		nxt = n->r

src/compiler/parser-decl-var.bas

@@ -725,8 +725,7 @@ private function hVarInitDefault _
 	'' because that's the only way for the coder to set the value.
 	if( typeIsConst( symbGetFullType( sym ) ) ) then
 		errReport( FB_ERRMSG_AUTONEEDSINITIALIZER )
-		'' error recovery: fake an expr
-		return astNewCONSTi( 0 )
+		exit function
 	end if
 
 	'' Has default constructor?
@@ -810,8 +809,7 @@ private function hVarInit _
 		'' ...or const-qualified vars
 		if( typeIsConst( symbGetFullType( sym ) ) ) then
 			errReport( FB_ERRMSG_AUTONEEDSINITIALIZER )
-			'' error recovery: fake an expr
-			return astNewCONSTi( 0 )
+			return NULL
 		end if
 
 		lexSkipToken( )
@@ -820,8 +818,7 @@ private function hVarInit _
 
 	initree = cInitializer( sym, FB_INIOPT_ISINI )
 	if( initree = NULL ) then
-		'' fake an expression
-		initree = astNewCONSTi( 0 )
+		return NULL
 	end if
 
 	'' static or shared?