1
0
mirror of synced 2026-04-27 20:48:58 +00:00

add merge in Ron's 11/21/2020 lispcore

This commit is contained in:
Larry Masinter
2020-11-21 13:24:44 -08:00
parent e9a80b1144
commit ce4eae736e
794 changed files with 117194 additions and 0 deletions

60
CLTL2/SEDIT-EXPORTS Normal file
View File

@@ -0,0 +1,60 @@
(DEFINE-FILE-INFO READTABLE "XCL" PACKAGE (DEFPACKAGE SEDIT (USE LISP XCL)))
(IL:FILECREATED " 8-Apr-92 21:50:30" IL:|{DSK}<usr>local>lde>lispcore>sources>SEDIT-EXPORTS.;2| 2475
IL:|changes| IL:|to:| (IL:VARS IL:SEDIT-EXPORTSCOMS)
IL:|previous| IL:|date:| "17-May-90 11:01:36"
IL:|{DSK}<usr>local>lde>lispcore>sources>SEDIT-EXPORTS.;1|)
; Copyright (c) 1987, 1988, 1990, 1992 by Venue & Xerox Corporation. All rights reserved.
(IL:PRETTYCOMPRINT IL:SEDIT-EXPORTSCOMS)
(IL:RPAQQ IL:SEDIT-EXPORTSCOMS ((IL:PROP IL:FILETYPE IL:SEDIT-EXPORTS) (IL:PROP IL:MAKEFILE-ENVIRONMENT IL:SEDIT-EXPORTS) (IL:DECLARE\: IL:DONTCOPY IL:DOEVAL@COMPILE (IL:FILES IL:SEDIT-DECLS)) (IL:* IL:|;;| "REGION MANAGER") (IL:P (EXPORT (QUOTE (GET-WINDOW-REGION SAVE-WINDOW-REGION))) (EXPORT (QUOTE (KEEP-WINDOW-REGION)))) (IL:* IL:|;;| "PROGRAMMERS INTERFACE") (IL:P (EXPORT (QUOTE (SEDIT RESET ADD-COMMAND RESET-COMMANDS DEFAULT-COMMANDS GET-PROMPT-WINDOW GET-SELECTION REPLACE-SELECTION))) (EXPORT (QUOTE (*GETDEF-FN* *FETCH-DEFINITION-ERROR-BREAK-FLAG* *GETDEF-ERROR-FN* *EDIT-FN* *COMPILE-FN*)))) (IL:* IL:|;;| "OPTIONS") (IL:P (EXPORT (QUOTE (*CLEAR-LINEAR-ON-COMPLETION* *WRAP-SEARCH* *WRAP-PARENS* *POPULAR-PACKAGES* CONVERT-UPGRADE)))) (IL:* IL:|;;| "FORMATTING STUFF ") (IL:P (EXPORT (QUOTE (GET-FORMAT RESET-FORMATS DEF-LIST-FORMAT))) (EXPORT (QUOTE (*INDENT-ALIST*))))))
(IL:PUTPROPS IL:SEDIT-EXPORTS IL:FILETYPE :COMPILE-FILE)
(IL:PUTPROPS IL:SEDIT-EXPORTS IL:MAKEFILE-ENVIRONMENT (:READTABLE "XCL" :PACKAGE (DEFPACKAGE IL:SEDIT (:USE IL:LISP IL:XCL))))
(IL:DECLARE\: IL:DONTCOPY IL:DOEVAL@COMPILE
(IL:FILESLOAD IL:SEDIT-DECLS)
)
(IL:* IL:|;;| "REGION MANAGER")
(EXPORT (QUOTE (GET-WINDOW-REGION SAVE-WINDOW-REGION)))
(EXPORT (QUOTE (KEEP-WINDOW-REGION)))
(IL:* IL:|;;| "PROGRAMMERS INTERFACE")
(EXPORT (QUOTE (SEDIT RESET ADD-COMMAND RESET-COMMANDS DEFAULT-COMMANDS GET-PROMPT-WINDOW GET-SELECTION REPLACE-SELECTION)))
(EXPORT (QUOTE (*GETDEF-FN* *FETCH-DEFINITION-ERROR-BREAK-FLAG* *GETDEF-ERROR-FN* *EDIT-FN* *COMPILE-FN*)))
(IL:* IL:|;;| "OPTIONS")
(EXPORT (QUOTE (*CLEAR-LINEAR-ON-COMPLETION* *WRAP-SEARCH* *WRAP-PARENS* *POPULAR-PACKAGES* CONVERT-UPGRADE)))
(IL:* IL:|;;| "FORMATTING STUFF ")
(EXPORT (QUOTE (GET-FORMAT RESET-FORMATS DEF-LIST-FORMAT)))
(EXPORT (QUOTE (*INDENT-ALIST*)))
(IL:PUTPROPS IL:SEDIT-EXPORTS IL:COPYRIGHT ("Venue & Xerox Corporation" 1987 1988 1990 1992))
(IL:DECLARE\: IL:DONTCOPY
(IL:FILEMAP (NIL)))
IL:STOP