github.com/Interlisp.medley
1
0
Fork 0
mirror of synced 2026-01-25 20:06:44 +00:00
Code Issues Projects Releases Wiki Activity

Update SYSEDIT to load exports.all when running run-medley -new

Browse Source
This commit is contained in:
Larry Masinter
2021-08-06 07:41:06 -07:00
parent d64e9282bf
commit a2fdebbfa0
2 changed files with 27 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
library/SYSEDIT
View File

@@ -1,9 +1,9 @@
(DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP")
(FILECREATED " 6-May-2021 16:22:01" {DSK}<home>larry>ilisp>medley>library>SYSEDIT.;6 1312
(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10 FORMAT XCCS)
(FILECREATED " 6-Aug-2021 07:35:16" {DSK}<home>larry>ilisp>medley>library>SYSEDIT.;2 1183
changes to%: (VARS SYSEDITCOMS)
previous date%: "12-Jun-90 15:31:15" {DSK}<home>larry>ilisp>medley>library>SYSEDIT.;1)
previous date%: " 6-May-2021 16:22:01" {DSK}<home>larry>ilisp>medley>library>SYSEDIT.;1)
(* ; "
@@ -20,10 +20,8 @@ Copyright (c) 1984, 1987, 1990, 2021 by Venue & Xerox Corporation.
(GLOBALVARFLG T)
(CLISPIFTRANFLG T)
(CROSSCOMPILING 'ASK))
(P (RESETVARS ((CROSSCOMPILING T)
(DIRECTORIES DIRECTORIES))
(FILESLOAD (SOURCE)
EXPORTS.ALL])
(P (RESETVARS ((CROSSCOMPILING T))
(LOAD? 'EXPORTS.ALL])
(RPAQQ CLISPIFYPRETTYFLG NIL)
@@ -39,10 +37,8 @@ Copyright (c) 1984, 1987, 1990, 2021 by Venue & Xerox Corporation.
(RPAQQ CROSSCOMPILING ASK)
(RESETVARS ((CROSSCOMPILING T)
(DIRECTORIES DIRECTORIES))
(FILESLOAD (SOURCE)
EXPORTS.ALL))
(RESETVARS ((CROSSCOMPILING T))
(LOAD? 'EXPORTS.ALL))
(PUTPROPS SYSEDIT COPYRIGHT ("Venue & Xerox Corporation" 1984 1987 1990 2021))
(DECLARE%: DONTCOPY
(FILEMAP (NIL)))

21
library/SYSEDIT.LCOM
View File

@@ -1 +1,20 @@
(DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP")
(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10 FORMAT XCCS)
(FILECREATED " 6-Aug-2021 07:36:12" ("compiled on " {DSK}<home>larry>ilisp>medley>library>SYSEDIT.;2)
" 6-Aug-2021 07:14:33" bcompl'd in "FULL 5-Aug-2021 ..." dated " 5-Aug-2021 22:24:43")
(FILECREATED " 6-Aug-2021 07:35:16" {DSK}<home>larry>ilisp>medley>library>SYSEDIT.;2 1183 changes to%:
(VARS SYSEDITCOMS) previous date%: " 6-May-2021 16:22:01"
{DSK}<home>larry>ilisp>medley>library>SYSEDIT.;1)
(PRETTYCOMPRINT SYSEDITCOMS)
(RPAQQ SYSEDITCOMS ((VARS (CLISPIFYPRETTYFLG) (MSRECORDTRANFLG T) (RECOMPILEDEFAULT (QUOTE CHANGES)) (
CLEANUPOPTIONS (QUOTE (RC F))) (GLOBALVARFLG T) (CLISPIFTRANFLG T) (CROSSCOMPILING (QUOTE ASK))) (P (
RESETVARS ((CROSSCOMPILING T)) (LOAD? (QUOTE EXPORTS.ALL))))))
(RPAQQ CLISPIFYPRETTYFLG NIL)
(RPAQQ MSRECORDTRANFLG T)
(RPAQQ RECOMPILEDEFAULT CHANGES)
(RPAQQ CLEANUPOPTIONS (RC F))
(RPAQQ GLOBALVARFLG T)
(RPAQQ CLISPIFTRANFLG T)
(RPAQQ CROSSCOMPILING ASK)
(RESETVARS ((CROSSCOMPILING T)) (LOAD? (QUOTE EXPORTS.ALL)))
(PUTPROPS SYSEDIT COPYRIGHT ("Venue & Xerox Corporation" 1984 1987 1990 2021))
NIL