diff --git a/get_dir_entry.aii b/get_dir_entry.aii
index 3749def..cc065b1 100644
--- a/get_dir_entry.aii
+++ b/get_dir_entry.aii
@@ -171,14 +171,14 @@ class1
 	~DebugHexDump param_blk_ptr, #DirEntryRecGS.__sizeof
 
 	lda tool_error
-	cmp #0
+	cmp #1
 	rtl
 
 class0
 	ldx #get_dir_entry_dcb_0_size-4
 	dispatch get_dir_entry_dcb_0
 	lda tool_error
-	cmp #0
+	cmp #1
 	rtl
 
 
diff --git a/get_eof.aii b/get_eof.aii
index b52aefb..686e8fb 100644
--- a/get_eof.aii
+++ b/get_eof.aii
@@ -50,14 +50,14 @@ class1
 	tax
 	dispatch get_eof_dcb_1
 	lda tool_error
-	cmp #0
+	cmp #1
 	rtl
 
 class0
 	ldx #get_eof_dcb_0_size-4
 	dispatch get_eof_dcb_0
 	lda tool_error
-	cmp #0
+	cmp #1
 	rtl
 
 get_eof_dcb_0
diff --git a/get_file_info.aii b/get_file_info.aii
index e71445c..657e97e 100644
--- a/get_file_info.aii
+++ b/get_file_info.aii
@@ -66,14 +66,14 @@ class1
 	tax
 	dispatch file_info_dcb_1
 	lda tool_error
-	cmp #0
+	cmp #1
 	rtl
 
 class0
 	ldx #file_info_dcb_0_size-4
 	dispatch file_info_dcb_0
 	lda tool_error
-	cmp #0
+	cmp #1
 	rtl
 
 exit
diff --git a/get_mark.aii b/get_mark.aii
index a7a640f..4281865 100644
--- a/get_mark.aii
+++ b/get_mark.aii
@@ -59,14 +59,14 @@ class1
 	tax
 	dispatch get_mark_dcb_1
 	lda tool_error
-	cmp #0
+	cmp #1
 	rtl
 
 class0
 	ldx #get_mark_dcb_0_size-4
 	dispatch get_mark_dcb_0
 	lda tool_error
-	cmp #0
+	cmp #1
 	rtl
 
 get_mark_dcb_0
diff --git a/open.aii b/open.aii
index afb231c..47f58ea 100644
--- a/open.aii
+++ b/open.aii
@@ -75,14 +75,14 @@ class1
 	tax
 	dispatch open_dcb_1
 	lda tool_error
-	cmp #0
+	cmp #1
 	rtl
 
 class0
 	ldx #open_dcb_0_size-4
 	dispatch open_dcb_0
 	lda tool_error
-	cmp #0
+	cmp #1
 	rtl
 
 exit
diff --git a/read.aii b/read.aii
index 2786315..d0d476b 100644
--- a/read.aii
+++ b/read.aii
@@ -394,7 +394,7 @@ done
 	; eventually, data_zone, data_block.
 
 	ldx call_class
-	lda @table,x
+	lda tc_table,x
 	tay
 	lda transferCount
 	sta [param_blk_ptr],y
@@ -404,19 +404,17 @@ done
 	sta [param_blk_ptr],y
 
 	lda tool_error
-	cmp #0
+	cmp #1
 	rtl
 
-@table	dc.w FileIORec.transferCount, IORecGS.transferCount
-
-
-	lda tool_error
-	cmp #0
 
 exit
 	rtl
 
 
+tc_table	dc.w FileIORec.transferCount, IORecGS.transferCount
+
+
 	endp
 
 update_counts proc