|
|
1.1 ! root 1: (setq SCCS-specials.l "@(#)specials.l 1.1 4/27/83") ! 2: ; FP interpreter/compiler ! 3: ; Copyright (c) 1982 Scott B. Baden ! 4: ; Berkeley, California ! 5: ! 6: (declare (special ! 7: DynTraceFlg Measures TracedFns debug traceport level ! 8: piport poport ptport readtable infile outfile newreadtable ! 9: char_num fn_name in_def ! 10: rsrvd e_rsrvd usr_fn_name in_buf char_set ! 11: num_delim$ outfile builtins wslen stk tkn timeIt)) ! 12: ! 13: (declare (macros t)) ! 14: ! 15: (eval-when (compile eval load) ! 16: (or (get 'fpMacs 'loaded) (load 'fpMacs)))
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.