FIX: not using flattened source code

Author: Oldes

make/tools/make-boot.reb

@@ -929,7 +929,7 @@ foreach section [boot-base boot-sys boot-mezz] [
 								Needs:   (select hdr 'needs)
 							]
 						]
-						mold/only/flat code
+						mold/only code
 					)
 				]
 			][
@@ -954,6 +954,7 @@ foreach section [boot-base boot-sys boot-mezz] [
 boot-protocols: make block! 20
 foreach file first mezz-files [
 	code: load-file/header file
+	? code
 	hdr: to block! take code
 	either all [
 		;- if protocol exports some function, import must be used so
@@ -979,7 +980,7 @@ foreach file first mezz-files [
 							Needs:   (select hdr 'needs)
 						]
 					]
-					mold/only/flat code
+					mold/only code
 				)
 			]
 		][ 

make/tools/make-host-ext.reb

@@ -139,7 +139,7 @@ emit-file: func [
 	]
 
 	emit "#ifdef INCLUDE_EXT_DATA^/"
-	data: append trim/head mold/only/flat source newline
+	data: append trim/head mold/only source newline
 	append data to-char 0 ; null terminator may be required
 	emit ["const unsigned char RX_" name "[] = {^/" to-cstr data "^/};^/^/"]
 	emit "#endif^/"

make/tools/make-host-init.reb

@@ -46,7 +46,7 @@ write-c-file: func [
 	;print "writing C code..."
 	emit-head "Host custom init code" c-file
 
-	data: mold/flat/only/all code
+	data: mold/only/all code
 
 	append data newline ; BUG? why does MOLD not provide it?