FIX: import/check with an invalid checksum was failing with a wrong error (Oldes/Rebol-issues#1686)

Oldes · Oldes · commit b527b18795eb · 2022-05-25T15:29:32.000+02:00
diff --git a/src/mezz/sys-load.reb b/src/mezz/sys-load.reb
@@ -546,12 +546,12 @@ load-module: function [
 		not hdr [
 			; Only happens for string, binary or non-extension file/url source
 			set [hdr: code: end:] load-header/required data
-			unless tail? end [code: copy/part code end] 
 			case [
 				word? hdr [cause-error 'syntax hdr source]
 				import none ; /import overrides 'delay option
 				not delay [delay: true? find hdr/options 'delay]
 			]
+			unless tail? end [code: copy/part code end] 
 			if hdr/checksum [modsum: copy hdr/checksum]
 		]
 		no-share [hdr/options: append any [hdr/options make block! 1] 'isolate]

Original file line number	Diff line number	Diff line change
`@@ -546,12 +546,12 @@ load-module: function [`
`546`	`546`	`not hdr [`
`547`	`547`	`; Only happens for string, binary or non-extension file/url source`
`548`	`548`	`set [hdr: code: end:] load-header/required data`
`549`		`- unless tail? end [code: copy/part code end]`
`550`	`549`	`case [`
`551`	`550`	`word? hdr [cause-error 'syntax hdr source]`
`552`	`551`	`import none ; /import overrides 'delay option`
`553`	`552`	`not delay [delay: true? find hdr/options 'delay]`
`554`	`553`	`]`
	`554`	`+ unless tail? end [code: copy/part code end]`
`555`	`555`	`if hdr/checksum [modsum: copy hdr/checksum]`
`556`	`556`	`]`
`557`	`557`	`no-share [hdr/options: append any [hdr/options make block! 1] 'isolate]`