From 80be916389299e76aa84e904b3871a5d0c50b80e Mon Sep 17 00:00:00 2001 From: "B. Watson" Date: Thu, 27 Mar 2025 16:35:41 -0400 Subject: renumbas: warn if input is A+ or Integer. --- renumbas.c | 9 +++++++++ 1 file changed, 9 insertions(+) (limited to 'renumbas.c') diff --git a/renumbas.c b/renumbas.c index 6f4f51e..963f7c1 100644 --- a/renumbas.c +++ b/renumbas.c @@ -122,6 +122,14 @@ void renumber(void) { walk_all_code(); } +void check_basic_type(void) { + if(lomem == 0x77) { + fprintf(stderr, "%s: Warning: OSS Integer BASIC not fully supported.\n", self); + } else if(save_command_tok == 0x1d || save_command_tok == 0x48) { + fprintf(stderr, "%s: Warning: BASIC/A+ not fully supported.\n", self); + } +} + int main(int argc, char **argv) { set_self(*argv); parse_general_args(argc, argv, print_help); @@ -129,6 +137,7 @@ int main(int argc, char **argv) { readfile(); parse_header(); + check_basic_type(); build_ref_table(); renumber(); -- cgit v1.2.3