renumbas: warn if input is A+ or Integer.

1 files changed, 9 insertions, 0 deletions

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();