| Back to List Inventory
Complete Backward
Forward Plain
Coloured
Gaudy This code
in plain text |
Browsing parserm.h
DebugToken (lines 5276-5318)
5276 [ DebugToken token;
5277 AnalyseToken(token);
5278 switch (found_ttype) {
5279 ILLEGAL_TT:
5280 print ", token, ">";
5281 ELEMENTARY_TT:
5282 switch (found_tdata) {
5283 NOUN_TOKEN: print "noun";
5284 HELD_TOKEN: print "held";
5285 MULTI_TOKEN: print "multi";
5286 MULTIHELD_TOKEN: print "multiheld";
5287 MULTIEXCEPT_TOKEN: print "multiexcept";
5288 MULTIINSIDE_TOKEN: print "multiinside";
5289 CREATURE_TOKEN: print "creature";
5290 SPECIAL_TOKEN: print "special";
5291 NUMBER_TOKEN: print "number";
5292 TOPIC_TOKEN: print "topic";
5293 ENDIT_TOKEN: print "END";
5294 }
5295 PREPOSITION_TT:
5296 print "'", (address) found_tdata, "'";
5297 ROUTINE_FILTER_TT:
5298 #Ifdef INFIX;
5299 print "noun=", (InfixPrintPA) found_tdata;
5300 #Ifnot;
5301 print "noun=Routine(", found_tdata, ")";
5302 #Endif; ! INFIX
5303 ATTR_FILTER_TT:
5304 print (DebugAttribute) found_tdata;
5305 SCOPE_TT:
5306 #Ifdef INFIX;
5307 print "scope=", (InfixPrintPA) found_tdata;
5308 #Ifnot;
5309 print "scope=Routine(", found_tdata, ")";
5310 #Endif; ! INFIX
5311 GPR_TT:
5312 #Ifdef INFIX;
5313 print (InfixPrintPA) found_tdata;
5314 #Ifnot;
5315 print "Routine(", found_tdata, ")";
5316 #Endif; ! INFIX
5317 }
5318 ];
|
