home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / World_Of_Computer_Software-02-386-Vol-2of3.iso / a / akcl2.zip / SYS-PACK.LI < prev    next >
Text File  |  1992-04-08  |  3KB  |  81 lines
  1.  
  2.  
  3. ;;; Definitions for package PCL of type ESTABLISH
  4. (LISP::IN-PACKAGE "PCL" :USE LISP::NIL)
  5.  
  6. ;;; Definitions for package ITERATE of type ESTABLISH
  7. (LISP::IN-PACKAGE "ITERATE" :USE LISP::NIL)
  8.  
  9. ;;; Definitions for package WALKER of type ESTABLISH
  10. (LISP::IN-PACKAGE "WALKER" :USE LISP::NIL)
  11.  
  12. ;;; Definitions for package PCL of type EXPORT
  13. (LISP::IN-PACKAGE "PCL" :USE '("LISP" "ITERATE" "WALKER"))
  14. (LISP::IMPORT 'LISP::NIL)
  15. (LISP::EXPORT
  16.     '(PCL::CLASS-OF PCL::NO-APPLICABLE-METHOD
  17.          PCL::ENSURE-GENERIC-FUNCTION PCL::SLOT-MISSING
  18.          PCL::CALL-NEXT-METHOD PCL::MAKE-INSTANCES-OBSOLETE
  19.          PCL::METHOD-QUALIFIERS PCL::STANDARD-CLASS PCL::PRINT-OBJECT
  20.          PCL::STRUCTURE-CLASS PCL::MAKE-INSTANCE PCL::DEFGENERIC
  21.          PCL::REINITIALIZE-INSTANCE PCL::STANDARD-METHOD
  22.          PCL::FUNCTION-KEYWORDS PCL::STANDARD PCL::FIND-METHOD
  23.          PCL::INITIALIZE-INSTANCE PCL::GENERIC-FLET PCL::SLOT-UNBOUND
  24.          PCL::SYMBOL-MACROLET PCL::ADD-METHOD PCL::WITH-ACCESSORS
  25.          PCL::SLOT-BOUNDP PCL::SHARED-INITIALIZE
  26.          PCL::STANDARD-GENERIC-FUNCTION PCL::WITH-ADDED-METHODS
  27.          PCL::NEXT-METHOD-P PCL::SLOT-VALUE PCL::STANDARD-OBJECT
  28.          PCL::BUILT-IN-CLASS PCL::NO-NEXT-METHOD PCL::SLOT-MAKUNBOUND
  29.          PCL::INVALID-METHOD-ERROR PCL::METHOD-COMBINATION-ERROR
  30.          PCL::SLOT-EXISTS-P PCL::WITH-SLOTS
  31.          PCL::DEFINE-METHOD-COMBINATION PCL::CHANGE-CLASS
  32.          PCL::DEFMETHOD PCL::UPDATE-INSTANCE-FOR-DIFFERENT-CLASS
  33.          PCL::UPDATE-INSTANCE-FOR-REDEFINED-CLASS PCL::REMOVE-METHOD
  34.          PCL::CALL-METHOD PCL::CLASS-NAME PCL::FIND-CLASS PCL::DEFCLASS
  35.          PCL::COMPUTE-APPLICABLE-METHODS PCL::GENERIC-LABELS))
  36.  
  37. ;;; Definitions for package ITERATE of type EXPORT
  38. (LISP::IN-PACKAGE "ITERATE" :USE '("WALKER" "LISP"))
  39. (LISP::IMPORT 'LISP::NIL)
  40. (LISP::EXPORT
  41.     '(ITERATE::SUMMING ITERATE::MINIMIZING ITERATE::PLIST-ELEMENTS
  42.          ITERATE::ITERATE* ITERATE::MAXIMIZING ITERATE::LIST-TAILS
  43.          ITERATE::*ITERATE-WARNINGS* ITERATE::GATHERING
  44.          ITERATE::EACHTIME ITERATE::ELEMENTS ITERATE::GATHER
  45.          ITERATE::LIST-ELEMENTS ITERATE::WHILE ITERATE::ITERATE
  46.          ITERATE::UNTIL ITERATE::JOINING ITERATE::COLLECTING
  47.          ITERATE::WITH-GATHERING ITERATE::INTERVAL))
  48.  
  49. ;;; Definitions for package WALKER of type EXPORT
  50. (LISP::IN-PACKAGE "WALKER" :USE '("LISP"))
  51. (LISP::IMPORT 'LISP::NIL)
  52. (LISP::EXPORT
  53.     '(WALKER::DEFINE-WALKER-TEMPLATE WALKER::*VARIABLE-DECLARATIONS*
  54.          WALKER::NESTED-WALK-FORM WALKER::VARIABLE-DECLARATION
  55.          WALKER::VARIABLE-LEXICAL-P WALKER::VARIABLE-SPECIAL-P
  56.          WALKER::WALK-FORM WALKER::VARIABLE-GLOBALLY-SPECIAL-P))
  57.  
  58. ;;; Definitions for package PCL of type SHADOW
  59. (LISP::IN-PACKAGE "PCL")
  60. (LISP::SHADOW '(PCL::DOTIMES PCL::DOCUMENTATION))
  61. (LISP::SHADOWING-IMPORT 'LISP::NIL)
  62. (LISP::IMPORT '(SYSTEM::STRUCTUREP))
  63.  
  64. ;;; Definitions for package ITERATE of type SHADOW
  65. (LISP::IN-PACKAGE "ITERATE")
  66. (LISP::SHADOW 'LISP::NIL)
  67. (LISP::SHADOWING-IMPORT 'LISP::NIL)
  68. (LISP::IMPORT 'LISP::NIL)
  69.  
  70. ;;; Definitions for package WALKER of type SHADOW
  71. (LISP::IN-PACKAGE "WALKER")
  72. (LISP::SHADOW 'LISP::NIL)
  73. (LISP::SHADOWING-IMPORT 'LISP::NIL)
  74. (LISP::IMPORT 'LISP::NIL)
  75.  
  76. (in-package 'SI)
  77. (export '(%structure-name
  78.           %compiled-function-name
  79.           %set-compiled-function-name))
  80. (in-package 'pcl)
  81.