InfixPrintPA (lines 53-60)
Back to List
Browsing infix.h
0053 [ InfixPrintPA x n;
0054 for (n=#lowest_routine_number:n<=#highest_routine_number:n++)
0055 { if (x == Symb__Tab(INFIXTT_ROUTINE, n))
0056 { print (InfixPrintRoutine) n; return;
0057 }
0058 }
0059 print "Routine(", x, ")";
0060 ];
Last updated 27 February 2004.
This site is no longer supported; information may be out of date.
Maintained as a historical archive by the Interactive Fiction Technology Foundation.
Copyright 1993-2018 IFTF, CC-BY-SA unless otherwise noted.
This page was originally managed by Graham Nelson (graham@gnelson.demon.co.uk) assisted by C Knight.