listbas: BASIC/A+ doesn't support hex constants.

1 files changed, 2 insertions, 1 deletions

diff --git a/listbas.c b/listbas.c
index bfe7615..c9a6da2 100644
--- a/listbas.c
+++ b/listbas.c
@@ -638,7 +638,8 @@ int main(int argc, char **argv) {
 	parse_env_args();
 	parse_args(argc, argv, 0);
 
-	if(bas_type != B_ATARI) allow_hex_const = 1;
+	if(bas_type != B_ATARI && bas_type != B_APLUS)
+		allow_hex_const = 1;
 
 	init_token_tables();