home *** CD-ROM | disk | FTP | other *** search
/ Amiga MA Magazine 1998 #6 / amigamamagazinepolishissue1998.iso / coders / jËzyki_programowania / clisp / config.fas < prev    next >
Text File  |  1977-12-31  |  2KB  |  51 lines
  1. (SYSTEM::VERSION '(SYSTEM::CLISP2 13. LISP:T 130695.))
  2. #Y(#:TOP-LEVEL-FORM-1 #13Y(00 00 00 00 00 01 D8 37 02 30 E3 19 01) "LISP")
  3. #Y(#:TOP-LEVEL-FORM-2 #13Y(00 00 00 00 00 01 D8 D9 32 00 17 19 01)
  4.    #.#'FMAKUNBOUND
  5.    (MACHINE-TYPE MACHINE-VERSION MACHINE-INSTANCE SHORT-SITE-NAME
  6.      LONG-SITE-NAME EDITOR-TEMPFILE
  7.   ))
  8. #Y(#:TOP-LEVEL-FORM-3 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 82 C3 19 01)
  9.    MACHINE-TYPE SYSTEM::REMOVE-OLD-DEFINITIONS
  10.    #Y(MACHINE-TYPE #9Y(00 00 00 00 00 01 C3 19 01) "Amiga")
  11.   )
  12. #Y(#:TOP-LEVEL-FORM-4 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 82 C3 19 01)
  13.    MACHINE-VERSION SYSTEM::REMOVE-OLD-DEFINITIONS
  14.    #Y(MACHINE-VERSION #9Y(00 00 00 00 00 01 C3 19 01) "Amiga, OS 2.04-3.1")
  15.   )
  16. #Y(#:TOP-LEVEL-FORM-5 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 82 C3 19 01)
  17.    MACHINE-INSTANCE SYSTEM::REMOVE-OLD-DEFINITIONS
  18.    #Y(MACHINE-INSTANCE #9Y(00 00 00 00 00 01 C3 19 01)
  19.       "Heinrich Mustermanns Amiga"
  20.   )  )
  21. #Y(#:TOP-LEVEL-FORM-6 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 82 C3 19 01)
  22.    SHORT-SITE-NAME SYSTEM::REMOVE-OLD-DEFINITIONS
  23.    #Y(SHORT-SITE-NAME #9Y(00 00 00 00 00 01 C3 19 01) "Pfefferhofen")
  24.   )
  25. #Y(#:TOP-LEVEL-FORM-7 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 82 C3 19 01)
  26.    LONG-SITE-NAME SYSTEM::REMOVE-OLD-DEFINITIONS
  27.    #Y(LONG-SITE-NAME #9Y(00 00 00 00 00 01 C3 19 01)
  28.       "Haus Nr. 71, 34567 Pfefferhofen, Deutschland"
  29.   )  )
  30. #Y(#:TOP-LEVEL-FORM-8 #16Y(00 00 00 00 00 01 D8 30 5D D9 DA 30 55 C4 19 01)
  31.    (SPECIAL *EDITOR*) *EDITOR* "emacs"
  32.   )
  33. #Y(#:TOP-LEVEL-FORM-9 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 82 C3 19 01)
  34.    EDITOR-NAME SYSTEM::REMOVE-OLD-DEFINITIONS
  35.    #Y(EDITOR-NAME #17Y(00 00 00 00 00 01 D8 2E 01 1D 04 0E 02 19 01 19 01)
  36.       "EDITOR" SYSTEM::GETENV *EDITOR*
  37.   )  )
  38. #Y(#:TOP-LEVEL-FORM-10 #16Y(00 00 00 00 00 01 D8 2E 01 D8 DA 31 82 C3 19 01)
  39.    EDITOR-TEMPFILE SYSTEM::REMOVE-OLD-DEFINITIONS
  40.    #Y(EDITOR-TEMPFILE #9Y(00 00 00 00 00 01 C3 19 01) "T:lisptemp.lsp")
  41.   )
  42. #Y(#:TOP-LEVEL-FORM-11 #16Y(00 00 00 00 00 01 D8 30 5D D9 DA 30 55 C4 19 01)
  43.    (SPECIAL *LOAD-PATHS*) *LOAD-PATHS*
  44.    (#S(PATHNAME :HOST NIL :DEVICE NIL :DIRECTORY (:RELATIVE :WILD-INFERIORS)
  45.         :NAME NIL :TYPE NIL :VERSION NIL
  46.       )
  47.      #S(PATHNAME :HOST NIL :DEVICE "LISP"
  48.         :DIRECTORY (:ABSOLUTE :WILD-INFERIORS) :NAME NIL :TYPE NIL :VERSION NIL
  49.   ))   )
  50. #Y(#:TOP-LEVEL-FORM-12 #11Y(00 00 00 00 00 01 02 0F 00 19 01) *PRINT-PRETTY*)
  51.