C64 ROM: Routine at AD8A

AD8A: evaluate expression and check type mismatch

Used by the routines at A742, B3F4, B79E, B7EB and E12A.
AD8A	20 9E AD	JSR $AD9E	evaluate expression
This entry point is used by the routines at A742, AD9E, AE58, AFA7, B1B2, B3B3, B3E1, B3F4 and B465. check if source and destination are numeric
AD8D	18	CLC
AD8E		.BYTE $24	makes next line BIT $38
This entry point is used by the routines at AFA7, B63D and B6A3. check if source and destination are string
AD8F	38	SEC	destination is string
This entry point is used by the routines at A9A5 and B016. type match check, set C for string, clear C for numeric
AD90	24 0D	BIT $0D	test data type flag, $FF = string, $00 = numeric
AD92	30 03	BMI $AD97	branch if string
AD94	B0 03	BCS $AD99	if destiantion is numeric do type missmatch error
AD96	60	RTS
AD97	B0 FD	BCS $AD96	exit if destination is string
do type mismatch error
AD99	A2 16	LDX #$16	error code $16, type mismatch error
AD9B	4C 37 A4	JMP $A437	do error #X then warm start