diff --git a/c64/basic/engine/ad9e.frmevl.s b/c64/basic/engine/ad9e.frmevl.s
index 1c7e51af..71b1ccb7 100644
--- a/c64/basic/engine/ad9e.frmevl.s
+++ b/c64/basic/engine/ad9e.frmevl.s
@@ -168,11 +168,19 @@ FRMEVL_fetch_string:
 	jsr fetch_character
 	cmp #$22
 	beq FRMEVL_got_value
+	cmp #$00
+	beq !+
 
 	inc __FAC1 + 0
 	bne !-
 
 	jmp do_STRING_TOO_LONG_error
+!:
+	// No closing quote, but end of the data
+
+	jsr unconsume_character
+
+	// FALLTROUGH
 
 
 //