parseArgs: return number of arguments

apps/at28w/main.asm

@@ -14,7 +14,8 @@ at28wMain:
 	ld	de, .argspecs
 	ld	ix, AT28W_MAXBYTES
 	call	parseArgs
-	jr	z, at28wInner
+	cp	0xff
+	jr	nz, at28wInner
 	; bad args
 	ld	a, SHELL_ERR_BAD_ARGS
 	ret

apps/zasm/main.asm

@@ -27,7 +27,8 @@ zasmMain:
 	ld	de, .argspecs
 	ld	ix, ZASM_RAMSTART
 	call	parseArgs
-	jr	z, .goodargs
+	cp	0xff
+	jr	nz, .goodargs
 	; bad args
 	ld	hl, 0
 	ld	de, 0

kernel/parse.asm

@@ -90,12 +90,13 @@ parseArgs:
 	ld	(ix+1), a
 	ld	(ix+2), a
 	ld	b, PARSE_ARG_MAXCOUNT
-.loop:
+
 	ld	a, (hl)
 	; is this the end of the line?
 	or	a		; cp 0
-	jr	z, .endofargs
+	jr	z, .noargs
 
+.loop:
 	; Get the specs
 	ld	a, (de)
 	bit	0, a		; do we have an arg?
@@ -108,6 +109,7 @@ parseArgs:
 	; it a day. Little endian, remember
 	ld	(ix), l
 	ld	(ix+1), h
+	dec b
 	jr	.success	; directly to success: skip endofargs checks
 
 .notAString:
@@ -134,6 +136,12 @@ parseArgs:
 	jr	nz, .error
 	inc	hl
 .nospacecheck:
+
+	ld	a, (hl)
+	; is this the end of the line?
+	or	a		; cp 0
+	jr	z, .endofargs
+
 	djnz	.loop
 	; If we get here, it means that our next char *has* to be a null char
 	ld	a, (hl)
@@ -142,6 +150,8 @@ parseArgs:
 	jr	.error
 
 .endofargs:
+    dec b
+.noargs:
 	; We encountered our null char. Let's verify that we either have no
 	; more args or that they are optional
 	ld	a, (de)
@@ -151,10 +161,11 @@ parseArgs:
 	jr	z, .error	; if unset, arg is not optional. error
 	; success
 .success:
-	xor	a
+	ld	a, PARSE_ARG_MAXCOUNT
+	sbc a, b
 	jr	.end
 .error:
-	inc	a
+	ld	a, 0xff
 .end:
 	pop	ix
 	pop	hl

kernel/shell.asm

@@ -155,8 +155,8 @@ shellParse:
 	; We're ready to parse args
 	ld	ix, SHELL_CMD_ARGS
 	call	parseArgs
-	or	a		; cp 0
-	jr	nz, .parseerror
+	cp	0xff
+	jr	z, .parseerror
 
 	; Args parsed, now we can load the routine address and call it.
 	; let's have DE point to the jump line