X-Git-Url: https://jxself.org/git/?a=blobdiff_plain;f=src%2Fexpressp.c;h=c93337ae885a4b57d9592598ba39c09507505b72;hb=99330473407e30340c77cd03cf74dd6ed24a5d15;hp=0e0cf6f2773002c9b501d693cba43d5b2832ef0e;hpb=8e63120c630c94c598d4e2d6ba823dac59bce8fa;p=inform.git diff --git a/src/expressp.c b/src/expressp.c index 0e0cf6f..c93337a 100644 --- a/src/expressp.c +++ b/src/expressp.c @@ -1,7 +1,7 @@ /* ------------------------------------------------------------------------- */ /* "expressp" : The expression parser */ /* */ -/* Part of Inform 6.40 */ +/* Part of Inform 6.41 */ /* copyright (c) Graham Nelson 1993 - 2022 */ /* */ /* Inform is free software: you can redistribute it and/or modify */ @@ -145,7 +145,6 @@ but not used as a value:", unicode); because there could be another definition coming. */ if (symbols[symbol].flags & REPLACE_SFLAG) { current_token.marker = SYMBOL_MV; - if (module_switch) import_symbol(symbol); v = symbol; break; } @@ -157,7 +156,7 @@ but not used as a value:", unicode); case OBJECT_T: case CLASS_T: /* All objects must be backpatched in Glulx. */ - if (module_switch || glulx_mode) + if (glulx_mode) current_token.marker = OBJECT_MV; break; case ARRAY_T: @@ -167,12 +166,10 @@ but not used as a value:", unicode); current_token.marker = STATIC_ARRAY_MV; break; case INDIVIDUAL_PROPERTY_T: - if (module_switch) current_token.marker = IDENT_MV; break; case CONSTANT_T: if (symbols[symbol].flags & (UNKNOWN_SFLAG + CHANGE_SFLAG)) { current_token.marker = SYMBOL_MV; - if (module_switch) import_symbol(symbol); v = symbol; } else current_token.marker = 0; @@ -1512,7 +1509,6 @@ static void check_property_operator(int from_node) && ((ET[n].value.type == LONG_CONSTANT_OT) || (ET[n].value.type == SHORT_CONSTANT_OT)) && ((ET[n].value.value > 0) && (ET[n].value.value < 64)) - && (!module_switch) && (ET[n].value.marker == 0)) flag = TRUE;