diff --git a/sources/CMLSEQ b/obsolete/sources/CMLSEQ similarity index 100% rename from sources/CMLSEQ rename to obsolete/sources/CMLSEQ diff --git a/sources/CMLSEQ.LCOM b/obsolete/sources/CMLSEQ.LCOM similarity index 100% rename from sources/CMLSEQ.LCOM rename to obsolete/sources/CMLSEQ.LCOM diff --git a/sources/CMLWALK b/obsolete/sources/CMLWALK similarity index 100% rename from sources/CMLWALK rename to obsolete/sources/CMLWALK diff --git a/sources/CMLWALK.dfasl b/obsolete/sources/CMLWALK.dfasl similarity index 100% rename from sources/CMLWALK.dfasl rename to obsolete/sources/CMLWALK.dfasl diff --git a/sources/COMMENT b/obsolete/sources/COMMENT similarity index 100% rename from sources/COMMENT rename to obsolete/sources/COMMENT diff --git a/sources/COMMENT.LCOM b/obsolete/sources/COMMENT.LCOM similarity index 100% rename from sources/COMMENT.LCOM rename to obsolete/sources/COMMENT.LCOM diff --git a/sources/DFILE b/obsolete/sources/DFILE similarity index 100% rename from sources/DFILE rename to obsolete/sources/DFILE diff --git a/sources/DFILE.LCOM b/obsolete/sources/DFILE.LCOM similarity index 100% rename from sources/DFILE.LCOM rename to obsolete/sources/DFILE.LCOM diff --git a/sources/DISKDLION b/obsolete/sources/DISKDLION similarity index 100% rename from sources/DISKDLION rename to obsolete/sources/DISKDLION diff --git a/sources/DISKDLION.LCOM b/obsolete/sources/DISKDLION.LCOM similarity index 100% rename from sources/DISKDLION.LCOM rename to obsolete/sources/DISKDLION.LCOM diff --git a/sources/INSPECT-CLOSURE b/obsolete/sources/INSPECT-CLOSURE similarity index 100% rename from sources/INSPECT-CLOSURE rename to obsolete/sources/INSPECT-CLOSURE diff --git a/sources/INSPECT-CLOSURE.LCOM b/obsolete/sources/INSPECT-CLOSURE.LCOM similarity index 100% rename from sources/INSPECT-CLOSURE.LCOM rename to obsolete/sources/INSPECT-CLOSURE.LCOM diff --git a/sources/JAPANESE b/obsolete/sources/JAPANESE similarity index 100% rename from sources/JAPANESE rename to obsolete/sources/JAPANESE diff --git a/sources/JAPANESE.LCOM b/obsolete/sources/JAPANESE.LCOM similarity index 100% rename from sources/JAPANESE.LCOM rename to obsolete/sources/JAPANESE.LCOM diff --git a/sources/MACROAUX-OPTIMIZERS b/obsolete/sources/MACROAUX-OPTIMIZERS similarity index 100% rename from sources/MACROAUX-OPTIMIZERS rename to obsolete/sources/MACROAUX-OPTIMIZERS diff --git a/sources/MACROAUX-OPTIMIZERS.LCOM b/obsolete/sources/MACROAUX-OPTIMIZERS.LCOM similarity index 100% rename from sources/MACROAUX-OPTIMIZERS.LCOM rename to obsolete/sources/MACROAUX-OPTIMIZERS.LCOM diff --git a/sources/MOD44IO b/obsolete/sources/MOD44IO similarity index 100% rename from sources/MOD44IO rename to obsolete/sources/MOD44IO diff --git a/sources/MOD44IO.LCOM b/obsolete/sources/MOD44IO.LCOM similarity index 100% rename from sources/MOD44IO.LCOM rename to obsolete/sources/MOD44IO.LCOM diff --git a/sources/SEDIT-CONVERT b/obsolete/sources/SEDIT-CONVERT similarity index 100% rename from sources/SEDIT-CONVERT rename to obsolete/sources/SEDIT-CONVERT diff --git a/sources/SEDIT-CONVERT.dfasl b/obsolete/sources/SEDIT-CONVERT.dfasl similarity index 100% rename from sources/SEDIT-CONVERT.dfasl rename to obsolete/sources/SEDIT-CONVERT.dfasl diff --git a/sources/SEDIT-DEBUG b/obsolete/sources/SEDIT-DEBUG similarity index 100% rename from sources/SEDIT-DEBUG rename to obsolete/sources/SEDIT-DEBUG diff --git a/sources/SEDIT-DEBUG.LCOM b/obsolete/sources/SEDIT-DEBUG.LCOM similarity index 100% rename from sources/SEDIT-DEBUG.LCOM rename to obsolete/sources/SEDIT-DEBUG.LCOM diff --git a/sources/DEFPACKAGE-IMPORT b/sources/DEFPACKAGE-IMPORT deleted file mode 100644 index 4fb7f9386..000000000 --- a/sources/DEFPACKAGE-IMPORT +++ /dev/null @@ -1,35 +0,0 @@ -(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) - -(FILECREATED " 5-Sep-2024 22:33:36" {DSK}matt>Interlisp>medley>sources>DEFPACKAGE-IMPORT.;2 1161 - - :EDIT-BY "mth" - - :CHANGES-TO (VARS DEFPACKAGE-IMPORTCOMS) - - :PREVIOUS-DATE "16-May-90 15:31:19" -{DSK}matt>Interlisp>medley>sources>DEFPACKAGE-IMPORT.;1) - - -(PRETTYCOMPRINT DEFPACKAGE-IMPORTCOMS) - -(RPAQQ DEFPACKAGE-IMPORTCOMS ((P (IMPORT (CL:INTERN "DEFPACKAGE" "XCL") - "INTERLISP") - (IMPORT (CL:INTERN "DEFPACKAGE" "XCL") - "LISP") - (EXPORT (CL:FIND-SYMBOL "DEFPACKAGE" "LISP") - "LISP")) - (PROP MAKEFILE-ENVIRONMENT DEFPACKAGE-IMPORT))) - -(IMPORT (CL:INTERN "DEFPACKAGE" "XCL") - "INTERLISP") - -(IMPORT (CL:INTERN "DEFPACKAGE" "XCL") - "LISP") - -(EXPORT (CL:FIND-SYMBOL "DEFPACKAGE" "LISP") - "LISP") - -(PUTPROPS DEFPACKAGE-IMPORT MAKEFILE-ENVIRONMENT (:READTABLE "INTERLISP" :PACKAGE "INTERLISP")) -(DECLARE%: DONTCOPY - (FILEMAP (NIL))) -STOP diff --git a/sources/DEFPACKAGE-IMPORT.LCOM b/sources/DEFPACKAGE-IMPORT.LCOM deleted file mode 100644 index 8bec2676a..000000000 --- a/sources/DEFPACKAGE-IMPORT.LCOM +++ /dev/null @@ -1,17 +0,0 @@ -(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) - -(FILECREATED " 5-Sep-2024 22:35:06" ("compiled on " -{DSK}matt>Interlisp>medley>sources>DEFPACKAGE-IMPORT.;2) "31-Jul-2024 02:24:35" tcompl'd in -"FULL 31-Jul-2024 ..." dated "31-Jul-2024 02:24:38") -(FILECREATED " 5-Sep-2024 22:33:36" {DSK}matt>Interlisp>medley>sources>DEFPACKAGE-IMPORT.;2 1161 - :EDIT-BY "mth" :CHANGES-TO (VARS DEFPACKAGE-IMPORTCOMS) :PREVIOUS-DATE "16-May-90 15:31:19" -{DSK}matt>Interlisp>medley>sources>DEFPACKAGE-IMPORT.;1) -(PRETTYCOMPRINT DEFPACKAGE-IMPORTCOMS) -(RPAQQ DEFPACKAGE-IMPORTCOMS ((P (IMPORT (CL:INTERN "DEFPACKAGE" "XCL") "INTERLISP") (IMPORT (CL:INTERN - "DEFPACKAGE" "XCL") "LISP") (EXPORT (CL:FIND-SYMBOL "DEFPACKAGE" "LISP") "LISP")) (PROP -MAKEFILE-ENVIRONMENT DEFPACKAGE-IMPORT))) -(IMPORT (CL:INTERN "DEFPACKAGE" "XCL") "INTERLISP") -(IMPORT (CL:INTERN "DEFPACKAGE" "XCL") "LISP") -(EXPORT (CL:FIND-SYMBOL "DEFPACKAGE" "LISP") "LISP") -(PUTPROPS DEFPACKAGE-IMPORT MAKEFILE-ENVIRONMENT (:READTABLE "INTERLISP" :PACKAGE "INTERLISP")) -NIL