better handling for empty names, forgot to return

loader.aii

@@ -470,6 +470,7 @@ vector	dc.w $ffff
 	xce
 	plp
 	sec
+	and #$ff
 	rts
 
 	endp
@@ -669,6 +670,8 @@ name_check
 
 	lda buffer+HFSCatalogKey.nodeName,y
 	sta cat_str_len
+	beq cmp
+
 @loop
 	lda buffer+HFSCatalogKey.nodeName+1,y
 	sta cat_str,x
@@ -677,11 +680,11 @@ name_check
 	cpx cat_str_len
 	blt @loop
 
+
 upper
 	; now uppercase it
 	ldy #0
 	ldx cat_str_len
-	dex
 @loop	lda cat_str,y
 	cmp #'z'+1
 	bge @next
@@ -692,7 +695,7 @@ upper
 
 @next	iny
 	dex
-	bpl @loop
+	bne @loop
 
 
 cmp
@@ -728,6 +731,7 @@ gt	long m
 exit	
 	ply
 	plx
+	rts
 
 match	; a match!
 	; store the file type, aux type, eof, and extent pointers.