File psl-1983/3-1/tests/20/main9.init from the latest check-in
(FLAG (QUOTE (INIT20 PUTC20 GETC20 TIMC20 QUIT20 ERR20 PUTI20)) (QUOTE FOREIGNFUNCTION)) (GLOBAL (QUOTE (IN!* OUT!*))) (FLUID (QUOTE (UNDEFNCODE!* UNDEFNNARG!*))) (FLUID (QUOTE (UNDEFNCODE!* UNDEFNNARG!*))) (FLUID (QUOTE (TESTLIST TESTLIST2 LONGLIST EVALFORM))) (GLOBAL (QUOTE (TESTGLOBALVAR))) (FLUID (QUOTE (HEAP!-WARN!-LEVEL)))