1 ;;;;------------------------------------------------------------------
3 ;;;; Copyright (C) 2003-2005,
4 ;;;; Department of Computer Science, University of Tromsoe, Norway.
6 ;;;; For distribution policy, see the accompanying file COPYING.
8 ;;;; Filename: packages.lisp
10 ;;;; Author: Frode Vatvedt Fjeld <frodef@acm.org>
11 ;;;; Created at: Sat Nov 15 21:39:55 2003
13 ;;;; $Id: packages.lisp,v 1.57 2008/02/25 23:34:46 ffjeld Exp $
15 ;;;;------------------------------------------------------------------
18 (defpackage muerte.mop
20 (:export reader-method-class
22 class-direct-subclasses
24 compute-default-initargs
26 standard-instance-access
27 compute-discriminating-function
28 specializer-direct-methods
29 standard-writer-method
30 standard-accessor-method
31 forward-referenced-class
33 funcallable-standard-class
34 eql-specializer-object
38 slot-makunbound-using-class
39 generic-function-methods
40 compute-effective-slot-definition
42 class-direct-default-initargs
44 effective-slot-definition
46 direct-slot-definition-class
48 slot-definition-writers
49 slot-definition-allocation
50 generic-function-declarations
51 slot-definition-initform
52 class-direct-superclasses
53 class-default-initargs
54 method-generic-function
55 find-method-combination
58 generic-function-argument-precedence-order
59 direct-slot-definition
60 generic-function-lambda-list
61 ensure-generic-function-using-class
62 standard-slot-definition
64 slot-value-using-class
66 standard-effective-slot-definition
68 slot-definition-initargs
71 slot-definition-readers
72 set-funcallable-instance-function
73 compute-class-precedence-list
74 remove-direct-subclass
75 standard-direct-slot-definition
77 slot-definition-initfunction
78 funcallable-standard-instance-access
79 standard-reader-method
80 accessor-method-slot-definition
81 ensure-class-using-class
82 specializer-direct-generic-functions
85 funcallable-standard-object
87 compute-effective-method
88 slot-boundp-using-class
94 generic-function-method-class
95 intern-eql-specializer
96 effective-slot-definition-class
97 compute-applicable-methods-using-classes
98 generic-function-method-combination
100 slot-definition-location
102 extract-specializer-names
))
104 (defpackage muerte.common-lisp
105 (:nicknames muerte.cl
)
107 (:import-from common-lisp cl
:nil
)
108 (:export
&allow-other-keys
120 *compile-file-pathname
*
121 *compile-file-truename
*
126 *default-pathname-defaults
*
147 *print-pprint-dispatch
*
155 *read-default-float-format
*
197 arithmetic-error-operands
198 arithmetic-error-operation
201 array-dimension-limit
205 array-has-fill-pointer-p
209 array-row-major-index
211 array-total-size-limit
263 broadcast-stream-streams
345 compile-file-pathname
349 compiler-macro-function
353 compute-applicable-methods
357 concatenated-stream-streams
387 decode-universal-time
391 define-compiler-macro
393 define-method-combination
433 double-float-negative-epsilon
439 echo-stream-input-stream
440 echo-stream-output-stream
444 encode-universal-time
448 ensure-directories-exist
449 ensure-generic-function
498 floating-point-inexact
499 floating-point-invalid-operation
500 floating-point-overflow
501 floating-point-underflow
516 function-lambda-expression
524 get-dispatch-macro-character
525 get-internal-real-time
526 get-internal-run-time
528 get-output-stream-string
541 hash-table-rehash-size
542 hash-table-rehash-threshold
565 internal-time-units-per-second
570 invoke-restart-interactively
577 lambda-parameters-limit
583 least-negative-double-float
584 least-negative-long-float
585 least-negative-normalized-double-float
586 least-negative-normalized-long-float
587 least-negative-normalized-short-float
588 least-negative-normalized-single-float
589 least-negative-short-float
590 least-negative-single-float
591 least-positive-double-float
592 least-positive-long-float
593 least-positive-normalized-double-float
594 least-positive-normalized-long-float
595 least-positive-normalized-short-float
596 least-positive-normalized-single-float
597 least-positive-short-float
598 least-positive-single-float
602 lisp-implementation-type
603 lisp-implementation-version
611 load-logical-pathname-translations
622 logical-pathname-translations
633 long-float-negative-epsilon
646 make-broadcast-stream
647 make-concatenated-stream
649 make-dispatch-macro-character
653 make-instances-obsolete
656 make-load-form-saving-slots
663 make-string-input-stream
664 make-string-output-stream
687 method-combination-error
693 most-negative-double-float
695 most-negative-long-float
696 most-negative-short-float
697 most-negative-single-float
698 most-positive-double-float
700 most-positive-long-float
701 most-positive-short-float
702 most-positive-single-float
709 multiple-values-limit
755 package-error-package
758 package-shadowing-symbols
785 pprint-exit-if-list-exhausted
800 print-not-readable-object
802 print-unreadable-object
835 read-preserving-whitespace
845 reinitialize-instance
885 set-dispatch-macro-character
899 short-float-negative-epsilon
909 simple-condition-format-arguments
910 simple-condition-format-control
921 single-float-negative-epsilon
945 standard-generic-function
955 stream-external-format
1003 synonym-stream-symbol
1016 translate-logical-pathname
1022 two-way-stream-input-stream
1023 two-way-stream-output-stream
1027 type-error-expected-type
1032 unbound-slot-instance
1044 update-instance-for-different-class
1045 update-instance-for-redefined-class
1046 upgraded-array-element-type
1047 upgraded-complex-part-type
1051 user-homedir-pathname
1065 with-compilation-unit
1066 with-condition-restarts
1067 with-hash-table-iterator
1068 with-input-from-string
1071 with-output-to-string
1072 with-package-iterator
1075 with-standard-io-syntax
1088 (:use muerte.mop muerte.common-lisp
)
1089 (:import-from common-lisp cl
:nil
)
1090 (:shadow get-setf-expansion
)
1091 (:export
#:translate-program
1092 #:decode-macro-lambda-list
1093 #:with-inline-assembly
1094 #:make-named-function
1095 #:without-function-prelude
1097 #:simple-read-from-string
1106 #:*debugger-function
*
1107 #:*debugger-condition
*
1108 #:*backtrace-conflate-names
*
1109 #:*backtrace-do-conflate
*
1110 #:*backtrace-max-frames
*
1111 #:*backtrace-max-args
*
1112 #:*backtrace-on-error
*
1113 #:*backtrace-stack-frame-barrier
*
1114 #:*backtrace-do-fresh-lines
*
1115 #:*backtrace-be-spartan-p
*
1116 #:*backtrace-print-length
*
1117 #:*backtrace-print-level
*
1122 #:stack-frame-uplink
1123 #:stack-frame-funobj
1125 #:current-stack-frame
1126 #:interrupt-default-handler
1130 #:*error-no-condition-for-debugger
*
1133 #:package-object-use-list
1134 #:package-object-internal-symbols
1135 #:package-object-external-symbols
1142 #:%memory-map-roots%
1145 #:%run-time-context-slot
1148 #:%symbol-global-value
1149 #:define-global-variable
1151 #:movitz-type-slot-offset
1155 #:location-in-object-p
1156 #:location-physical-offset
1157 #:define-compile-time-variable
1158 #:define-primitive-function
1164 #:wrong-argument-count
1166 #:*debugger-function
*
1167 #:*debugger-invoked-stack-frame
*
1168 #:*debugger-condition
*
1169 #:*debugger-dynamic-context
*
1175 #:*forward-generic-function
*
1178 #:find-restart-by-index
1179 #:find-restart-from-context
1180 #:map-active-restarts
1181 #:with-basic-restart
1183 #:dynamic-variable-install
1184 #:dynamic-variable-uninstall
1190 #:run-time-context-class
1191 #:current-run-time-context
1196 funobj-code-vector%
1op
1197 funobj-code-vector%
2op
1198 funobj-code-vector%
3op
1201 funobj-num-constants
1209 with-stream-class sm
1214 device-file-position
1216 device-buffer-length
1219 device-finish-record
1221 #:unfold-circular-list
1223 #:decode-macro-lambda-list
1224 #:decode-optional-formal
1225 #:decode-keyword-formal
1226 #:parse-declarations-and-body
1227 #:parse-docstring-declarations-and-body
1228 #:compute-function-block-name
1244 #:io-port-read-sequence
1245 #:io-port-write-sequence
1246 #:%io-port-read-succession
1247 #:%io-port-write-succession
1248 #:with-io-register-syntax
1249 #:with-register-syntax
1250 #:without-interrupts
1259 #:write-cpu-vendor-string
1260 #:read-time-stamp-counter
1261 #:clear-time-stamp-counter
1266 #:segment-descriptor
1267 #:segment-descriptor-base-location
1268 #:segment-descriptor-limit
1269 #:segment-descriptor-type-s-dpl-p
1270 #:segment-descriptor-avl-x-db-g
1271 #:global-segment-descriptor-table
1272 #:control-register-lo12
1273 #:control-register-hi20
1274 #:ensure-data-vector
1276 #:vector-read-more-p
1279 (print '(muerte::un-backquote
; make asdf/sbcl realize that these symbols exists..
1280 muerte
::backquote-comma
1281 muerte
::backquote-comma-at
1282 muerte
::backquote-comma-dot
)
1283 (make-broadcast-stream))
1285 (defpackage #:movitz
1286 (:use
:common-lisp
:binary-types
)
1287 (:export
#:create-image
1290 #:class-object-offset
1292 #:+other-type-offset
+
1293 #:parse-docstring-and-declarations
1294 #:global-constant-offset
1300 #:*default-image-file
*
1301 #:*default-image-init-file
*
1306 #:movitz-compile-file
1307 #:movitz-compile-stream
1308 #:movitz-disassemble
1309 #:movitz-disassemble-method
1311 #:movitz-std-instance
1323 #:+movitz-most-positive-fixnum
+
1324 #:+movitz-most-negative-fixnum
+
1325 #:+movitz-fixnum-factor
+
1326 #:+movitz-fixnum-bits
+
1327 #:+movitz-fixnum-shift
+
1328 #:+movitz-fixnum-zmask
+
1330 #:+code-vector-word-offset
+
1331 #:+code-vector-transient-word
+
1333 #:movitz-object-browser-properties
1334 #:movitz-heap-object
1336 #:movitz-basic-vector
1337 #:movitz-vector-num-elements
1338 #:movitz-vector-element-type
1339 #:movitz-vector-symbolic-data
1340 #:basic-vector-type-tag
1351 #:movitz-struct-length
1352 #:movitz-struct-slot-values
1356 #:movitz-read-and-intern
1360 #:*warn-function-change-p
*
1361 #:*compiler-do-optimize
*
1362 #:*compiler-use-cmov-p
*
1363 #:*compiler-auto-stack-checks-p
*
1364 #:*compiler-local-segment-prefix
*
1365 #:*compiler-global-segment-prefix
*
1366 #:*compiler-physical-segment-prefix
*
1367 #:*compiler-nonlocal-lispval-read-segment-prefix
*
1368 #:*compiler-nonlocal-lispval-write-segment-prefix
*
1369 #:*compiler-compile-eval-whens
*
1370 #:*compiler-compile-macro-expanders
*
1371 #:*compiler-allow-untagged-word-bits
*
1373 (:import-from muerte
1374 muerte
::translate-program
1375 muerte
::decode-macro-lambda-list
1376 muerte
::un-backquote
1377 muerte
::backquote-comma
1378 muerte
::backquote-comma-at
1379 muerte
::backquote-comma-dot
1381 muerte
::decode-optional-formal
1382 muerte
::decode-keyword-formal
1383 muerte
::parse-declarations-and-body
1384 muerte
::parse-docstring-declarations-and-body
1385 muerte
::unfold-circular-list
1386 muerte
::compute-function-block-name