Artifact c3fc210c698792b2d2f8af1b97b72ef5685f91fa9a16c272d21c95536c858a25:
- File
psl-1983/3-1/tests/all-test.sorted
— part of check-in
[eb17ceb7f6]
at
2020-04-21 19:40:01
on branch master
— Add Reduce 3.0 to the historical section of the archive, and some more
files relating to version sof PSL from the early 1980s. Thanks are due to
Paul McJones and Nelson Beebe for these, as well as to all the original
authors.git-svn-id: https://svn.code.sf.net/p/reduce-algebra/code/historical@5328 2bfe0521-f11c-4a00-b80e-6202646ff360 (user: arthurcnorman@users.sourceforge.net, size: 23439) [annotate] [blame] [check-ins using] [more...]
2964 lines, 316 procedures found SYSWRITEREC (FILEDESCRIPTOR, STRINGTOWRITE, STRINGLE P20T:XXX-SYSTE 123/7 !%COPY!-FUNCTION!-CELL EXPR 2) % FROM TO P20T:XXX-HEADE 128/20 !%RECLAIM(); MINI-GC 9/1 !%STORE!-JCALL EXPR 2) % CODEADDRESS, STORAGE ADDRESS P20T:XXX-HEADE 122/19 "PK:BINDING.RED"$ SUB6 3/1 "PT:IO-DATA.RED"$ SUB7 6/2 "PT:MINI-ARITHMETIC.RED"$ SUB5 8/3 "PT:MINI-CARCDR.RED"$ SUB5 9/4 "PT:MINI-CHAR-IO.RED"$ SUB2 3/1 "PT:MINI-COMP-SUPPORT.RED"$ SUB3 5/3 "PT:MINI-CONS-MKVECT.RED"$ SUB3 4/2 "PT:MINI-DSKIN.RED"$ SUB7 8/4 "PT:MINI-EASY-NON-SL.RED"$ SUB5 11/6 "PT:MINI-EASY-SL.RED"$ SUB5 10/5 "PT:MINI-EQUAL.RED"$ SUB4 6/1 "PT:MINI-ERROR-ERRORSET.RED"$ SUB2 5/3 "PT:MINI-ERROR-HANDLERS.RED"$ SUB2 6/4 "PT:MINI-EVAL-APPLY.RED"$ SUB5 12/7 "PT:MINI-GC.RED"$ STUBS3 4/1 "PT:MINI-IO-ERRORS.RED"$ SUB7 7/3 "PT:MINI-KNOWN-TO-COMP.RED"$ SUB5 13/8 "PT:MINI-LOOP-MACROS.RED"$ SUB5 14/9 "PT:MINI-OBLIST.RED"$ SUB5 16/11 "PT:MINI-OPEN-CLOSE.RED"$ SUB7 9/5 "PT:MINI-OTHERS-SL.RED"$ SUB5 15/10 "PT:MINI-PRINTERS.RED"$ SUB2 4/2 "PT:MINI-PRINTF.RED"$ STUBS6 3/1 "PT:MINI-PROPERTY-LIST.RED"$ SUB5 17/12 "PT:MINI-PUTD-GETD.RED"$ SUB6 6/3 "PT:MINI-RDS-WRS.RED"$ SUB7 10/6 "PT:MINI-READ.RED"$ SUB4 8/3 "PT:MINI-SEQUENCE.RED"$ SUB3 7/4 "PT:MINI-SYMBOL-VALUES.RED"$ SUB5 18/13 "PT:MINI-TOKEN.RED"$ SUB4 7/2 "PT:MINI-TOP-LOOP.RED"$ STUBS6 4/2 "PT:MINI-TYPE-CONVERSIONS.RED"$ SUB5 19/14 "PT:MINI-TYPE-ERRORS.RED"$ SUB2 7/5 "PT:P-ALLOCATORS.RED"$ SUB3 3/1 "PT:P-APPLY-LAP.RED"$ SUB5 6/2 "PT:P-FAST-BINDER.RED"$ SUB6 4/2 "PT:P-FUNCTION-PRIMITIVES.RED"$ MAIN4 6/2 "PT:P-FUNCTION-PRIMITIVES.RED"$ SUB5 5/1 "PT:PSL-TIMER.SL"$ MAIN7 11/7 "PT:STUBS3.RED"$ MAIN3 7/2 "PT:STUBS3.RED"$ MAIN4 8/4 "PT:STUBS3.RED"$ MAIN5 5/2 "PT:STUBS3.RED"$ MAIN6 6/2 "PT:STUBS3.RED"$ MAIN7 6/2 "PT:STUBS4.RED"$ MAIN4 7/3 "PT:STUBS4.RED"$ MAIN5 6/3 "PT:STUBS4.RED"$ MAIN6 7/3 "PT:STUBS4.RED"$ MAIN7 7/3 "PT:STUBS5.RED"$ MAIN5 7/4 "PT:STUBS5.RED"$ MAIN6 8/4 "PT:STUBS5.RED"$ MAIN7 8/4 "PT:STUBS6.RED"$ MAIN6 9/5 "PT:STUBS6.RED"$ MAIN7 9/5 "PT:STUBS7.RED"$ MAIN7 10/6 "PT:SYSTEM-IO.RED"$ SUB7 11/7 "XXX-HEADER.RED"$ MAIN2 6/1 "XXX-HEADER.RED"$ MAIN3 6/1 "XXX-HEADER.RED"$ MAIN4 5/1 "XXX-HEADER.RED"$ MAIN5 4/1 "XXX-HEADER.RED"$ MAIN6 5/1 "XXX-HEADER.RED"$ MAIN7 5/1 "XXX-SYSTEM-IO.RED"$ SUB7 5/1 ADD1 N; MINI-ARITHMETI 12/3 ALPHAESCP X; MINI-TOKEN 150/20 ALPHANUMESCP X; MINI-TOKEN 156/22 ALPHANUMP X; MINI-TOKEN 153/21 ALPHAP(X); MINI-TOKEN 138/16 APPEND(U,V); MINI-EASY-SL 13/2 APPLY(FN,A); MINI-EVAL-APPL 43/3 ATOM X; MINI-EASY-SL 8/1 ATSOC(X,Y); MINI-EASY-NON- 3/1 BINDEVAL(FORMALS, ARGS); P-APPLY-LAP 363/4 BINDEVALAUX(FORMALS, ARGS, N); P-APPLY-LAP 366/5 BINDINGTEST; MAIN6 55/8 BLDMSG(FMT,A1,A2,A3,A4,A5,A6); MINI-PRINTF 3/1 BUFFERTOSTRING N; MINI-TOKEN 59/7 CAAR X; MINI-CARCDR 13/3 CADR X; MINI-CARCDR 16/4 CAR X; MINI-CARCDR 5/1 CASETEST; MAIN3 23/4 CBIND1(X,CFL1,CFL2); MAIN6 139/15 CBIND2(); MAIN6 149/16 CDAR X; MINI-CARCDR 19/5 CDDR X; MINI-CARCDR 22/6 CDR X; MINI-CARCDR 8/2 CHANNELPRIN2(CHN,X); MINI-PRINTERS 102/16 CHANNELWRITECHAR(CHN,X); MINI-CHAR-IO 3/1 CLEARCOMMENT(); MINI-TOKEN 45/5 CLEARWHITE(); MINI-TOKEN 41/4 CLOSE N; MINI-OPEN-CLOS 8/2 CODEAPPLY(CODEPTR, ARGLIST); P-APPLY-LAP 53/1 CODEEVALAPPLY EXPR 2) P-APPLY-LAP 206/2 CODEEVALAPPLYAUX(CODEPTR, ARGLIST, P); P-APPLY-LAP 213/3 CODEP X; MINI-KNOWN-TO- 3/1 CODEPRIMITIVE EXPR 15) P-FUNCTION-PRI 121/9 COMPBINDTEST(); MAIN6 129/14 COMPILED1(XXX,YYY); MAIN6 117/12 COMPILED1; MAIN4 124/8 COMPILED2(XXX,YYY); MAIN6 122/13 COMPILED2; MAIN4 128/9 COMPILED3(A1,A2,A3,A4); MAIN4 132/10 COMPILEDCALLINGINTERPRETED EXPR 15) P-FUNCTION-PRI 136/10 COMPILEDCALLINGINTERPRETEDAUX(); MAIN4 155/12 COMPILEDCALLINGINTERPRETEDAUX(); P-APPLY-LAP 381/6 COMPILEDCALLINGINTERPRETEDAUXAUX FN; P-APPLY-LAP 391/8 COND X; MINI-EASY-SL 51/9 CONS(X,Y); MINI-CONS-MKVE 14/2 CONSTEST(); MAIN3 56/7 COPYD(NEWID,OLDID); MINI-EASY-NON- 18/5 CTEST N; MAIN3 41/5 DASHED(M); STUBS4 7/2 DATE; P20T:XXX-HEADE 112/16 DE(X); MINI-EASY-SL 60/12 DEC20OPEN EXPR 3) P20T:XXX-SYSTE 64/4 DEC20READCHAR EXPR 1) P20T:XXX-SYSTE 98/6 DEC20WRITECHAR EXPR 2) P20T:XXX-SYSTE 130/8 DELATQ(X,Y); MINI-EASY-NON- 28/6 DF(X); MINI-EASY-SL 63/13 DIFFERENCE(N1,N2); MINI-ARITHMETI 27/7 DIGITP X; MINI-TOKEN 135/15 DM(X); MINI-EASY-SL 69/15 DN(X); MINI-EASY-SL 66/14 DOLAMBDA(VARS,BODY,ARGS); MINI-EVAL-APPL 71/6 DOTTED(M); STUBS4 12/3 DSKIN F; MINI-DSKIN 12/2 EQ(X,Y); MINI-KNOWN-TO- 12/4 EQCAR(X,Y); MINI-EASY-NON- 15/4 EQSTR(S1,S2); MINI-EQUAL 5/1 ERNAL WARRAY BPS[BPSSIZE]; % COULD DO A DYNAMIC ALL P20T:XXX-HEADE 37/7 ERNAL WARRAY HEAP[HEAPSIZE]; % COULD DO A DYNAMIC A P20T:XXX-HEADE 22/4 ERNAL WARRAY OTHERHEAP[HEAPSIZE]; P20T:XXX-HEADE 30/5 ERNAL WARRAY STACK[STACKSIZE]; P20T:XXX-HEADE 12/2 ERNAL WCONST BPSSIZE = 500; P20T:XXX-HEADE 36/6 ERNAL WCONST HEAPSIZE = 150000; % ENOUGH FOR PSL-TIM P20T:XXX-HEADE 21/3 ERNAL WCONST MAXARGBLOCK = (MAXARGS - MAXREALREGS) - P20T:XXX-HEADE 54/9 ERNAL WCONST STACKSIZE = 5000; P20T:XXX-HEADE 11/1 ERROR S; MINI-ERROR-ERR 7/2 ERRORHEADER; MINI-ERROR-ERR 4/1 ERRORTRAILER S; MINI-ERROR-ERR 11/3 ESCAPEP X; MINI-TOKEN 147/19 EVAL X; MINI-EVAL-APPL 19/2 EVCOND FL; MINI-EASY-SL 45/8 EVLIS X; MINI-EASY-SL 31/5 EVPROGN FL; MINI-EASY-SL 35/6 FASTAPPLY EXPR 0) P-FUNCTION-PRI 153/11 FASTLAMBDAAPPLY(); P-APPLY-LAP 387/7 FATALERROR S; MINI-ERROR-HAN 5/1 FCODEP FN; P-FUNCTION-PRI 91/6 FIRSTCALL; MAIN2 14/2 FIRSTCALL; MAIN3 12/3 FIRSTCALL; MAIN4 15/5 FIRSTCALL; MAIN5 13/5 FIRSTCALL; MAIN6 15/6 FIRSTCALL; MAIN7 17/8 FLAG EXPR 2) % DUMMY FOR INIT P20T:XXX-HEADE 142/22 FLAMBDALINKP FN; P-FUNCTION-PRI 79/4 FUNBOUNDP FN; P-FUNCTION-PRI 65/2 FUNCALL(FN,I); STUBS6 8/3 FUNCTIONTEST(); MAIN4 74/7 GEQ(N1,N2); MINI-EASY-NON- 9/2 GET(X,Y); MINI-PROPERTY- 9/2 GETC(); P20T:XXX-HEADE 98/12 GETD(FN); MINI-PUTD-GETD 6/1 GETFCODEPOINTER U; P-FUNCTION-PRI 106/8 GETFNTYPE X; MINI-PROPERTY- 38/5 GETLAMBDA(FN); MINI-EVAL-APPL 89/8 GREATERP(N1,N2); MINI-ARITHMETI 21/5 GTHEAP N; MINI-ALLOCATOR 14/1 GTID(); MINI-ALLOCATOR 48/5 GTSTR N; MINI-ALLOCATOR 27/2 GTVECT N; MINI-ALLOCATOR 36/3 GTWARRAY N; MINI-ALLOCATOR 44/4 HARDCONS(X,Y); MINI-CONS-MKVE 6/1 HEAPINFO(); MINI-GC 17/3 IDP X; MINI-KNOWN-TO- 9/3 INF X; STUBS5 22/2 INIT(); P20T:XXX-HEADE 92/11 INITEVAL; MINI-EVAL-APPL 5/1 INITHEAP(); P20T:XXX-HEADE 44/8 INITNEWID(D,S); MINI-TOKEN 105/12 INITREAD; MINI-TOKEN 11/1 INTERN S; MINI-TOKEN 95/11 INTERPTEST(); MAIN6 71/9 IOERROR M; MINI-IO-ERRORS 3/1 IOTEST; MAIN7 61/9 LAMBDAAPPLY(X,A); MINI-EVAL-APPL 60/4 LAMBDAEVALAPPLY(X,Y); MINI-EVAL-APPL 68/5 LAMBDAP(X); MINI-EVAL-APPL 86/7 LAMBIND V; P-FAST-BINDER 23/1 LAPIN F; MINI-DSKIN 25/3 LBIND1(X,Y); MAIN5 67/10 LENGTH U; MINI-OTHERS-SL 4/1 LENGTH1(U, N); MINI-OTHERS-SL 8/2 LEQ(N1,N2); MINI-EASY-NON- 12/3 LESSP(N1,N2); MINI-ARITHMETI 24/6 LIST X; MINI-EASY-SL 73/16 LIST2(A1,A2); MINI-COMP-SUPP 4/1 LIST3(A1,A2,A3); MINI-COMP-SUPP 7/2 LIST4(A1,A2,A3,A4); MINI-COMP-SUPP 10/3 LIST5(A1,A2,A3,A4,A5); MINI-COMP-SUPP 13/4 LONGDIV(X,Y); P20T:XXX-HEADE 151/24 LONGREMAINDER(X,Y); P20T:XXX-HEADE 154/25 LONGTIMES(X,Y); P20T:XXX-HEADE 148/23 LOOKUPID(S); MINI-TOKEN 115/13 LOWERCASEP X; MINI-TOKEN 144/18 MAIN!. EXPR 0) P20T:XXX-HEADE 68/10 MAKEFCODE(U, CODEPTR); P-FUNCTION-PRI 96/7 MAKEFLAMBDALINK D; P-FUNCTION-PRI 85/5 MAKEFUNBOUND(D); P-FUNCTION-PRI 73/3 MAPOBL(FN); MINI-OBLIST 6/1 MEMQ(X,Y); MINI-EASY-SL 17/3 MINUS(X); MINI-ARITHMETI 8/2 MKITEM(X,Y); STUBS5 28/4 MKSTRING(L, C); MINI-SEQUENCE 5/1 MKVECT N; MINI-CONS-MKVE 23/5 MORESTUFF; MAIN4 68/6 NCONS X; MINI-CONS-MKVE 20/4 NONIDERROR(X,Y); MINI-TYPE-ERRO 28/3 NONINTEGERERROR(OFFENDER, FN); MINI-TYPE-ERRO 34/5 NONNUMBERERROR(OFFENDER, FN); MINI-TYPE-ERRO 31/4 NONPOSITIVEINTEGERERROR(OFFENDER, FN); MINI-TYPE-ERRO 37/6 NOT X; MINI-KNOWN-TO- 18/6 NULL X; MINI-KNOWN-TO- 15/5 OPEN(FILENAME,HOW); MINI-OPEN-CLOS 3/1 PAIRP X; MINI-KNOWN-TO- 6/2 PBLANK; MINI-PRINTERS 30/5 PLUS2(X,Y); MINI-ARITHMETI 4/1 PRIN1 X; MINI-PRINTERS 8/1 PRIN1ID X; MINI-PRINTERS 45/8 PRIN1INT X; MINI-PRINTERS 33/6 PRIN1INTX X; MINI-PRINTERS 40/7 PRIN1PAIR X; MINI-PRINTERS 67/12 PRIN1STRING X; MINI-PRINTERS 53/10 PRIN2 X; MINI-PRINTERS 15/2 PRIN2ID X; MINI-PRINTERS 50/9 PRIN2PAIR X; MINI-PRINTERS 78/13 PRIN2STRING X; MINI-PRINTERS 60/11 PRIN2T X; MINI-PRINTERS 25/4 PRINT X; MINI-PRINTERS 22/3 PRINT1FEXPR(X); MINI-OBLIST 12/3 PRINT1FUNCTION(X); MINI-OBLIST 18/5 PRINTFEXPRS; MINI-OBLIST 9/2 PRINTFUNCTIONS; MINI-OBLIST 15/4 PROGBIND V; P-FAST-BINDER 32/2 PROGN X; MINI-EASY-SL 42/7 PROP X; MINI-PROPERTY- 5/1 PRTITM X; MINI-PRINTERS 92/15 PUT(X,Y,Z); MINI-PROPERTY- 17/3 PUTC X; P20T:XXX-HEADE 105/14 PUTD(FN,TYPE,BODY); MINI-PUTD-GETD 21/2 PUTINT I; P20T:XXX-HEADE 118/18 QUIT; P20T:XXX-HEADE 109/15 QUOTE A; MINI-EASY-SL 54/10 RAISECHAR C; MINI-TOKEN 88/10 RATOM; MINI-TOKEN 24/3 RDS N; MINI-RDS-WRS 5/1 READ1(X); MINI-READ 10/2 READ; MINI-READ 6/1 READID; MINI-TOKEN 77/9 READINT; MINI-TOKEN 50/6 READLIST(X); MINI-READ 15/3 READSTR; MINI-TOKEN 67/8 RECLAIM(); MINI-GC 13/2 REMPROP(X,Y); MINI-PROPERTY- 28/4 RESET(); SUB6 8/4 REVERSE U; MINI-EASY-SL 22/4 SAVEREGISTERS(A1, A2, A3, A4, A5, P-FUNCTION-PRI 193/12 SET(X,Y); MINI-SYMBOL-VA 3/1 SETQ A; MINI-EASY-SL 57/11 SETRAISE X; MINI-TOKEN 21/2 SHOULDBE(M,V,E); STUBS4 18/4 SHOW(N,S); MAIN3 49/6 SPACED(M); STUBS4 3/1 STDERROR M; MINI-ERROR-HAN 8/2 SUB1 N; MINI-ARITHMETI 16/4 SYMFNCBASE D; % THE ADDRESS OF CELL, P-FUNCTION-PRI 57/1 SYS2FIXN N; MINI-TYPE-CONV 9/2 SYS2INT N; %. CONVERT WORD TO LISP NUMBER MINI-TYPE-CONV 5/1 SYSCLEARIO EXPR 0) P20T:XXX-SYSTE 30/1 SYSCLOSE EXPR 1) P20T:XXX-SYSTE 145/9 SYSMAXBUFFER(FILEDESC); P20T:XXX-SYSTE 154/10 SYSOPENREAD(CHANNEL,FILENAME); P20T:XXX-SYSTE 44/2 SYSOPENWRITE(CHANNEL,FILENAME); P20T:XXX-SYSTE 56/3 SYSREADREC(FILEDESCRIPTOR,STRINGBUFFER); P20T:XXX-SYSTE 83/5 TAG X; STUBS5 25/3 TERPRI(); MINI-PRINTERS 89/14 TESTAPPLY(MSG,FN,ANSWER); MAIN6 107/11 TESTFASTAPPLY EXPR 0) MAIN6 102/10 TESTGET(); MAIN5 49/7 TESTSERIES(); MAIN5 45/6 TESTSERIES(); MAIN6 48/7 TESTUNDEFINED; MAIN5 59/8 TIMC(); P20T:XXX-HEADE 102/13 TIME(); MINI-TOP-LOOP 3/1 TIMES2(N1,N2); MINI-ARITHMETI 31/8 TYPEERROR(OFFENDER, FN, TYP); MINI-TYPE-ERRO 3/1 TYPEFILE F; MINI-DSKIN 3/1 UNBINDN N; MAIN5 64/9 UNDEFINEDFUNCTION EXPR 0) % FOR MISSING FUNCTION P20T:XXX-HEADE 135/21 UNDEFINEDFUNCTIONAUX EXPR 0) P-FUNCTION-PRI 214/13 UNDEFINEDFUNCTIONAUX; MAIN2 77/3 UNDEFINEDFUNCTIONAUX; MAIN3 68/8 UNDEFINEDFUNCTIONAUXAUX ; MAIN4 142/11 UNDEFINEDFUNCTIONAUXAUX; STUBS5 6/1 UPPERCASEP X; MINI-TOKEN 141/17 USAGETYPEERROR(OFFENDER, FN, TYP, USAGE); MINI-TYPE-ERRO 14/2 VERSIONNAME; P20T:XXX-HEADE 115/17 WHILE FL; MINI-LOOP-MACR 3/1 WHITEP X; MINI-TOKEN 131/14 WRITECHAR CH; MINI-CHAR-IO 6/2 WRS N; MINI-RDS-WRS 13/2 XCONS(X,Y); MINI-CONS-MKVE 17/3