push	psw			; save exception "or-flag"
;
; process list of exception choices
;
exchnd3:call	insymbol
	cpi	42			; OTHERS?
	jnz	exchnd1
;
; choice OTHERS found, see if it is alone
;
	call	insymbol		; get =>
	pop	psw			; recover or-flag
	ora	a
	jz	exchnd32
	call	perror
	db	127
;
exchnd32:lda	token
	cpi	83			; =>?
	jz	exchnd33
	call	perror
	db	105
;
exchnd33:lxi