Back to List Inventory Complete Backward Forward Plain Coloured Gaudy This code in plain text |
Browsing parserm.h
DebugToken (lines 4256-4288)
4256 [ DebugToken token;
4257 AnalyseToken(token);
4258 switch(found_ttype)
4259 { ILLEGAL_TT: print ", token, ">";
4260 ELEMENTARY_TT:
4261 switch(found_tdata)
4262 { NOUN_TOKEN: print "noun";
4263 HELD_TOKEN: print "held";
4264 MULTI_TOKEN: print "multi";
4265 MULTIHELD_TOKEN: print "multiheld";
4266 MULTIEXCEPT_TOKEN: print "multiexcept";
4267 MULTIINSIDE_TOKEN: print "multiinside";
4268 CREATURE_TOKEN: print "creature";
4269 SPECIAL_TOKEN: print "special";
4270 NUMBER_TOKEN: print "number";
4271 TOPIC_TOKEN: print "topic";
4272 ENDIT_TOKEN: print "END";
4273 }
4274 PREPOSITION_TT:
4275 print "'", (address) found_tdata, "'";
4276 ROUTINE_FILTER_TT:
4277 #ifdef INFIX; print "noun=", (InfixPrintPA) found_tdata;
4278 #ifnot; print "noun=Routine(", found_tdata, ")"; #endif;
4279 ATTR_FILTER_TT:
4280 print (DebugAttribute) found_tdata;
4281 SCOPE_TT:
4282 #ifdef INFIX; print "scope=", (InfixPrintPA) found_tdata;
4283 #ifnot; print "scope=Routine(", found_tdata, ")"; #endif;
4284 GPR_TT:
4285 #ifdef INFIX; print (InfixPrintPA) found_tdata;
4286 #ifnot; print "Routine(", found_tdata, ")"; #endif;
4287 }
4288 ];
|