diff --git a/examples/coverage.tal b/examples/acid.tal
similarity index 100%
rename from examples/coverage.tal
rename to examples/acid.tal
diff --git a/makefile b/makefile
index a8eef63..332623a 100644
--- a/makefile
+++ b/makefile
@@ -12,13 +12,13 @@ run-drifblim: bin/drifblim.rom
 	@ printf "++ Assemble drifblim-bootstrap from itself\n"
 	@ ${EMU} bin/drifblim.rom src/drifblim.tal bin/drifblim-bootstrap.rom
 	@ printf "\n++ Test drifblim-bootstrap\n"
-	@ ${EMU} bin/drifblim.rom examples/coverage.tal bin/res.rom
+	@ ${EMU} bin/drifblim.rom examples/acid.tal bin/res.rom
 	@ ${EMU} bin/res.rom
 run-drifloon: bin/drifloon.rom
 	@ printf "++ Assemble drifloon-bootstrap from itself\n"
 	@ cat src/drifloon.tal | ${EMU} bin/drifloon.rom > bin/drifloon-bootstrap.rom
 	@ printf "\n++ Test drifloon-bootstrap\n"
-	@ cat examples/coverage.tal | ${EMU} bin/drifloon-bootstrap.rom > bin/res.rom
+	@ cat examples/acid.tal | ${EMU} bin/drifloon-bootstrap.rom > bin/res.rom
 	@ ${EMU} bin/res.rom
 clean:
 	@ rm -fr bin
diff --git a/src/drifblim.tal b/src/drifblim.tal
index c6437b4..fd83ad2 100644
--- a/src/drifblim.tal
+++ b/src/drifblim.tal
@@ -1,7 +1,7 @@
 ( usage: drifblim.rom input.tal output.rom )
 
 |10 @Console &vector $2 &read $1 &pad $4 &type $1 &write $1 &error $1
-|a0 @File &vector $2 &success $2 &stat $2 &delete $1 &append $1 &name $2 &length $2 &read $2 &write $2
+|a0 @File &vector $2 &success $1 &success-lb $1 &stat $2 &delete $1 &append $1 &name $2 &length $2 &read $2 &write $2
 |000
 
 	@src $30
@@ -9,7 +9,6 @@
 	@token $1 &buf $30
 	@scope $30
 	@sublabel $30
-	@live $1
 	@scan $1
 	@head $2
 	@halt $1
@@ -380,7 +379,7 @@
 
 @feof ( addr* -: f )
 	.File/read DEO2
-	.File/success DEI2 #0000 EQU2 JMP2r
+	[ LIT2 00 -File/success-lb ] DEI EQU JMP2r
 
 @zkey ( key ztr -- proc )
 	OVR #21 LTH ?&eval