1 files changed, 4 insertions(+), 4 deletions(-)

M src/potato.tal

@@ 317,7 317,7 @@ JMP2r
 	DUP2 ;dict/uf2-ext ;has-ext JSR2 ;open-font JCN2
 	DUP2 ;dict/pcm-ext ;has-ext JSR2 ;open-sound JCN2
 	DUP2 ;dict/rom-ext ;has-ext JSR2 ;open-load JCN2
-	DUP2 #0005 ADD2 ;dict/theme-ext ;scmp JSR2 ,open-theme JCN
+	DUP2 #0005 ADD2 ;dict/theme-ext ;scmp JSR2 ;open-theme JCN2
 	( DUP2 #0005 ADD2 ;is-binary JSR2 ,open-hexa JCN )
 	;open-text ( .. )
 


@@ 332,15 332,15 @@ JMP2
 
 @open-meta ( file* -- )
 
-	( TODO: open error if metadata missing )
+	DUP2 ;make-src JSR2 ;has-metadata JSR2 #00 EQU ,&err JCN
 	#0005 ADD2 ;app-meta #240a #0010 #0034 ;add-win ( .. )
 
 JMP2
+	&err #0005 ADD2 ;dict/no-metadata SWP2 ;add-err JMP2
 
 @open-text ( file* -- )
 
-	( TODO: check that it is only ascii )
-	#0005 ADD2 ;app-text #5823 #001d #0034 ;add-win ( .. )
+	#0005 ADD2 ;app-text #3023 #001d #0034 ;add-win ( .. )
 
 JMP2