1*12073Sbaden (setq SCCS-specials.l "@(#)specials.l 1.1 04/27/83") 2*12073Sbaden ; FP interpreter/compiler 3*12073Sbaden ; Copyright (c) 1982 Scott B. Baden 4*12073Sbaden ; Berkeley, California 5*12073Sbaden 6*12073Sbaden (declare (special 7*12073Sbaden DynTraceFlg Measures TracedFns debug traceport level 8*12073Sbaden piport poport ptport readtable infile outfile newreadtable 9*12073Sbaden char_num fn_name in_def 10*12073Sbaden rsrvd e_rsrvd usr_fn_name in_buf char_set 11*12073Sbaden num_delim$ outfile builtins wslen stk tkn timeIt)) 12*12073Sbaden 13*12073Sbaden (declare (macros t)) 14*12073Sbaden 15*12073Sbaden (eval-when (compile eval load) 16*12073Sbaden (or (get 'fpMacs 'loaded) (load 'fpMacs))) 17