diff --git a/thecl/thecl.c b/thecl/thecl.c index 131ce64d..ee74c72b 100644 --- a/thecl/thecl.c +++ b/thecl/thecl.c @@ -252,8 +252,7 @@ print_usage(void) " -r output raw ECL opcodes, applying minimal transformations\n" " -s use simple creation, which doesn't add any instructions automatically\n" "VERSION can be:\n" - " 6, 7, 8, 9, 95, 10, 103 (for Uwabami Breakers), 11, 12, 125, 128, 13, 14, 143, 15, 16, 165, 17 or 18\n" - /* NEWHU: 18 */ + " 6, 7, 8, 9, 95, 10, 103 (for Uwabami Breakers), 11, 12, 125, 128, 13, 14, 143, 15, 16, 165, 17, 18 or 185\n" "Report bugs to <" PACKAGE_BUGREPORT ">.\n", argv0); } @@ -337,7 +336,7 @@ main(int argc, char* argv[]) case 165: case 17: case 18: - /* NEWHU: 18 */ + case 185: module = &th10_ecl; break; default: diff --git a/thecl/thecl10.c b/thecl/thecl10.c index 4b85e708..15a7dda9 100644 --- a/thecl/thecl10.c +++ b/thecl/thecl10.c @@ -1007,7 +1007,25 @@ static const id_format_pair_t th18_fmts[] = { { -1, NULL } }; -/* NEWHU: 18 */ +static const id_format_pair_t th185_fmts[] = { + { 535, "SSSSSSSSS" }, + { 1001, "S" }, + { 1002, "" }, + { 1004, "S" }, + { 1006, "m" }, + { 1011, "SS" }, + { 1013, "SSSSSSSSS" }, + { 1015, "SS" }, + { 1017, "" }, + { 1018, "S" }, + { 1019, "" }, + { 1021, "SS" }, + { 1022, "S" }, + { 1023, "S" }, + { 1024, "S" }, + { 1025, "" }, + { -1, NULL } +}; static const char* th10_find_format( @@ -1024,7 +1042,8 @@ th10_find_format( const char* ret = NULL; switch (version) { - /* NEWHU: 18 */ + case 185: + if ((ret = find_format(th185_fmts, id))) break; /* fallthrough */ case 18: if ((ret = find_format(th18_fmts, id))) break; /* fallthrough */ case 17: