/[mcclim]/mcclim/package.lisp
ViewVC logotype

Contents of /mcclim/package.lisp

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.49 - (hide annotations)
Tue Mar 22 12:31:18 2005 UTC (9 years ago) by crhodes
Branch: MAIN
Changes since 1.48: +1 -0 lines
I think this is a slightly more ICCCMly correct implementation of sending
selections to requestors.  We support all the required targets except
MULTIPLE, select an appropriate property if TEXT is requested, refuse to
send bad characters to a STRING target, and avoid printing to *trace-output*
to deal with the fact that Klipper, at least, polls the TIMESTAMP property
to find out if the selection has changed.

Requesting PRIMARY from selection owners is moderately broken, unfortunately;
it works for ASCII but not for much else.
1 cvs 1.1 ;;; -*- Mode: Lisp; Package: CLIM-INTERNALS -*-
2    
3     (in-package :common-lisp-user)
4    
5 gilbert 1.14 ;;;
6     ;;; CLIM-LISP
7     ;;;
8 cvs 1.1
9 gilbert 1.14 ;; Our CLIM-LISP also contains gray streams, as I consider them part
10     ;; of Common Lisp.
11    
12     ;; If you want to patch a CL symbol, you define it in CLIM-LISP-PATCH
13     ;; and export it.
14    
15     #.(let ((all-ansi-symbols
16 mikemac 1.33 '(#:&allow-other-keys #:&aux #:&body #:&environment #:&key #:&optional #:&rest #:&whole #:*
17     #:** #:*** #:*break-on-signals* #:*compile-file-pathname* #:*compile-file-truename*
18     #:*compile-print* #:*compile-verbose* #:*debug-io* #:*debugger-hook*
19     #:*default-pathname-defaults* #:*error-output* #:*features* #:*gensym-counter*
20     #:*load-pathname* #:*load-print* #:*load-truename* #:*load-verbose* #:*macroexpand-hook*
21     #:*modules* #:*package* #:*print-array* #:*print-base* #:*print-case* #:*print-circle*
22     #:*print-escape* #:*print-gensym* #:*print-length* #:*print-level* #:*print-lines*
23     #:*print-miser-width* #:*print-pprint-dispatch* #:*print-pretty* #:*print-radix*
24     #:*print-readably* #:*print-right-margin* #:*query-io* #:*random-state* #:*read-base*
25     #:*read-default-float-format* #:*read-eval* #:*read-suppress* #:*readtable*
26     #:*standard-input* #:*standard-output* #:*terminal-io* #:*trace-output* #:+ #:++ #:+++ #:-
27     #:/ #:// #:/// #:/= #:1+ #:1- #:< #:<= #:= #:> #:>= #:abort #:abs #:acons #:acos #:acosh
28     #:add-method #:adjoin #:adjust-array #:adjustable-array-p #:allocate-instance
29     #:alpha-char-p #:alphanumericp #:and #:append #:apply #:apropos #:apropos-list #:aref
30     #:arithmetic-error #:arithmetic-error-operands #:arithmetic-error-operation #:array
31     #:array-dimension #:array-dimension-limit #:array-dimensions #:array-displacement
32     #:array-element-type #:array-has-fill-pointer-p #:array-in-bounds-p #:array-rank
33     #:array-rank-limit #:array-row-major-index #:array-total-size #:array-total-size-limit
34     #:arrayp #:ash #:asin #:asinh #:assert #:assoc #:assoc-if #:assoc-if-not #:atan #:atanh
35     #:atom #:base-char #:base-string #:bignum #:bit #:bit-and #:bit-andc1 #:bit-andc2
36     #:bit-eqv #:bit-ior #:bit-nand #:bit-nor #:bit-not #:bit-orc1 #:bit-orc2 #:bit-vector
37     #:bit-vector-p #:bit-xor #:block #:boole #:boole-1 #:boole-2 #:boole-and #:boole-andc1
38     #:boole-andc2 #:boole-c1 #:boole-c2 #:boole-clr #:boole-eqv #:boole-ior #:boole-nand
39     #:boole-nor #:boole-orc1 #:boole-orc2 #:boole-set #:boole-xor #:boolean #:both-case-p
40     #:boundp #:break #:broadcast-stream #:broadcast-stream-streams #:built-in-class #:butlast
41     #:byte #:byte-position #:byte-size #:caaaar #:caaadr #:caaar #:caadar #:caaddr #:caadr
42     #:caar #:cadaar #:cadadr #:cadar #:caddar #:cadddr #:caddr #:cadr #:call-arguments-limit
43     #:call-method #:call-next-method #:car #:case #:catch #:ccase #:cdaaar #:cdaadr #:cdaar
44     #:cdadar #:cdaddr #:cdadr #:cdar #:cddaar #:cddadr #:cddar #:cdddar #:cddddr #:cdddr
45     #:cddr #:cdr #:ceiling #:cell-error #:cell-error-name #:cerror #:change-class #:char
46     #:char-code #:char-code-limit #:char-downcase #:char-equal #:char-greaterp #:char-int
47     #:char-lessp #:char-name #:char-not-equal #:char-not-greaterp #:char-not-lessp
48     #:char-upcase #:char/= #:char< #:char<= #:char= #:char> #:char>= #:character #:characterp
49     #:check-type #:cis #:class #:class-name #:class-of #:clear-input #:clear-output #:close
50     #:clrhash #:code-char #:coerce #:compilation-speed #:compile #:compile-file
51     #:compile-file-pathname #:compiled-function #:compiled-function-p #:compiler-macro
52     #:compiler-macro-function #:complement #:complex #:complexp #:compute-applicable-methods
53     #:compute-restarts #:concatenate #:concatenated-stream #:concatenated-stream-streams
54     #:cond #:condition #:conjugate #:cons #:consp #:constantly #:constantp #:continue
55     #:control-error #:copy-alist #:copy-list #:copy-pprint-dispatch #:copy-readtable
56     #:copy-seq #:copy-structure #:copy-symbol #:copy-tree #:cos #:cosh #:count #:count-if
57     #:count-if-not #:ctypecase #:debug #:decf #:declaim #:declaration #:declare #:decode-float
58     #:decode-universal-time #:defclass #:defconstant #:defgeneric #:define-compiler-macro
59     #:define-condition #:define-method-combination #:define-modify-macro
60     #:define-setf-expander #:define-symbol-macro #:defmacro #:defmethod #:defpackage
61     #:defparameter #:defsetf #:defstruct #:deftype #:defun #:defvar #:delete
62     #:delete-duplicates #:delete-file #:delete-if #:delete-if-not #:delete-package
63     #:denominator #:deposit-field #:describe #:describe-object #:destructuring-bind
64     #:digit-char #:digit-char-p #:directory #:directory-namestring #:disassemble
65     #:division-by-zero #:do #:do* #:do-all-symbols #:do-external-symbols #:do-symbols
66     #:documentation #:dolist #:dotimes #:double-float #:double-float-epsilon
67     #:double-float-negative-epsilon #:dpb #:dribble #:dynamic-extent #:ecase #:echo-stream
68     #:echo-stream-input-stream #:echo-stream-output-stream #:ed #:eighth #:elt
69     #:encode-universal-time #:end-of-file #:endp #:enough-namestring
70     #:ensure-directories-exist #:ensure-generic-function #:eq #:eql #:equal #:equalp #:error
71     #:etypecase #:eval #:eval-when #:evenp #:every #:exp #:export #:expt #:extended-char
72     #:fboundp #:fceiling #:fdefinition #:ffloor #:fifth #:file-author #:file-error
73     #:file-error-pathname #:file-length #:file-namestring #:file-position #:file-stream
74     #:file-string-length #:file-write-date #:fill #:fill-pointer #:find #:find-all-symbols
75     #:find-class #:find-if #:find-if-not #:find-method #:find-package #:find-restart
76     #:find-symbol #:finish-output #:first #:fixnum #:flet #:float #:float-digits
77     #:float-precision #:float-radix #:float-sign #:floating-point-inexact
78     #:floating-point-invalid-operation #:floating-point-overflow #:floating-point-underflow
79     #:floatp #:floor #:fmakunbound #:force-output #:format #:formatter #:fourth #:fresh-line
80     #:fround #:ftruncate #:ftype #:funcall #:function #:function-keywords
81     #:function-lambda-expression #:functionp #:gcd #:generic-function #:gensym #:gentemp #:get
82     #:get-decoded-time #:get-dispatch-macro-character #:get-internal-real-time
83     #:get-internal-run-time #:get-macro-character #:get-output-stream-string #:get-properties
84     #:get-setf-expansion #:get-universal-time #:getf #:gethash #:go #:graphic-char-p
85     #:handler-bind #:handler-case #:hash-table #:hash-table-count #:hash-table-p
86     #:hash-table-rehash-size #:hash-table-rehash-threshold #:hash-table-size #:hash-table-test
87     #:host-namestring #:identity #:if #:ignorable #:ignore #:ignore-errors #:imagpart #:import
88     #:in-package #:incf #:initialize-instance #:inline #:input-stream-p #:inspect #:integer
89     #:integer-decode-float #:integer-length #:integerp #:interactive-stream-p #:intern
90     #:internal-time-units-per-second #:intersection #:invalid-method-error #:invoke-debugger
91     #:invoke-restart #:invoke-restart-interactively #:isqrt #:keyword #:keywordp #:labels
92     #:lambda #:lambda-list-keywords #:lambda-parameters-limit #:last #:lcm #:ldb #:ldb-test
93     #:ldiff #:least-negative-double-float #:least-negative-long-float
94     #:least-negative-normalized-double-float #:least-negative-normalized-long-float
95     #:least-negative-normalized-short-float #:least-negative-normalized-single-float
96     #:least-negative-short-float #:least-negative-single-float #:least-positive-double-float
97     #:least-positive-long-float #:least-positive-normalized-double-float
98     #:least-positive-normalized-long-float #:least-positive-normalized-short-float
99     #:least-positive-normalized-single-float #:least-positive-short-float
100     #:least-positive-single-float #:length #:let #:let* #:lisp-implementation-type
101     #:lisp-implementation-version #:list #:list* #:list-all-packages #:list-length #:listen
102     #:listp #:load #:load-logical-pathname-translations #:load-time-value #:locally #:log
103     #:logand #:logandc1 #:logandc2 #:logbitp #:logcount #:logeqv #:logical-pathname
104     #:logical-pathname-translations #:logior #:lognand #:lognor #:lognot #:logorc1 #:logorc2
105     #:logtest #:logxor #:long-float #:long-float-epsilon #:long-float-negative-epsilon
106     #:long-site-name #:loop #:loop-finish #:lower-case-p #:machine-instance #:machine-type
107     #:machine-version #:macro-function #:macroexpand #:macroexpand-1 #:macrolet #:make-array
108     #:make-broadcast-stream #:make-concatenated-stream #:make-condition
109     #:make-dispatch-macro-character #:make-echo-stream #:make-hash-table #:make-instance
110     #:make-instances-obsolete #:make-list #:make-load-form #:make-load-form-saving-slots
111     #:make-method #:make-package #:make-pathname #:make-random-state #:make-sequence
112     #:make-string #:make-string-input-stream #:make-string-output-stream #:make-symbol
113     #:make-synonym-stream #:make-two-way-stream #:makunbound #:map #:map-into #:mapc #:mapcan
114     #:mapcar #:mapcon #:maphash #:mapl #:maplist #:mask-field #:max #:member #:member-if
115     #:member-if-not #:merge #:merge-pathnames #:method #:method-combination
116     #:method-combination-error #:method-qualifiers #:min #:minusp #:mismatch #:mod
117     #:most-negative-double-float #:most-negative-fixnum #:most-negative-long-float
118     #:most-negative-short-float #:most-negative-single-float #:most-positive-double-float
119     #:most-positive-fixnum #:most-positive-long-float #:most-positive-short-float
120     #:most-positive-single-float #:muffle-warning #:multiple-value-bind #:multiple-value-call
121     #:multiple-value-list #:multiple-value-prog1 #:multiple-value-setq #:multiple-values-limit
122     #:name-char #:namestring #:nbutlast #:nconc #:next-method-p #:nil #:nintersection #:ninth
123     #:no-applicable-method #:no-next-method #:not #:notany #:notevery #:notinline #:nreconc
124     #:nreverse #:nset-difference #:nset-exclusive-or #:nstring-capitalize #:nstring-downcase
125     #:nstring-upcase #:nsublis #:nsubst #:nsubst-if #:nsubst-if-not #:nsubstitute
126     #:nsubstitute-if #:nsubstitute-if-not #:nth #:nth-value #:nthcdr #:null #:number #:numberp
127     #:numerator #:nunion #:oddp #:open #:open-stream-p #:optimize #:or #:otherwise
128     #:output-stream-p #:package #:package-error #:package-error-package #:package-name
129     #:package-nicknames #:package-shadowing-symbols #:package-use-list #:package-used-by-list
130     #:packagep #:pairlis #:parse-error #:parse-integer #:parse-namestring #:pathname
131     #:pathname-device #:pathname-directory #:pathname-host #:pathname-match-p #:pathname-name
132     #:pathname-type #:pathname-version #:pathnamep #:peek-char #:phase #:pi #:plusp #:pop
133     #:position #:position-if #:position-if-not #:pprint #:pprint-dispatch
134     #:pprint-exit-if-list-exhausted #:pprint-fill #:pprint-indent #:pprint-linear
135     #:pprint-logical-block #:pprint-newline #:pprint-pop #:pprint-tab #:pprint-tabular #:prin1
136     #:prin1-to-string #:princ #:princ-to-string #:print #:print-not-readable
137     #:print-not-readable-object #:print-object #:print-unreadable-object #:probe-file
138     #:proclaim #:prog #:prog* #:prog1 #:prog2 #:progn #:program-error #:progv #:provide
139     #:psetf #:psetq #:push #:pushnew #:quote #:random #:random-state #:random-state-p #:rassoc
140     #:rassoc-if #:rassoc-if-not #:ratio #:rational #:rationalize #:rationalp #:read
141     #:read-byte #:read-char #:read-char-no-hang #:read-delimited-list #:read-from-string
142     #:read-line #:read-preserving-whitespace #:read-sequence #:reader-error #:readtable
143     #:readtable-case #:readtablep #:real #:realp #:realpart #:reduce #:reinitialize-instance
144     #:rem #:remf #:remhash #:remove #:remove-duplicates #:remove-if #:remove-if-not
145     #:remove-method #:remprop #:rename-file #:rename-package #:replace #:require #:rest
146     #:restart #:restart-bind #:restart-case #:restart-name #:return #:return-from #:revappend
147     #:reverse #:room #:rotatef #:round #:row-major-aref #:rplaca #:rplacd #:safety #:satisfies
148     #:sbit #:scale-float #:schar #:search #:second #:sequence #:serious-condition #:set
149     #:set-difference #:set-dispatch-macro-character #:set-exclusive-or #:set-macro-character
150     #:set-pprint-dispatch #:set-syntax-from-char #:setf #:setq #:seventh #:shadow
151     #:shadowing-import #:shared-initialize #:shiftf #:short-float #:short-float-epsilon
152     #:short-float-negative-epsilon #:short-site-name #:signal #:signed-byte #:signum
153     #:simple-array #:simple-base-string #:simple-bit-vector #:simple-bit-vector-p
154     #:simple-condition #:simple-condition-format-arguments #:simple-condition-format-control
155     #:simple-error #:simple-string #:simple-string-p #:simple-type-error #:simple-vector
156     #:simple-vector-p #:simple-warning #:sin #:single-float #:single-float-epsilon
157     #:single-float-negative-epsilon #:sinh #:sixth #:sleep #:slot-boundp #:slot-exists-p
158     #:slot-makunbound #:slot-missing #:slot-unbound #:slot-value #:software-type
159     #:software-version #:some #:sort #:space #:special #:special-operator-p #:speed #:sqrt
160     #:stable-sort #:standard #:standard-char #:standard-char-p #:standard-class
161     #:standard-generic-function #:standard-method #:standard-object #:step #:storage-condition
162     #:store-value #:stream #:stream-element-type #:stream-error #:stream-error-stream
163     #:stream-external-format #:streamp #:string #:string-capitalize #:string-downcase
164     #:string-equal #:string-greaterp #:string-left-trim #:string-lessp #:string-not-equal
165     #:string-not-greaterp #:string-not-lessp #:string-right-trim #:string-stream #:string-trim
166     #:string-upcase #:string/= #:string< #:string<= #:string= #:string> #:string>= #:stringp
167     #:structure #:structure-class #:structure-object #:style-warning #:sublis #:subseq
168     #:subsetp #:subst #:subst-if #:subst-if-not #:substitute #:substitute-if
169     #:substitute-if-not #:subtypep #:svref #:sxhash #:symbol #:symbol-function
170     #:symbol-macrolet #:symbol-name #:symbol-package #:symbol-plist #:symbol-value #:symbolp
171     #:synonym-stream #:synonym-stream-symbol #:t #:tagbody #:tailp #:tan #:tanh #:tenth
172     #:terpri #:the #:third #:throw #:time #:trace #:translate-logical-pathname
173     #:translate-pathname #:tree-equal #:truename #:truncate #:two-way-stream
174     #:two-way-stream-input-stream #:two-way-stream-output-stream #:type #:type-error
175     #:type-error-datum #:type-error-expected-type #:type-of #:typecase #:typep #:unbound-slot
176     #:unbound-slot-instance #:unbound-variable #:undefined-function #:unexport #:unintern
177     #:union #:unless #:unread-char #:unsigned-byte #:untrace #:unuse-package #:unwind-protect
178     #:update-instance-for-different-class #:update-instance-for-redefined-class
179     #:upgraded-array-element-type #:upgraded-complex-part-type #:upper-case-p #:use-package
180     #:use-value #:user-homedir-pathname #:values #:values-list #:variable #:vector
181     #:vector-pop #:vector-push #:vector-push-extend #:vectorp #:warn #:warning #:when
182     #:wild-pathname-p #:with-accessors #:with-compilation-unit #:with-condition-restarts
183     #:with-hash-table-iterator #:with-input-from-string #:with-open-file #:with-open-stream
184     #:with-output-to-string #:with-package-iterator #:with-simple-restart #:with-slots
185     #:with-standard-io-syntax #:write #:write-byte #:write-char #:write-line #:write-sequence
186     #:write-string #:write-to-string #:y-or-n-p #:yes-or-no-p #:zerop))
187 gilbert 1.14 (packages
188 mikemac 1.32 #+gcl '(:lisp :pcl)
189 bhaible 1.46 #-(or gcl) '(:common-lisp))
190 gilbert 1.14 (gray-symbols
191 mikemac 1.33 '(#:fundamental-stream
192     #:fundamental-input-stream
193     #:fundamental-output-stream
194     #:fundamental-character-stream
195     #:fundamental-binary-stream
196     #:fundamental-character-input-stream
197     #:fundamental-character-output-stream
198     #:fundamental-binary-input-stream
199     #:fundamental-binary-output-stream
200     #:stream-read-char
201     #:stream-unread-char
202     #:stream-read-char-no-hang
203     #:stream-peek-char
204     #:stream-listen
205     #:stream-read-line
206     #:stream-clear-input
207     #:stream-write-char
208     #:stream-line-column
209     #:stream-start-line-p
210     #:stream-write-string
211     #:stream-terpri
212     #:stream-fresh-line
213     #:stream-finish-output
214     #:stream-force-output
215     #:stream-advance-to-column
216 moore 1.42 #:stream-clear-output
217 mikemac 1.33 #:stream-read-byte
218     #:stream-write-byte ))
219 gilbert 1.14 (gray-packages
220 bhaible 1.46 `(#+clisp ,@'(:gray)
221 mikemac 1.33 #+cmu ,@'(:ext)
222     #+mcl ,@'(:ccl)
223     #+allegro ,@'(:common-lisp :excl :stream)
224     #+harlequin-common-lisp ,@'(:stream)
225     #+sbcl ,@'(:sb-gray))) )
226 gilbert 1.14 ;;
227     (labels ((seek-symbol (name packages)
228 mikemac 1.33 ;; seek the a symbol named 'name' in `packages'
229 adejneka 1.23 (or (some #'(lambda (p)
230 mikemac 1.33 (multiple-value-bind (sym res) (find-symbol (symbol-name name) p)
231 gilbert 1.14 (if (eql res :external)
232     (list sym)
233     nil)))
234     packages)
235 mikemac 1.33 (progn (format t "~&there is no ~A." name)
236 gilbert 1.14 (finish-output)
237     nil)))
238     (dump-defpackage (&aux imports export-ansi export-gray)
239 adejneka 1.23 (labels ((push-import-from (symbol package)
240     (let ((pair (assoc package imports)))
241     (if pair
242     (push symbol (cdr pair))
243     (push `(,package . (,symbol))
244     imports))))
245     (grok (symbols packages)
246 gilbert 1.14 (let ((res nil))
247     (dolist (nam symbols)
248     (let ((sym (seek-symbol nam packages)))
249     (when sym
250     (push (car sym) res)
251     (cond
252     ((and (find-package :clim-lisp-patch)
253 mikemac 1.33 (multiple-value-bind (sym2 res) (find-symbol (symbol-name nam) :clim-lisp-patch)
254 gilbert 1.14 (and sym2 (eq res :external))))
255     ;;
256 mikemac 1.33 (format t "~&;; ~S is patched." sym)
257 gilbert 1.14 (finish-output)
258 gilbert 1.44 (push-import-from nam :clim-lisp-patch))
259 gilbert 1.14 (t
260     (setf sym (car sym))
261 mikemac 1.33 ;; clisp has no (:import ..) arg!
262 adejneka 1.23 (push-import-from
263     (symbol-name sym)
264     (package-name (symbol-package sym))))))))
265 gilbert 1.14 res)))
266 gilbert 1.44 ;;
267     ;; Don't redefine a perfectly working CL:DESCRIBE,
268     ;; which more often than not has special knowledge
269     ;; about objects you can't possibly gain though some
270     ;; portable implementation.
271     ;; --GB 2004-11-20
272     (setf all-ansi-symbols (remove '#:describe all-ansi-symbols :test #'string-equal))
273     (setf all-ansi-symbols (remove '#:describe-object all-ansi-symbols :test #'string-equal))
274     ;;
275 gilbert 1.14 (setf export-ansi (grok all-ansi-symbols packages))
276     (setf export-gray (grok gray-symbols gray-packages))
277     `(progn
278 mikemac 1.33 (defpackage :clim-lisp (:use)
279 adejneka 1.23 ,@(mapcar (lambda (spec)
280     (destructuring-bind (package . syms) spec
281     `(:import-from ,package ,@syms)))
282     imports)
283 gilbert 1.44 (:shadow #:describe #:describe-object)
284     (:export #:describe #:describe-object)
285 gilbert 1.14 (:export
286     ,@(mapcar #'symbol-name export-ansi)
287     ,@(mapcar #'symbol-name export-gray) )) ))))
288     (dump-defpackage) ))
289 cvs 1.1
290 mikemac 1.33 (defpackage :clim
291 gilbert 1.14 (:use)
292     ;;
293 mikemac 1.33 (:import-from :clim-lisp
294     #:and
295     #:boolean
296     #:character
297     #:close
298 gilbert 1.44 #:complex
299 mikemac 1.33 #:float
300     #:fundamental-binary-input-stream
301     #:fundamental-binary-output-stream
302     #:fundamental-binary-stream
303     #:fundamental-character-input-stream
304     #:fundamental-character-output-stream
305     #:fundamental-character-stream
306     #:fundamental-input-stream
307     #:fundamental-output-stream
308     #:fundamental-stream
309     #:input-stream-p
310     #:integer
311     #:interactive-stream-p
312     #:keyword
313     #:member
314     #:nil
315     #:null
316     #:number
317     #:open-stream-p
318     #:or
319     #:output-stream-p
320     #:pathname
321     #:ratio
322     #:rational
323     #:real
324     #:sequence
325     #:stream-advance-to-column
326 moore 1.42 #:stream-clear-input
327     #:stream-clear-output
328 mikemac 1.33 #:stream-element-type
329     #:stream-finish-output
330     #:stream-force-output
331     #:stream-fresh-line
332     #:stream-line-column
333     #:stream-listen
334     #:stream-peek-char
335     #:stream-read-byte
336     #:stream-read-char
337     #:stream-read-char-no-hang
338     #:stream-read-line
339     #:stream-start-line-p
340     #:stream-terpri
341     #:stream-unread-char
342     #:stream-write-byte
343     #:stream-write-char
344     #:stream-write-string
345     #:streamp
346     #:string
347     #:symbol
348     #:t)
349 gilbert 1.14 ;;
350     (:export
351 gilbert 1.31
352 mikemac 1.33 ;; this list of exported symbols was automatically generated from the
353 gilbert 1.31 ;; specification as of version 1.17 of this very file, please think twice
354 mikemac 1.33 ;; before fiddling with it. thanks! --gb 2002-11-10
355 gilbert 1.31
356 mikemac 1.33 #:*abort-gestures* ;variable
357     #:*accelerator-gestures* ;variable
358     #:*activation-gestures* ;variable
359     #:*application-frame* ;variable
360     #:*command-argument-delimiters* ;variable
361     #:*command-dispatchers* ;variable
362     #:*command-name-delimiters* ;variable
363     #:*command-parser* ;variable
364     #:*command-unparser* ;variable
365     #:*completion-gestures* ;variable
366     #:*default-frame-manager* ;variable
367     #:*default-server-path* ;variable
368     #:*default-text-style* ;constant
369     #:*delimiter-gestures* ;variable
370     #:*help-gestures* ;variable
371     #:*input-context* ;variable
372     #:*input-wait-handler* ;variable
373     #:*input-wait-test* ;variable
374     #:*null-presentation* ;constant
375     #:*numeric-argument-marker* ;variable
376     #:*original-stream* ;variable
377     #:*partial-command-parser* ;variable
378     #:*pointer-button-press-handler* ;variable
379     #:*pointer-documentation-output* ;variable
380     #:*possibilities-gestures* ;variable
381     #:*standard-activation-gestures* ;variable
382     #:*undefined-text-style* ;constant
383     #:*unsupplied-argument-marker* ;variable
384     #:+background-ink+ ;constant
385     #:+black+ ;constant
386     #:+blue+ ;constant
387     #:+control-key+ ;constant
388     #:+cyan+ ;constant
389     #:+everywhere+ ;constant
390     #:+fill+ ;constant
391     #:+flipping-ink+ ;constant
392     #:+foreground-ink+ ;constant
393     #:+gadget-dialog-view+ ;constant
394     #:+gadget-menu-view+ ;constant
395     #:+gadget-view+ ;constant
396     #:+green+ ;constant
397     #:+hyper-key+ ;constant
398     #:+identity-transformation+ ;constant
399     #:+magenta+ ;constant
400     #:+meta-key+ ;constant
401     #:+nowhere+ ;constant
402     #:+pointer-documentation-view+ ;constant
403     #:+pointer-left-button+ ;constant
404     #:+pointer-middle-button+ ;constant
405     #:+pointer-right-button+ ;constant
406     #:+red+ ;constant
407     #:+shift-key+ ;constant
408     #:+super-key+ ;constant
409     #:+textual-dialog-view+ ;constant
410     #:+textual-menu-view+ ;constant
411     #:+textual-view+ ;constant
412 tmoore 1.47 #:+text-field-view+ ;constant (Franz User's Guide)
413 mikemac 1.33 #:+transparent-ink+ ;constant
414     #:+white+ ;constant
415     #:+yellow+ ;constant
416     #:abort-gesture ;condition
417     #:abort-gesture-event ;generic function
418     #:accelerator-gesture ;condition
419     #:accelerator-gesture-event ;generic function
420     #:accelerator-gesture-numeric-argument ;generic function
421     #:accept ;presentation method
422     #:accept ;function
423     #:accept-1 ;function
424     #:accept-from-string ;function
425     #:accept-present-default ;presentation method
426     #:accept-values ;frame
427     #:accept-values-command-button ;macro
428     #:accept-values-resynchronize ;generic function
429     #:accepting-values ;macro
430     #:action-gadget ;class
431     #:activate-callback ;callback
432     #:activate-gadget ;generic function
433     #:activation-gesture-p ;function
434     #:add-character-output-to-text-record ;generic function
435     #:add-command-to-command-table ;function
436     #:add-gesture-name ;function
437     #:add-input-editor-command ;function
438     #:add-keystroke-to-command-table ;function
439     #:add-menu-item-to-command-table ;function
440     #:add-output-record ;generic function
441     #:add-presentation-translator-to-command-table ;function
442     #:add-string-output-to-text-record ;generic function
443     #:adjust-item-list-cells ;generic function
444     #:adjust-multiple-columns ;generic function
445     #:adjust-table-cells ;generic function
446     #:adopt-frame ;generic function
447     #:allocate-medium ;generic function
448     #:allocate-pixmap ;generic function
449     #:allocate-space ;generic function
450     #:and ;presentation type
451     #:application-frame ;protocol class
452     #:application-frame-p ;predicate
453     #:application-pane ;pane
454     #:apply-presentation-generic-function ;macro
455     #:area ;protocol class
456     #:areap ;predicate
457     #:armed-callback ;callback
458     #:augment-draw-set ;generic function
459     #:basic-gadget ;class
460     #:basic-medium ;class
461     #:basic-pane ;class
462     #:basic-port ;class
463     #:basic-sheet ;class
464     #:bboard-pane ;pane
465     #:beep ;generic function
466     #:blank-area ;presentation type
467     #:boolean ;presentation type
468     #:bounding-rectangle ;protocol class
469     #:bounding-rectangle ;generic function
470     #:bounding-rectangle* ;generic function
471     #:bounding-rectangle-height ;generic function
472     #:bounding-rectangle-max-x ;generic function
473     #:bounding-rectangle-max-y ;generic function
474     #:bounding-rectangle-min-x ;generic function
475     #:bounding-rectangle-min-y ;generic function
476     #:bounding-rectangle-p ;predicate
477     #:bounding-rectangle-position ;generic function
478     #:bounding-rectangle-size ;generic function
479     #:bounding-rectangle-width ;generic function
480     #:bury-frame ;generic function
481     #:bury-mirror ;generic function
482     #:bury-sheet ;generic function
483     #:cache-output-record ;generic function
484     #:call-presentation-menu ;function
485     #:call-presentation-translator ;function
486     #:cell-align-x ;generic function
487     #:cell-align-y ;generic function
488     #:cell-min-height ;generic function
489     #:cell-min-width ;generic function
490     #:cell-output-record ;protocol class
491     #:cell-output-record-p ;predicate
492     #:change-space-requirements ;generic function
493     #:changing-space-requirements ;macro
494     #:character ;presentation type
495     #:check-box ;class
496     #:check-box-current-selection ;generic function
497     #:check-box-pane ;class
498     #:check-box-selections ;generic function
499     #:child-containing-position ;generic function
500     #:children-overlapping-rectangle* ;generic function
501     #:children-overlapping-region ;generic function
502     #:class-presentation-type-name ;function
503     #:clear-output-record ;generic function
504     #:client-setting ;setf method (through no reader)
505     #:clim-stream-pane ;pane
506     #:close ;generic function
507     #:color ;protocol class
508     #:color-ihs ;generic function
509     #:color-rgb ;generic function
510     #:colorp ;predicate
511     #:column-output-record ;protocol class
512     #:column-output-record-p ;predicate
513     #:command ;presentation type
514     #:command-accessible-in-command-table-p ;function
515     #:command-already-present ;error
516     #:command-arguments ;function
517     #:command-enabled ;generic function
518     #:command-line-command-parser ;function
519     #:command-line-command-unparser ;function
520     #:command-line-name-for-command ;function
521     #:command-line-read-remaining-arguments-for-partial-command ;function
522     #:command-menu-item-options ;function
523     #:command-menu-item-type ;function
524     #:command-menu-item-value ;function
525     #:command-menu-pane ;pane
526     #:command-name ;presentation type
527     #:command-name ;function
528     #:command-name-from-symbol ;function
529     #:command-not-accessible ;error
530     #:command-not-present ;error
531     #:command-or-form ;presentation type
532     #:command-present-in-command-table-p ;function
533     #:command-table ;protocol class
534     #:command-table-already-exists ;error
535     #:command-table-complete-input ;function
536     #:command-table-error ;error
537     #:command-table-inherit-from ;generic function
538     #:command-table-name ;generic function
539     #:command-table-not-found ;error
540     #:command-table-p ;predicate
541     #:complete-from-generator ;function
542     #:complete-from-possibilities ;function
543     #:complete-input ;function
544     #:completing-from-suggestions ;macro
545     #:completion ;presentation type
546     #:complex ;presentation type
547     #:compose-in ;generic function
548     #:compose-out ;generic function
549     #:compose-over ;generic function
550     #:compose-rotation-with-transformation ;function
551     #:compose-scaling-with-transformation ;function
552     #:compose-space ;generic function
553     #:compose-transformation-with-rotation ;function
554     #:compose-transformation-with-scaling ;function
555     #:compose-transformation-with-translation ;function
556     #:compose-transformations ;generic function
557     #:compose-translation-with-transformation ;function
558     #:compute-difference-set ;generic function
559     #:compute-new-output-records ;generic function
560     #:contrasting-dash-pattern-limit ;generic function
561     #:contrasting-inks-limit ;generic function
562     #:coordinate ;type
563     #:coordinate ;function
564     #:copy-area ;generic function
565     #:copy-from-pixmap ;function
566     #:copy-textual-output-history ;function
567     #:copy-to-pixmap ;function
568     #:cursor ;protocol class
569     #:cursor-active ;generic function
570     #:cursor-focus ;generic function
571     #:cursor-position ;generic function
572     #:cursor-sheet ;generic function
573     #:cursor-state ;generic function
574     #:cursor-visibility ;generic function
575     #:cursorp ;predicate
576     #:deactivate-gadget ;generic function
577     #:deallocate-medium ;generic function
578     #:deallocate-pixmap ;generic function
579     #:decache-child-output-record ;generic function
580     #:default-describe-presentation-type ;function
581     #:default-frame-top-level ;generic function
582     #:define-application-frame ;macro
583     #:define-border-type ;macro
584     #:define-command ;macro
585     #:define-command-table ;macro
586     #:define-default-presentation-method ;macro
587     #:define-drag-and-drop-translator ;macro
588     #:define-gesture-name ;macro
589     #:define-graph-type ;macro
590     #:define-presentation-action ;macro
591     #:define-presentation-generic-function ;macro
592     #:define-presentation-method ;macro
593     #:define-presentation-to-command-translator ;macro
594     #:define-presentation-translator ;macro
595     #:define-presentation-type ;macro
596     #:define-presentation-type-abbreviation ;macro
597     #:degraft-medium ;generic function
598     #:delegate-sheet-delegate ;generic function
599     #:delegate-sheet-input-mixin ;class
600     #:delete-gesture-name ;function
601     #:delete-output-record ;generic function
602     #:delimiter-gesture-p ;function
603     #:describe-presentation-type ;presentation method
604     #:describe-presentation-type ;function
605     #:design ;protocol class
606     #:designp ;predicate
607     #:destroy-frame ;generic function
608     #:destroy-mirror ;generic function
609     #:destroy-port ;generic function
610     #:device-event ;class
611     #:disable-frame ;generic function
612     #:disarmed-callback ;callback
613     #:disown-frame ;generic function
614     #:dispatch-event ;generic function
615     #:display-command-menu ;generic function
616     #:display-command-table-menu ;generic function
617     #:display-exit-boxes ;generic function
618     #:displayed-output-record ;protocol class
619     #:displayed-output-record-ink ;generic function
620     #:displayed-output-record-p ;predicate
621     #:distribute-event ;generic function
622     #:do-command-table-inheritance ;macro
623     #:document-presentation-translator ;function
624     #:drag-callback ;callback
625     #:drag-callback ;callback
626     #:drag-output-record ;generic function
627     #:dragging-output ;macro
628     #:draw-arrow ;function
629     #:draw-arrow* ;function
630     #:draw-circle ;function
631     #:draw-circle* ;function
632     #:draw-design ;generic function
633     #:draw-ellipse ;function
634     #:draw-ellipse* ;function
635     #:draw-line ;function
636     #:draw-line* ;function
637     #:draw-lines ;function
638     #:draw-lines* ;function
639     #:draw-oval ;function
640     #:draw-oval* ;function
641     #:draw-pattern* ;function
642     #:draw-point ;function
643     #:draw-point* ;function
644     #:draw-points ;function
645     #:draw-points* ;function
646     #:draw-polygon ;function
647     #:draw-polygon* ;function
648     #:draw-rectangle ;function
649     #:draw-rectangle* ;function
650     #:draw-rectangles ;function
651     #:draw-rectangles* ;function
652     #:draw-standard-menu ;function
653     #:draw-text ;function
654     #:draw-text* ;function
655     #:ellipse ;protocol class
656     #:ellipse-center-point ;generic function
657     #:ellipse-center-point* ;generic function
658     #:ellipse-end-angle ;generic function
659     #:ellipse-radii ;generic function
660     #:ellipse-start-angle ;generic function
661     #:ellipsep ;predicate
662     #:elliptical-arc ;protocol class
663     #:elliptical-arc-p ;predicate
664     #:enable-frame ;generic function
665     #:encapsulating-stream ;protocol class
666     #:encapsulating-stream-p ;predicate
667     #:encapsulating-stream-stream ;generic function
668     #:engraft-medium ;generic function
669     #:erase-input-buffer ;generic function
670     #:erase-output-record ;generic function
671     #:even-scaling-transformation-p ;generic function
672     #:event ;protocol class
673     #:event-listen ;generic function
674     #:event-matches-gesture-name-p ;function
675     #:event-modifier-state ;generic function
676     #:event-peek ;generic function
677     #:event-read ;generic function
678     #:event-read-no-hang ;generic function
679     #:event-sheet ;generic function
680     #:event-timestamp ;generic function
681     #:event-type ;generic function
682     #:event-unread ;generic function
683     #:eventp ;predicate
684     #:execute-frame-command ;generic function
685     #:expand-presentation-type-abbreviation ;function
686     #:expand-presentation-type-abbreviation-1 ;function
687     #:expression ;presentation type
688     #:extended-input-stream ;protocol class
689     #:extended-input-stream-p ;predicate
690     #:extended-output-stream ;protocol class
691     #:extended-output-stream-p ;predicate
692     #:filling-output ;macro
693     #:find-applicable-translators ;function
694     #:find-cached-output-record ;generic function
695     #:find-child-output-record ;generic function
696     #:find-command-from-command-line-name ;function
697     #:find-command-table ;function
698     #:find-frame-manager ;function
699     #:find-graft ;function
700     #:find-innermost-applicable-presentation ;function
701     #:find-keystroke-item ;function
702     #:find-menu-item ;function
703     #:find-pane-for-frame ;generic function
704     #:find-pane-named ;generic function
705     #:find-port ;function
706     #:find-presentation-translator ;function
707     #:find-presentation-translators ;function
708     #:find-presentation-type-class ;function
709     #:float ;presentation type
710     #:form ;presentation type
711     #:format-graph-from-roots ;function
712     #:format-items ;function
713     #:format-textual-list ;function
714     #:formatting-cell ;macro
715     #:formatting-column ;macro
716     #:formatting-item-list ;macro
717     #:formatting-row ;macro
718     #:formatting-table ;macro
719     #:frame-all-layouts ;generic function
720     #:frame-calling-frame ;generic function
721     #:frame-command-table ;generic function
722     #:frame-current-layout ;generic function
723     #:frame-current-panes ;generic function
724     #:frame-document-highlighted-presentation ;generic function
725     #:frame-drag-and-drop-feedback ;generic function
726     #:frame-drag-and-drop-highlighting ;generic function
727     #:frame-error-output ;generic function
728     #:frame-exit ;condition
729     #:frame-exit ;generic function
730     #:frame-exit-frame ;generic function
731     #:frame-find-innermost-applicable-presentation ;generic function
732     #:frame-input-context-button-press-handler ;generic function
733     #:frame-maintain-presentation-histories ;generic function
734     #:frame-manager ;protocol class
735     #:frame-manager ;generic function
736     #:frame-manager-frames ;generic function
737     #:frame-manager-menu-choose ;generic function
738     #:frame-manager-notify-user ;generic function
739     #:frame-mananger-p ;predicate
740     #:frame-name ;generic function
741     #:frame-panes ;generic function
742     #:frame-parent ;generic function
743     #:frame-pointer-documentation-output ;generic function
744     #:frame-pretty-name ;generic function
745     #:frame-properties ;generic function
746     #:frame-query-io ;generic function
747     #:frame-replay ;generic function
748     #:frame-standard-input ;generic function
749     #:frame-standard-output ;generic function
750     #:frame-state ;generic function
751     #:frame-top-level-sheet ;generic function
752     #:funcall-presentation-generic-function ;macro
753     #:fundamental-binary-input-stream ;class
754     #:fundamental-binary-output-stream ;class
755     #:fundamental-binary-stream ;class
756     #:fundamental-character-input-stream ;class
757     #:fundamental-character-output-stream ;class
758     #:fundamental-character-stream ;class
759     #:fundamental-input-stream ;class
760     #:fundamental-output-stream ;class
761     #:fundamental-stream ;class
762     #:gadget ;protocol class
763     #:gadget-activate-callback ;generic function
764     #:gadget-active-p ;generic function
765     #:gadget-armed-callback ;generic function
766     #:gadget-client ;generic function
767     #:gadget-dialog-view ;class
768     #:gadget-disarmed-callback ;generic function
769     #:gadget-id ;generic function
770     #:gadget-label ;generic function
771     #:gadget-label-align-x ;generic function
772     #:gadget-label-align-y ;generic function
773     #:gadget-max-value ;generic function
774     #:gadget-menu-view ;class
775     #:gadget-min-value ;generic function
776     #:gadget-orientation ;generic function
777     #:gadget-output-record ;class
778     #:gadget-range ;generic function
779     #:gadget-range* ;generic function
780     #:gadget-show-value-p ;generic function
781     #:gadget-value ;generic function
782     #:gadget-value-changed-callback ;generic function
783     #:gadget-view ;class
784     #:gadgetp ;predicate
785     #:generate-graph-nodes ;generic function
786     #:generate-panes ;generic function
787     #:generic-list-pane ;class
788     #:generic-option-pane ;class
789     #:get-frame-pane ;generic function
790     #:global-command-table ;command table
791     #:graft ;generic function
792     #:graft-height ;generic function
793     #:graft-orientation ;generic function
794     #:graft-pixels-per-inch ;function
795     #:graft-pixels-per-millimeter ;function
796     #:graft-units ;generic function
797     #:graft-width ;generic function
798     #:graph-node-children ;generic function
799     #:graph-node-object ;generic function
800     #:graph-node-output-record ;protocol class
801     #:graph-node-output-record-p ;predicate
802     #:graph-node-parents ;generic function
803     #:graph-output-record ;protocol class
804     #:graph-output-record-p ;predicate
805     #:graph-root-nodes ;generic function
806     #:graphics-displayed-output-record ;protocol class
807     #:graphics-displayed-output-record-p ;predicate
808     #:grid-pane ;pane
809     #:handle-event ;generic function
810     #:handle-repaint ;generic function
811     #:hbox-pane ;pane
812     #:highlight-applicable-presentation ;function
813     #:highlight-output-record ;generic function
814     #:highlight-presentation ;presentation method
815     #:horizontally ;macro
816     #:hrack-pane ;pane
817     #:identity-transformation-p ;generic function
818     #:immediate-repainting-mixin ;class
819     #:immediate-rescan ;generic function
820     #:immediate-sheet-input-mixin ;class
821     #:incremental-redisplay ;generic function
822     #:indenting-output ;macro
823     #:input-context-type ;function
824     #:input-editing-stream ;protocol class
825     #:input-editing-stream-p ;predicate
826     #:input-editor-format ;generic function
827     #:input-not-of-required-type ;error
828     #:input-not-of-required-type ;function
829     #:input-stream-p ;generic function
830     #:integer ;presentation type
831     #:interactive-stream-p ;predicate
832     #:interactor-pane ;pane
833     #:invalidate-cached-regions ;generic function
834     #:invalidate-cached-transformations ;generic function
835     #:invert-transformation ;generic function
836     #:invertible-transformation-p ;generic function
837     #:invoke-updating-output ;generic function
838     #:invoke-with-drawing-options ;generic function
839     #:invoke-with-new-output-record ;generic function
840     #:invoke-with-output-recording-options ;generic function
841     #:invoke-with-output-to-output-record ;generic function
842     #:invoke-with-text-style ;generic function
843     #:item-list-output-record ;protocol class
844     #:item-list-output-record-p ;predicate
845     #:key-press-event ;class
846     #:key-release-event ;class
847     #:keyboard-event ;class
848     #:keyboard-event-character ;generic function
849     #:keyboard-event-key-name ;generic function
850     #:keyword ;presentation type
851     #:label-pane ;pane
852     #:labelled-gadget-mixin ;class
853     #:labelling ;macro
854     #:layout-frame ;generic function
855     #:layout-graph-edges ;generic function
856     #:layout-graph-nodes ;generic function
857     #:line ;protocol class
858     #:line-end-point ;generic function
859     #:line-end-point* ;generic function
860     #:line-start-point ;generic function
861     #:line-start-point* ;generic function
862     #:line-style ;protocol class
863     #:line-style-cap-shape ;generic function
864     #:line-style-dashes ;generic function
865     #:line-style-joint-shape ;generic function
866     #:line-style-p ;predicate
867     #:line-style-thickness ;generic function
868     #:line-style-unit ;generic function
869     #:linep ;predicate
870     #:list-pane ;class
871     #:lookup-keystroke-command-item ;function
872     #:lookup-keystroke-item ;function
873     #:make-3-point-transformation ;function
874     #:make-3-point-transformation* ;function
875     #:make-application-frame ;function
876     #:make-bounding-rectangle ;function
877     #:make-clim-application-pane ;function
878     #:make-clim-interactor-pane ;function
879     #:make-clim-stream-pane ;function
880     #:make-command-table ;function
881     #:make-contrasting-dash-patterns ;function
882     #:make-contrasting-inks ;function
883     #:make-design-from-output-record ;generic function
884     #:make-device-font-text-style ;function
885     #:make-ellipse ;function
886     #:make-ellipse* ;function
887     #:make-elliptical-arc ;function
888     #:make-elliptical-arc* ;function
889     #:make-flipping-ink ;function
890     #:make-gray-color ;function
891     #:make-ihs-color ;function
892     #:make-line ;function
893     #:make-line* ;function
894     #:make-line-style ;function
895     #:make-medium ;generic function
896     #:make-modifier-state ;function
897     #:make-opacity ;function
898     #:make-pane ;function
899     #:make-pane-1 ;generic function
900     #:make-pattern ;function
901     #:make-pattern-from-bitmap-file ;function
902     #:make-point ;function
903     #:make-polygon ;function
904     #:make-polygon* ;function
905     #:make-polyline ;function
906     #:make-polyline* ;function
907     #:make-presentation-type-specifier ;function
908     #:make-rectangle ;function
909     #:make-rectangle* ;function
910     #:make-rectangular-tile ;function
911     #:make-reflection-transformation ;function
912     #:make-reflection-transformation* ;function
913     #:make-rgb-color ;function
914     #:make-rotation-transformation ;function
915     #:make-rotation-transformation* ;function
916     #:make-scaling-transformation ;function
917     #:make-scaling-transformation* ;function
918     #:make-space-requirement ;function
919     #:make-stencil ;function
920     #:make-text-style ;function
921     #:make-transformation ;function
922     #:make-translation-transformation ;function
923     #:map-over-command-table-commands ;function
924     #:map-over-command-table-keystrokes ;function
925     #:map-over-command-table-menu-items ;function
926     #:map-over-command-table-names ;function
927     #:map-over-command-table-translators ;function
928     #:map-over-frames ;function
929     #:map-over-grafts ;function
930     #:map-over-item-list-cells ;generic function
931     #:map-over-output-records ;generic function
932     #:map-over-output-records-containing-position ;generic function
933     #:map-over-output-records-overlapping-region ;generic function
934     #:map-over-polygon-coordinates ;generic function
935     #:map-over-polygon-segments ;generic function
936     #:map-over-ports ;function
937     #:map-over-presentation-type-supertypes ;presentation method
938     #:map-over-presentation-type-supertypes ;function
939     #:map-over-region-set-regions ;generic function
940     #:map-over-row-cells ;generic function
941     #:map-over-row-cells ;generic function
942     #:map-over-sheets ;generic function
943     #:map-over-sheets-containing-position ;generic function
944     #:map-over-sheets-overlapping-region ;generic function
945     #:map-over-table-elements ;generic function
946     #:map-sheet-position-to-child ;generic function
947     #:map-sheet-position-to-parent ;generic function
948     #:map-sheet-rectangle*-to-child ;generic function
949     #:map-sheet-rectangle*-to-parent ;generic function
950     #:match-output-records ;generic function
951     #:medium ;protocol class
952     #:medium-background ;generic function
953     #:medium-background ;generic function
954     #:medium-beep ;generic function
955     #:medium-buffering-output-p ;generic function
956     #:medium-clear-area ;generic function
957     #:medium-clipping-region ;generic function
958     #:medium-clipping-region ;generic function
959     #:medium-copy-area ;generic function
960     #:medium-current-text-style ;generic function
961     #:medium-default-text-style ;generic function
962     #:medium-default-text-style ;generic function
963     #:medium-draw-ellipse* ;generic function
964     #:medium-draw-line* ;generic function
965     #:medium-draw-lines* ;generic function
966     #:medium-draw-point* ;generic function
967     #:medium-draw-points* ;generic function
968     #:medium-draw-polygon* ;generic function
969     #:medium-draw-rectangle* ;generic function
970     #:medium-draw-rectangles* ;generic function
971     #:medium-draw-text* ;generic function
972     #:medium-drawable ;generic function
973     #:medium-finish-output ;generic function
974     #:medium-force-output ;generic function
975     #:medium-foreground ;generic function
976     #:medium-foreground ;generic function
977     #:medium-ink ;generic function
978     #:medium-ink ;generic function
979     #:medium-line-style ;generic function
980     #:medium-line-style ;generic function
981     #:medium-merged-text-style ;generic function
982     #:medium-sheet ;generic function
983     #:medium-text-style ;generic function
984     #:medium-text-style ;generic function
985     #:medium-transformation ;generic function
986     #:medium-transformation ;generic function
987     #:mediump ;predicate
988     #:member ;presentation type abbrev
989     #:member-alist ;presentation type abbrev
990     #:member-sequence ;presentation type abbrev
991     #:menu-button ;class
992     #:menu-button-pane ;class
993     #:menu-choose ;generic function
994     #:menu-choose-command-from-command-table ;function
995     #:menu-choose-from-drawer ;generic function
996     #:menu-command-parser ;function
997     #:menu-item ;presentation type (mentioned in the description of draw-standard-menu)
998     #:menu-item-display ;function
999     #:menu-item-options ;function
1000     #:menu-item-value ;function
1001     #:menu-read-remaining-arguments-for-partial-command ;function
1002     #:merge-text-styles ;generic function
1003     #:mirrored-sheet-mixin ;class
1004     #:modifier-state-matches-gesture-name-p ;function
1005     #:move-and-resize-sheet ;generic function
1006     #:move-sheet ;generic function
1007     #:new-page ;function
1008     #:nil ;presentation type
1009     #:note-command-disabled ;generic function
1010     #:note-command-enabled ;generic function
1011     #:note-frame-deiconified ;generic function
1012     #:note-frame-disabled ;generic function
1013     #:note-frame-enabled ;generic function
1014     #:note-frame-iconified ;generic function
1015     #:note-gadget-activated ;generic function
1016     #:note-gadget-deactivated ;generic function
1017     #:note-output-record-child-changed ;generic function
1018     #:note-sheet-adopted ;generic function
1019     #:note-sheet-degrafted ;generic function
1020     #:note-sheet-disabled ;generic function
1021     #:note-sheet-disowned ;generic function
1022     #:note-sheet-enabled ;generic function
1023     #:note-sheet-grafted ;generic function
1024     #:note-sheet-region-changed ;generic function
1025     #:note-sheet-transformation-changed ;generic function
1026     #:note-space-requirements-changed ;generic function
1027     #:notify-user ;generic function
1028     #:null ;presentation type
1029     #:null-or-type ;presentation type abbrev
1030     #:number ;presentation type
1031     #:opacity ;protocol class
1032     #:opacity-value ;generic function
1033     #:opacityp ;predicate
1034     #:open-stream-p ;generic function
1035     #:open-window-stream ;function
1036     #:option-pane ;class
1037     #:or ;presentation type
1038     #:oriented-gadget-mixin ;class
1039     #:outlined-pane ;pane
1040     #:outlining ;macro
1041     #:output-record ;protocol class
1042     #:output-record-cache-value ;generic function
1043     #:output-record-children ;generic function
1044     #:output-record-contents-ok ;generic function
1045     #:output-record-count ;generic function
1046     #:output-record-displayer ;generic function
1047     #:output-record-end-cursor-position ;generic function
1048     #:output-record-fixed-position ;generic function
1049     #:output-record-hit-detection-rectangle* ;generic function
1050     #:output-record-p ;predicate
1051     #:output-record-parent ;generic function
1052     #:output-record-position ;generic function
1053     #:output-record-refined-position-test ;generic function
1054     #:output-record-start-cursor-position ;generic function
1055     #:output-record-unique-id ;generic function
1056     #:output-recording-stream ;protocol class
1057     #:output-recording-stream-p ;predicate
1058     #:output-stream-p ;generic function
1059     #:pane ;protocol class
1060     #:pane-background ;generic function
1061     #:pane-foreground ;generic function
1062     #:pane-frame ;generic function
1063     #:pane-name ;generic function
1064     #:pane-needs-redisplay ;generic function
1065     #:pane-scroller ;generic function
1066     #:pane-text-style ;generic function
1067     #:pane-viewport ;generic function
1068     #:pane-viewport-region ;generic function
1069     #:panep ;predicate
1070     #:parse-text-style ;function
1071     #:partial-command-p ;function
1072     #:path ;protocol class
1073     #:pathname ;presentation type
1074     #:pathp ;predicate
1075     #:pattern-height ;generic function
1076     #:pattern-width ;generic function
1077     #:permanent-medium-sheet-output-mixin ;class
1078     #:pixmap-depth ;generic function
1079     #:pixmap-height ;generic function
1080     #:pixmap-width ;generic function
1081     #:point ;protocol class
1082     #:point-position ;generic function
1083     #:point-x ;generic function
1084     #:point-y ;generic function
1085     #:pointer ;protocol class
1086     #:pointer-boundary-event ;class
1087     #:pointer-boundary-event-kind ;generic function
1088     #:pointer-button-event ;class
1089     #:pointer-button-hold-event ;class
1090     #:pointer-button-press-event ;class
1091     #:pointer-button-release-event ;class
1092     #:pointer-button-state ;generic function
1093     #:pointer-click-and-hold-event ;class
1094     #:pointer-click-event ;class
1095     #:pointer-cursor ;generic function
1096     #:pointer-documentation-pane ;pane
1097     #:pointer-documentation-view ;class
1098     #:pointer-double-click-event ;class
1099     #:pointer-enter-event ;class
1100     #:pointer-event ;class
1101     #:pointer-event-button ;generic function
1102     #:pointer-event-native-x ;generic function
1103     #:pointer-event-native-y ;generic function
1104     #:pointer-event-pointer ;generic function
1105     #:pointer-event-x ;generic function
1106     #:pointer-event-y ;generic function
1107     #:pointer-exit-event ;class
1108     #:pointer-motion-event ;class
1109     #:pointer-position ;generic function
1110     #:pointer-sheet ;generic function
1111     #:pointerp ;predicate
1112     #:pointp ;predicate
1113     #:polygon ;protocol class
1114     #:polygon-points ;generic function
1115     #:polygonp ;predicate
1116     #:polyline ;protocol class
1117     #:polyline-closed ;generic function
1118     #:polylinep ;predicate
1119     #:port ;protocol class
1120     #:port ;generic function
1121     #:port-keyboard-input-focus ;generic function
1122 tmoore 1.47 #:port-modifier-state ;generic function (in franz user guide)
1123 mikemac 1.33 #:port-name ;generic function
1124     #:port-pointer ;generic function (in franz user guide)
1125     #:port-properties ;generic function
1126     #:port-server-path ;generic function
1127     #:port-type ;generic function
1128     #:portp ;predicate
1129     #:present ;presentation method
1130     #:present ;function
1131     #:present-to-string ;function
1132     #:presentation ;protocol class
1133     #:presentation-default-preprocessor ;presentation method
1134     #:presentation-matches-context-type ;function
1135     #:presentation-modifier ;generic function
1136     #:presentation-object ;generic function
1137     #:presentation-refined-position-test ;presentation method
1138     #:presentation-replace-input ;generic function
1139     #:presentation-single-box ;generic function
1140     #:presentation-subtypep ;presentation method
1141     #:presentation-subtypep ;function
1142     #:presentation-type ;generic function
1143     #:presentation-type-direct-supertypes ;function
1144     #:presentation-type-history ;presentation method
1145     #:presentation-type-name ;function
1146     #:presentation-type-of ;function
1147     #:presentation-type-options ;function
1148     #:presentation-type-parameters ;function
1149     #:presentation-type-specifier-p ;presentation method
1150     #:presentation-type-specifier-p ;function
1151     #:presentation-typep ;presentation method
1152     #:presentation-typep ;function
1153     #:presentationp ;predicate
1154     #:print-menu-item ;function
1155     #:process-next-event ;generic function
1156     #:prompt-for-accept ;generic function
1157     #:prompt-for-accept-1 ;function
1158     #:propagate-output-record-changes ;generic function
1159     #:propagate-output-record-changes-p ;generic function
1160     #:push-button ;class
1161     #:push-button-pane ;class
1162     #:push-button-show-as-default ;generic function
1163     #:queue-event ;generic function
1164     #:queue-repaint ;generic function
1165     #:queue-rescan ;generic function
1166     #:radio-box ;class
1167     #:radio-box-current-selection ;generic function
1168     #:radio-box-pane ;class
1169     #:radio-box-selections ;generic function
1170     #:raise-frame ;generic function
1171     #:raise-mirror ;generic function
1172     #:raise-sheet ;generic function
1173     #:range-gadget-mixin ;class
1174     #:ratio ;presentation type
1175     #:rational ;presentation type
1176     #:read-bitmap-file ;generic function
1177     #:read-command ;function
1178     #:read-command-using-keystrokes ;function
1179     #:read-frame-command ;generic function
1180     #:read-gesture ;function
1181     #:read-token ;function
1182     #:real ;presentation type
1183     #:realize-mirror ;generic function
1184     #:recompute-contents-ok ;generic function
1185     #:recompute-extent-for-changed-child ;generic function
1186     #:recompute-extent-for-new-child ;generic function
1187     #:rectangle ;protocol class
1188     #:rectangle-edges* ;generic function
1189     #:rectangle-height ;generic function
1190     #:rectangle-max-point ;generic function
1191     #:rectangle-max-x ;generic function
1192     #:rectangle-max-y ;generic function
1193     #:rectangle-min-point ;generic function
1194     #:rectangle-min-x ;generic function
1195     #:rectangle-min-y ;generic function
1196     #:rectangle-size ;generic function
1197     #:rectangle-width ;generic function
1198     #:rectanglep ;predicate
1199     #:rectilinear-transformation-p ;generic function
1200     #:redisplay ;function
1201     #:redisplay-frame-pane ;generic function
1202     #:redisplay-frame-panes ;generic function
1203     #:redisplay-output-record ;generic function
1204     #:redisplayable-stream-p ;generic function
1205     #:redraw-input-buffer ;generic function
1206     #:reflection-transformation-p ;generic function
1207     #:reflection-underspecified ;error
1208     #:region ;protocol class
1209     #:region-contains-position-p ;generic function
1210     #:region-contains-region-p ;generic function
1211     #:region-difference ;generic function
1212     #:region-equal ;generic function
1213     #:region-intersection ;generic function
1214     #:region-intersects-region-p ;generic function
1215     #:region-set ;protocol class
1216     #:region-set-p ;predicate
1217     #:region-set-regions ;generic function
1218     #:region-union ;generic function
1219     #:regionp ;predicate
1220     #:remove-command-from-command-table ;function
1221     #:remove-keystroke-from-command-table ;function
1222     #:remove-menu-item-from-command-table ;function
1223     #:remove-presentation-translator-from-command-table ;function
1224     #:reorder-sheets ;generic function
1225     #:repaint-sheet ;generic function
1226     #:replace-input ;generic function
1227     #:replay ;function
1228     #:replay-output-record ;generic function
1229     #:rescan-if-necessary ;generic function
1230     #:reset-frame ;generic function
1231     #:reset-scan-pointer ;generic function
1232     #:resize-sheet ;generic function
1233     #:restart-port ;generic function
1234     #:restraining ;macro
1235     #:restraining-pane ;pane
1236     #:rigid-transformation-p ;generic function
1237     #:row-output-record ;protocol class
1238     #:row-output-record-p ;predicate
1239     #:run-frame-top-level ;generic function
1240     #:scaling-transformation-p ;generic function
1241     #:scroll-bar ;class
1242     #:scroll-bar-drag-callback ;generic function
1243     #:scroll-bar-pane ;class
1244     #:scroll-bar-scroll-down-line-callback ;generic function
1245     #:scroll-bar-scroll-down-page-callback ;generic function
1246     #:scroll-bar-scroll-to-bottom-callback ;generic function
1247     #:scroll-bar-scroll-to-top-callback ;generic function
1248     #:scroll-bar-scroll-up-line-callback ;generic function
1249     #:scroll-bar-scroll-up-page-callback ;generic function
1250     #:scroll-down-line-callback ;callback
1251     #:scroll-down-page-callback ;callback
1252     #:scroll-extent ;generic function
1253     #:scroll-to-bottom-callback ;callback
1254     #:scroll-to-top-callback ;callback
1255     #:scroll-up-line-callback ;callback
1256     #:scroll-up-page-callback ;callback
1257     #:scroller-pane ;pane
1258     #:scrolling ;macro
1259     #:sequence ;presentation type
1260     #:sequence-enumerated ;presentation type
1261     #:set-highlighted-presentation ;function
1262     #:sheet ;protocol class
1263     #:sheet-adopt-child ;generic function
1264     #:sheet-allocated-region ;generic function
1265     #:sheet-ancestor-p ;generic function
1266     #:sheet-children ;generic function
1267     #:sheet-delta-transformation ;generic function
1268     #:sheet-device-region ;generic function
1269     #:sheet-device-transformation ;generic function
1270     #:sheet-direct-mirror ;generic function
1271     #:sheet-disown-child ;generic function
1272     #:sheet-enabled-children ;generic function
1273     #:sheet-enabled-p ;generic function
1274     #:sheet-event-queue ;generic function
1275     #:sheet-grafted-p ;generic function
1276     #:sheet-identity-transformation-mixin ;class
1277     #:sheet-leaf-mixin ;class
1278     #:sheet-medium ;generic function
1279     #:sheet-mirror ;generic function
1280     #:sheet-mirrored-ancestor ;generic function
1281     #:sheet-multiple-child-mixin ;class
1282     #:sheet-mute-input-mixin ;class
1283     #:sheet-mute-output-mixin ;class
1284     #:sheet-mute-repainting-mixin ;class
1285     #:sheet-native-region ;generic function
1286     #:sheet-native-transformation ;generic function
1287     #:sheet-occluding-sheets ;generic function
1288     #:sheet-parent ;generic function
1289     #:sheet-parent-mixin ;class
1290     #:sheet-region ;generic function
1291     #:sheet-siblings ;generic function
1292     #:sheet-single-child-mixin ;class
1293     #:sheet-transformation ;generic function
1294     #:sheet-transformation-mixin ;class
1295     #:sheet-translation-mixin ;class
1296     #:sheet-viewable-p ;generic function
1297     #:sheet-with-medium-mixin ;class
1298     #:sheet-y-inverting-transformation-mixin ;class
1299     #:sheetp ;predicate
1300     #:shrink-frame ;generic function
1301     #:simple-completion-error ;condition
1302     #:simple-parse-error ;error
1303     #:simple-parse-error ;function
1304     #:singular-transformation ;error
1305     #:slider ;class
1306     #:slider-drag-callback ;generic function
1307     #:slider-pane ;class
1308     #:space-requirement ;class
1309     #:space-requirement+ ;function
1310     #:space-requirement+* ;function
1311     #:space-requirement-combine ;function
1312     #:space-requirement-components ;generic function
1313     #:space-requirement-height ;generic function
1314     #:space-requirement-max-height ;generic function
1315     #:space-requirement-max-width ;generic function
1316     #:space-requirement-min-height ;generic function
1317     #:space-requirement-min-width ;generic function
1318     #:space-requirement-width ;generic function
1319     #:spacing ;macro
1320     #:spacing-pane ;pane
1321     #:standard-application-frame ;class
1322     #:standard-bounding-rectangle ;class
1323     #:standard-cell-output-record ;class
1324     #:standard-column-output-record ;class
1325     #:standard-command-table ;class
1326     #:standard-ellipse ;class
1327     #:standard-elliptical-arc ;class
1328     #:standard-encapsulating-stream ;class
1329     #:standard-extended-input-stream ;class
1330     #:standard-extended-output-stream ;class
1331     #:standard-graph-node-output-record ;class
1332     #:standard-graph-output-record ;class
1333     #:standard-input-editing-stream ;class
1334     #:standard-input-stream ;class
1335     #:standard-item-list-output-record ;class
1336     #:standard-line ;class
1337     #:standard-line-style ;class
1338     #:standard-output-recording-stream ;class
1339     #:standard-output-stream ;class
1340     #:standard-point ;class
1341     #:standard-pointer ;class
1342     #:standard-polygon ;class
1343     #:standard-polyline ;class
1344     #:standard-presentation ;class
1345     #:standard-rectangle ;class
1346     #:standard-region-difference ;class
1347     #:standard-region-intersection ;class
1348     #:standard-region-union ;class
1349     #:standard-repainting-mixin ;class
1350     #:standard-row-output-record ;class
1351     #:standard-sequence-output-history ;class
1352     #:standard-sequence-output-record ;class
1353     #:standard-sheet-input-mixin ;class
1354     #:standard-sheet-output-mixin ;class
1355     #:standard-table-output-record ;class
1356     #:standard-text-cursor ;class
1357     #:standard-text-style ;class
1358     #:standard-tree-output-history ;class
1359     #:standard-tree-output-record ;class
1360     #:standard-updating-output-record ;class
1361     #:stream-accept ;generic function
1362     #:stream-add-character-output ;generic function
1363     #:stream-add-output-record ;generic function
1364     #:stream-add-string-output ;generic function
1365     #:stream-advance-to-column ;generic function
1366     #:stream-advance-to-column ;generic function
1367     #:stream-baseline ;generic function
1368     #:stream-character-width ;generic function
1369     #:stream-clear-input ;generic function
1370     #:stream-clear-input ;generic function
1371     #:stream-clear-output ;generic function
1372     #:stream-clear-output ;generic function
1373     #:stream-close-text-output-record ;generic function
1374     #:stream-current-output-record ;generic function
1375     #:stream-cursor-position ;generic function
1376     #:stream-default-view ;generic function
1377     #:stream-drawing-p ;generic function
1378     #:stream-element-type ;generic function
1379     #:stream-end-of-line-action ;generic function
1380     #:stream-end-of-page-action ;generic function
1381     #:stream-finish-output ;generic function
1382     #:stream-finish-output ;generic function
1383     #:stream-force-output ;generic function
1384     #:stream-force-output ;generic function
1385     #:stream-fresh-line ;generic function
1386     #:stream-fresh-line ;generic function
1387     #:stream-increment-cursor-position ;generic function
1388     #:stream-input-buffer ;generic function
1389     #:stream-input-wait ;generic function
1390     #:stream-insertion-pointer ;generic function
1391     #:stream-line-column ;generic function
1392     #:stream-line-column ;generic function
1393     #:stream-line-height ;generic function
1394     #:stream-listen ;generic function
1395     #:stream-listen ;generic function
1396     #:stream-output-history ;generic function
1397     #:stream-output-history-mixin ;class
1398     #:stream-pathname ;generic function
1399     #:stream-peek-char ;generic function
1400     #:stream-peek-char ;generic function
1401     #:stream-pointer-position ;generic function
1402     #:stream-present ;generic function
1403     #:stream-process-gesture ;generic function
1404     #:stream-read-byte ;generic function
1405     #:stream-read-char ;generic function
1406     #:stream-read-char ;generic function
1407     #:stream-read-char-no-hang ;generic function
1408     #:stream-read-char-no-hang ;generic function
1409     #:stream-read-gesture ;generic function
1410     #:stream-read-line ;generic function
1411     #:stream-read-line ;generic function
1412     #:stream-recording-p ;generic function
1413     #:stream-redisplaying-p ;generic function
1414     #:stream-replay ;generic function
1415     #:stream-rescanning-p ;generic function
1416     #:stream-scan-pointer ;generic function
1417     #:stream-set-input-focus ;generic function
1418     #:stream-start-line-p ;generic function
1419     #:stream-start-line-p ;generic function
1420     #:stream-string-width ;generic function
1421     #:stream-terpri ;generic function
1422     #:stream-terpri ;generic function
1423     #:stream-text-cursor ;generic function
1424     #:stream-text-margin ;generic function
1425     #:stream-text-output-record ;generic function
1426     #:stream-truename ;generic function
1427     #:stream-unread-char ;generic function
1428     #:stream-unread-char ;generic function
1429     #:stream-unread-gesture ;generic function
1430     #:stream-vertical-spacing ;generic function
1431     #:stream-write-byte ;generic function
1432     #:stream-write-char ;generic function
1433     #:stream-write-char ;generic function
1434     #:stream-write-string ;generic function
1435     #:stream-write-string ;generic function
1436     #:streamp ;generic function
1437     #:string ;presentation type
1438     #:subset ;presentation type abbrev
1439     #:subset-alist ;presentation type abbrev
1440     #:subset-completion ;presentation type
1441     #:subset-sequence ;presentation type abbrev
1442     #:substitute-numeric-argument-marker ;function
1443     #:suggest ;function
1444     #:surrounding-output-with-border ;macro
1445     #:symbol ;presentation type
1446     #:t ;presentation type
1447     #:table-output-record ;protocol class
1448     #:table-output-record-p ;predicate
1449     #:table-pane ;pane
1450     #:tabling ;macro
1451     #:temporary-medium-sheet-output-mixin ;class
1452     #:test-presentation-translator ;function
1453     #:text-displayed-output-record ;protocol class
1454     #:text-displayed-output-record-p ;predicate
1455     #:text-displayed-output-record-string ;generic function
1456     #:text-editor ;class
1457     #:text-editor-pane ;class
1458     #:text-field ;class
1459     #:text-field-pane ;class
1460 tmoore 1.47 #:text-field-view ;class (Franz User's Guide)
1461 mikemac 1.33 #:text-size ;generic function
1462     #:text-style ;protocol class
1463     #:text-style-ascent ;generic function
1464     #:text-style-components ;generic function
1465     #:text-style-descent ;generic function
1466     #:text-style-face ;generic function
1467     #:text-style-family ;generic function
1468     #:text-style-fixed-width-p ;generic function
1469     #:text-style-height ;generic function
1470     #:text-style-mapping ;generic function
1471     #:text-style-p ;predicate
1472     #:text-style-size ;generic function
1473     #:text-style-width ;generic function
1474     #:textual-dialog-view ;class
1475     #:textual-menu-view ;class
1476     #:textual-view ;class
1477     #:throw-highlighted-presentation ;function
1478     #:timer-event ;class
1479     #:title-pane ;pane
1480     #:toggle-button ;class
1481     #:toggle-button-indicator-type ;generic function
1482     #:toggle-button-pane ;class
1483     #:token-or-type ;presentation type abbrev
1484     #:tracking-pointer ;macro
1485     #:transform-distance ;generic function
1486     #:transform-position ;generic function
1487     #:transform-rectangle* ;generic function
1488     #:transform-region ;generic function
1489     #:transformation ;protocol class
1490     #:transformation-equal ;generic function
1491     #:transformation-error ;error
1492     #:transformation-underspecified ;error
1493     #:transformationp ;predicate
1494     #:translation-transformation-p ;generic function
1495     #:tree-recompute-extent ;generic function
1496     #:type-or-string ;presentation type abbrev
1497     #:unhighlight-highlighted-presentation ;function
1498     #:unread-gesture ;function
1499     #:untransform-distance ;generic function
1500     #:untransform-position ;generic function
1501     #:untransform-rectangle* ;generic function
1502     #:untransform-region ;generic function
1503     #:updating-output ;macro
1504     #:updating-output-record ;protocol class
1505     #:updating-output-record-p ;predicate
1506     #:user-command-table ;command table
1507     #:value-changed-callback ;callback
1508     #:value-gadget ;class
1509     #:vbox-pane ;pane
1510     #:vertically ;macro
1511     #:view ;protocol class
1512     #:viewp ;predicate
1513     #:vrack-pane ;pane
1514     #:window-clear ;generic function
1515     #:window-configuration-event ;class
1516     #:window-erase-viewport ;generic function
1517     #:window-event ;class
1518     #:window-event-mirrored-sheet ;generic function
1519     #:window-event-native-region ;generic function
1520     #:window-event-region ;generic function
1521     #:window-manager-delete-event ;class
1522     #:window-manager-event ;class
1523     #:window-refresh ;generic function
1524     #:window-repaint-event ;class
1525     #:window-viewport ;generic function
1526     #:window-viewport-position ;generic function
1527     #:with-accept-help ;macro
1528     #:with-activation-gestures ;macro
1529     #:with-application-frame ;macro
1530     #:with-bounding-rectangle* ;macro
1531     #:with-command-table-keystrokes ;macro
1532     #:with-delimiter-gestures ;macro
1533     #:with-drawing-options ;macro
1534     #:with-end-of-line-action ;macro
1535     #:with-end-of-page-action ;macro
1536     #:with-first-quadrant-coordinates ;macro
1537     #:with-frame-manager ;macro
1538     #:with-graft-locked ;macro
1539     #:with-identity-transformation ;macro
1540     #:with-input-context ;macro
1541     #:with-input-editing ;macro
1542     #:with-input-editor-typeout ;macro
1543     #:with-input-focus ;macro
1544     #:with-local-coordinates ;macro
1545     #:with-look-and-feel-realization ;macro
1546     #:with-menu ;macro
1547     #:with-new-output-record ;macro
1548     #:with-output-as-gadget ;macro
1549     #:with-output-as-presentation ;macro
1550     #:with-output-buffered ;macro
1551     #:with-output-recording-options ;macro
1552     #:with-output-to-output-record ;macro
1553     #:with-output-to-pixmap ;macro
1554     #:with-output-to-postscript-stream ;macro
1555     #:with-port-locked ;macro
1556     #:with-presentation-type-decoded ;macro
1557     #:with-presentation-type-options ;macro
1558     #:with-presentation-type-parameters ;macro
1559     #:with-radio-box ;macro
1560     #:with-room-for-graphics ;macro
1561     #:with-rotation ;macro
1562     #:with-scaling ;macro
1563     #:with-sheet-medium ;macro
1564     #:with-sheet-medium-bound ;macro
1565     #:with-text-face ;macro
1566     #:with-text-family ;macro
1567     #:with-text-size ;macro
1568     #:with-text-style ;macro
1569     #:with-translation ;macro
1570     #:write-token ;function
1571 gilbert 1.17 )
1572    
1573     ;;;; symbols, which were exported as of 2002-02-09, but no longer are.
1574    
1575 mikemac 1.33 ;; dispatch-repaint:
1576 gilbert 1.17 ;; several mentions in silica.tex.
1577    
1578 mikemac 1.33 ;; invoke-accept-values-command-button
1579 gilbert 1.17 ;; mentioned in dialogs.tex.
1580    
1581 mikemac 1.33 ;; labelled
1582 gilbert 1.17
1583 mikemac 1.33 ;; labelled-gadget, through there is a labelled-gadget-mixin
1584     ;; mute-repainting-mixin, through there is a sheet-mute-repainting-mixin
1585     ;; oriented-gadget, through there is a oriented-gadget-mixin
1586 gilbert 1.17
1587 mikemac 1.33 ;; output-record-refined-sensitivity-test:
1588     ;; there is mention of this symbol in output-recording.tex. spelling error?
1589 gilbert 1.17
1590 mikemac 1.33 ;; pointer-button-click-event
1591     ;; this is mentioned in silica.tex. spelling error?
1592 gilbert 1.17
1593     ;;;; absolutly no mention of the following in the spec:
1594    
1595 mikemac 1.33 ;; add-watcher
1596     ;; bordering
1597     ;; border-pane
1598     ;; delete-watcher
1599     ;; display-cursor
1600     ;; draw-triangle
1601     ;; draw-triangle*
1602     ;; frame-pane
1603     ;; gadget-label-text-style
1604     ;; gesture-processing-handler
1605     ;; key-modifier-state-match-p
1606     ;; mute-sheet-input-mixin
1607     ;; mute-sheet-output-mixin
1608     ;; note-frame-state-changed
1609     ;; panes-need-redisplay
1610     ;; pointer-button-click-and-hold-event
1611     ;; pointer-button-double-click-event
1612     ;; pointer-buttons
1613     ;; pointer-port
1614     ;; port-draw-character*
1615     ;; port-draw-ellipse*
1616     ;; port-draw-line*
1617     ;; port-draw-lines*
1618     ;; port-draw-point*
1619     ;; port-draw-points*
1620     ;; port-draw-polygon*
1621     ;; port-draw-rectangle*
1622     ;; port-draw-string*
1623     ;; push-button-show-as-default-p
1624     ;; reset-watcher
1625     ;; scroll-bar-drag-down-line-callback
1626     ;; scroll-bar-drag-down-page-callback
1627     ;; scroll-bar-drag-up-line-callback
1628     ;; scroll-bar-drag-up-page-callback
1629     ;; spacer-pane
1630     ;; standard-gadget
1631     ;; stream-pointers
1632     ;; stream-primary-pointer
1633     ;; stream-redisplayable-p
1634     ;; stream-restore-input-focus
1635 gilbert 1.17
1636 hefner1 1.36 ;;; Vendor extensions which are exported from the CLIM package
1637     (:export
1638 hefner1 1.40 #:+pointer-wheel-up+
1639     #:+pointer-wheel-down+
1640 hefner1 1.36 #:sheet-pointer-cursor)
1641 gilbert 1.14
1642 mikemac 1.33 ;;; x11 color names - some are not in the spec - mikemac
1643 cvs 1.1 (:export
1644 mikemac 1.33 #:+snow+ #:+ghost-white+ #:+ghostwhite+ #:+white-smoke+
1645     #:+whitesmoke+ #:+gainsboro+ #:+floral-white+ #:+floralwhite+
1646     #:+old-lace+ #:+oldlace+ #:+linen+ #:+antique-white+
1647     #:+antiquewhite+ #:+papaya-whip+ #:+papayawhip+ #:+blanched-almond+
1648     #:+blanchedalmond+ #:+bisque+ #:+peach-puff+ #:+peachpuff+
1649     #:+navajo-white+ #:+navajowhite+ #:+moccasin+ #:+cornsilk+
1650     #:+ivory+ #:+lemon-chiffon+ #:+lemonchiffon+ #:+seashell+
1651     #:+honeydew+ #:+mint-cream+ #:+mintcream+ #:+azure+
1652     #:+alice-blue+ #:+aliceblue+ #:+lavender+ #:+lavender-blush+
1653     #:+lavenderblush+ #:+misty-rose+ #:+mistyrose+ #:+white+
1654     #:+black+ #:+dark-slate-gray+ #:+darkslategray+ #:+dark-slate-grey+
1655     #:+darkslategrey+ #:+dim-gray+ #:+dimgray+ #:+dim-grey+
1656     #:+dimgrey+ #:+slate-gray+ #:+slategray+ #:+slate-grey+
1657     #:+slategrey+ #:+light-slate-gray+ #:+lightslategray+ #:+light-slate-grey+
1658     #:+lightslategrey+ #:+gray+ #:+grey+ #:+light-grey+
1659     #:+lightgrey+ #:+light-gray+ #:+lightgray+ #:+midnight-blue+
1660     #:+midnightblue+ #:+navy+ #:+navy-blue+ #:+navyblue+
1661     #:+cornflower-blue+ #:+cornflowerblue+ #:+dark-slate-blue+ #:+darkslateblue+
1662     #:+slate-blue+ #:+slateblue+ #:+medium-slate-blue+ #:+mediumslateblue+
1663     #:+light-slate-blue+ #:+lightslateblue+ #:+medium-blue+ #:+mediumblue+
1664     #:+royal-blue+ #:+royalblue+ #:+blue+ #:+dodger-blue+
1665     #:+dodgerblue+ #:+deep-sky-blue+ #:+deepskyblue+ #:+sky-blue+
1666     #:+skyblue+ #:+light-sky-blue+ #:+lightskyblue+ #:+steel-blue+
1667     #:+steelblue+ #:+light-steel-blue+ #:+lightsteelblue+ #:+light-blue+
1668     #:+lightblue+ #:+powder-blue+ #:+powderblue+ #:+pale-turquoise+
1669     #:+paleturquoise+ #:+dark-turquoise+ #:+darkturquoise+ #:+medium-turquoise+
1670     #:+mediumturquoise+ #:+turquoise+ #:+cyan+ #:+light-cyan+
1671     #:+lightcyan+ #:+cadet-blue+ #:+cadetblue+ #:+medium-aquamarine+
1672     #:+mediumaquamarine+ #:+aquamarine+ #:+dark-green+ #:+darkgreen+
1673     #:+dark-olive-green+ #:+darkolivegreen+ #:+dark-sea-green+ #:+darkseagreen+
1674     #:+sea-green+ #:+seagreen+ #:+medium-sea-green+ #:+mediumseagreen+
1675     #:+light-sea-green+ #:+lightseagreen+ #:+pale-green+ #:+palegreen+
1676     #:+spring-green+ #:+springgreen+ #:+lawn-green+ #:+lawngreen+
1677     #:+green+ #:+chartreuse+ #:+medium-spring-green+ #:+mediumspringgreen+
1678     #:+green-yellow+ #:+greenyellow+ #:+lime-green+ #:+limegreen+
1679     #:+yellow-green+ #:+yellowgreen+ #:+forest-green+ #:+forestgreen+
1680     #:+olive-drab+ #:+olivedrab+ #:+dark-khaki+ #:+darkkhaki+
1681     #:+khaki+ #:+pale-goldenrod+ #:+palegoldenrod+ #:+light-goldenrod-yellow+
1682     #:+lightgoldenrodyellow+ #:+light-yellow+ #:+lightyellow+ #:+yellow+
1683     #:+gold+ #:+light-goldenrod+ #:+lightgoldenrod+ #:+goldenrod+
1684     #:+dark-goldenrod+ #:+darkgoldenrod+ #:+rosy-brown+ #:+rosybrown+
1685     #:+indian-red+ #:+indianred+ #:+saddle-brown+ #:+saddlebrown+
1686     #:+sienna+ #:+peru+ #:+burlywood+ #:+beige+
1687     #:+wheat+ #:+sandy-brown+ #:+sandybrown+ #:+tan+
1688     #:+chocolate+ #:+firebrick+ #:+brown+ #:+dark-salmon+
1689     #:+darksalmon+ #:+salmon+ #:+light-salmon+ #:+lightsalmon+
1690     #:+orange+ #:+dark-orange+ #:+darkorange+ #:+coral+
1691     #:+light-coral+ #:+lightcoral+ #:+tomato+ #:+orange-red+
1692     #:+orangered+ #:+red+ #:+hot-pink+ #:+hotpink+
1693     #:+deep-pink+ #:+deeppink+ #:+pink+ #:+light-pink+
1694     #:+lightpink+ #:+pale-violet-red+ #:+palevioletred+ #:+maroon+
1695     #:+medium-violet-red+ #:+mediumvioletred+ #:+violet-red+ #:+violetred+
1696     #:+magenta+ #:+violet+ #:+plum+ #:+orchid+
1697     #:+medium-orchid+ #:+mediumorchid+ #:+dark-orchid+ #:+darkorchid+
1698     #:+dark-violet+ #:+darkviolet+ #:+blue-violet+ #:+blueviolet+
1699     #:+purple+ #:+medium-purple+ #:+mediumpurple+ #:+thistle+
1700     #:+snow1+ #:+snow2+ #:+snow3+ #:+snow4+
1701     #:+seashell1+ #:+seashell2+ #:+seashell3+ #:+seashell4+
1702     #:+antiquewhite1+ #:+antiquewhite2+ #:+antiquewhite3+ #:+antiquewhite4+
1703     #:+bisque1+ #:+bisque2+ #:+bisque3+ #:+bisque4+
1704     #:+peachpuff1+ #:+peachpuff2+ #:+peachpuff3+ #:+peachpuff4+
1705     #:+navajowhite1+ #:+navajowhite2+ #:+navajowhite3+ #:+navajowhite4+
1706     #:+lemonchiffon1+ #:+lemonchiffon2+ #:+lemonchiffon3+ #:+lemonchiffon4+
1707     #:+cornsilk1+ #:+cornsilk2+ #:+cornsilk3+ #:+cornsilk4+
1708     #:+ivory1+ #:+ivory2+ #:+ivory3+ #:+ivory4+
1709     #:+honeydew1+ #:+honeydew2+ #:+honeydew3+ #:+honeydew4+
1710     #:+lavenderblush1+ #:+lavenderblush2+ #:+lavenderblush3+ #:+lavenderblush4+
1711     #:+mistyrose1+ #:+mistyrose2+ #:+mistyrose3+ #:+mistyrose4+
1712     #:+azure1+ #:+azure2+ #:+azure3+ #:+azure4+
1713     #:+slateblue1+ #:+slateblue2+ #:+slateblue3+ #:+slateblue4+
1714     #:+royalblue1+ #:+royalblue2+ #:+royalblue3+ #:+royalblue4+
1715     #:+blue1+ #:+blue2+ #:+blue3+ #:+blue4+
1716     #:+dodgerblue1+ #:+dodgerblue2+ #:+dodgerblue3+ #:+dodgerblue4+
1717     #:+steelblue1+ #:+steelblue2+ #:+steelblue3+ #:+steelblue4+
1718     #:+deepskyblue1+ #:+deepskyblue2+ #:+deepskyblue3+ #:+deepskyblue4+
1719     #:+skyblue1+ #:+skyblue2+ #:+skyblue3+ #:+skyblue4+
1720     #:+lightskyblue1+ #:+lightskyblue2+ #:+lightskyblue3+ #:+lightskyblue4+
1721     #:+slategray1+ #:+slategray2+ #:+slategray3+ #:+slategray4+
1722     #:+lightsteelblue1+ #:+lightsteelblue2+ #:+lightsteelblue3+ #:+lightsteelblue4+
1723     #:+lightblue1+ #:+lightblue2+ #:+lightblue3+ #:+lightblue4+
1724     #:+lightcyan1+ #:+lightcyan2+ #:+lightcyan3+ #:+lightcyan4+
1725     #:+paleturquoise1+ #:+paleturquoise2+ #:+paleturquoise3+ #:+paleturquoise4+
1726     #:+cadetblue1+ #:+cadetblue2+ #:+cadetblue3+ #:+cadetblue4+
1727     #:+turquoise1+ #:+turquoise2+ #:+turquoise3+ #:+turquoise4+
1728     #:+cyan1+ #:+cyan2+ #:+cyan3+ #:+cyan4+
1729     #:+darkslategray1+ #:+darkslategray2+ #:+darkslategray3+ #:+darkslategray4+
1730     #:+aquamarine1+ #:+aquamarine2+ #:+aquamarine3+ #:+aquamarine4+
1731     #:+darkseagreen1+ #:+darkseagreen2+ #:+darkseagreen3+ #:+darkseagreen4+
1732     #:+seagreen1+ #:+seagreen2+ #:+seagreen3+ #:+seagreen4+
1733     #:+palegreen1+ #:+palegreen2+ #:+palegreen3+ #:+palegreen4+
1734     #:+springgreen1+ #:+springgreen2+ #:+springgreen3+ #:+springgreen4+
1735     #:+green1+ #:+green2+ #:+green3+ #:+green4+
1736     #:+chartreuse1+ #:+chartreuse2+ #:+chartreuse3+ #:+chartreuse4+
1737     #:+olivedrab1+ #:+olivedrab2+ #:+olivedrab3+ #:+olivedrab4+
1738     #:+darkolivegreen1+ #:+darkolivegreen2+ #:+darkolivegreen3+ #:+darkolivegreen4+
1739     #:+khaki1+ #:+khaki2+ #:+khaki3+ #:+khaki4+
1740     #:+lightgoldenrod1+ #:+lightgoldenrod2+ #:+lightgoldenrod3+ #:+lightgoldenrod4+
1741     #:+lightyellow1+ #:+lightyellow2+ #:+lightyellow3+ #:+lightyellow4+
1742     #:+yellow1+ #:+yellow2+ #:+yellow3+ #:+yellow4+
1743     #:+gold1+ #:+gold2+ #:+gold3+ #:+gold4+
1744     #:+goldenrod1+ #:+goldenrod2+ #:+goldenrod3+ #:+goldenrod4+
1745     #:+darkgoldenrod1+ #:+darkgoldenrod2+ #:+darkgoldenrod3+ #:+darkgoldenrod4+
1746     #:+rosybrown1+ #:+rosybrown2+ #:+rosybrown3+ #:+rosybrown4+
1747     #:+indianred1+ #:+indianred2+ #:+indianred3+ #:+indianred4+
1748     #:+sienna1+ #:+sienna2+ #:+sienna3+ #:+sienna4+
1749     #:+burlywood1+ #:+burlywood2+ #:+burlywood3+ #:+burlywood4+
1750     #:+wheat1+ #:+wheat2+ #:+wheat3+ #:+wheat4+
1751     #:+tan1+ #:+tan2+ #:+tan3+ #:+tan4+
1752     #:+chocolate1+ #:+chocolate2+ #:+chocolate3+ #:+chocolate4+
1753     #:+firebrick1+ #:+firebrick2+ #:+firebrick3+ #:+firebrick4+
1754     #:+brown1+ #:+brown2+ #:+brown3+ #:+brown4+
1755     #:+salmon1+ #:+salmon2+ #:+salmon3+ #:+salmon4+
1756     #:+lightsalmon1+ #:+lightsalmon2+ #:+lightsalmon3+ #:+lightsalmon4+
1757     #:+orange1+ #:+orange2+ #:+orange3+ #:+orange4+
1758     #:+darkorange1+ #:+darkorange2+ #:+darkorange3+ #:+darkorange4+
1759     #:+coral1+ #:+coral2+ #:+coral3+ #:+coral4+
1760     #:+tomato1+ #:+tomato2+ #:+tomato3+ #:+tomato4+
1761     #:+orangered1+ #:+orangered2+ #:+orangered3+ #:+orangered4+
1762     #:+red1+ #:+red2+ #:+red3+ #:+red4+
1763     #:+deeppink1+ #:+deeppink2+ #:+deeppink3+ #:+deeppink4+
1764     #:+hotpink1+ #:+hotpink2+ #:+hotpink3+ #:+hotpink4+
1765     #:+pink1+ #:+pink2+ #:+pink3+ #:+pink4+
1766     #:+lightpink1+ #:+lightpink2+ #:+lightpink3+ #:+lightpink4+
1767     #:+palevioletred1+ #:+palevioletred2+ #:+palevioletred3+ #:+palevioletred4+
1768     #:+maroon1+ #:+maroon2+ #:+maroon3+ #:+maroon4+
1769     #:+violetred1+ #:+violetred2+ #:+violetred3+ #:+violetred4+
1770     #:+magenta1+ #:+magenta2+ #:+magenta3+ #:+magenta4+
1771     #:+orchid1+ #:+orchid2+ #:+orchid3+ #:+orchid4+
1772     #:+plum1+ #:+plum2+ #:+plum3+ #:+plum4+
1773     #:+mediumorchid1+ #:+mediumorchid2+ #:+mediumorchid3+ #:+mediumorchid4+
1774     #:+darkorchid1+ #:+darkorchid2+ #:+darkorchid3+ #:+darkorchid4+
1775     #:+purple1+ #:+purple2+ #:+purple3+ #:+purple4+
1776     #:+mediumpurple1+ #:+mediumpurple2+ #:+mediumpurple3+ #:+mediumpurple4+
1777     #:+thistle1+ #:+thistle2+ #:+thistle3+ #:+thistle4+
1778     #:+gray0+ #:+grey0+ #:+gray1+ #:+grey1+
1779     #:+gray2+ #:+grey2+ #:+gray3+ #:+grey3+
1780     #:+gray4+ #:+grey4+ #:+gray5+ #:+grey5+
1781     #:+gray6+ #:+grey6+ #:+gray7+ #:+grey7+
1782     #:+gray8+ #:+grey8+ #:+gray9+ #:+grey9+
1783     #:+gray10+ #:+grey10+ #:+gray11+ #:+grey11+
1784     #:+gray12+ #:+grey12+ #:+gray13+ #:+grey13+
1785     #:+gray14+ #:+grey14+ #:+gray15+ #:+grey15+
1786     #:+gray16+ #:+grey16+ #:+gray17+ #:+grey17+
1787     #:+gray18+ #:+grey18+ #:+gray19+ #:+grey19+
1788     #:+gray20+ #:+grey20+ #:+gray21+ #:+grey21+
1789     #:+gray22+ #:+grey22+ #:+gray23+ #:+grey23+
1790     #:+gray24+ #:+grey24+ #:+gray25+ #:+grey25+
1791     #:+gray26+ #:+grey26+ #:+gray27+ #:+grey27+
1792     #:+gray28+ #:+grey28+ #:+gray29+ #:+grey29+
1793     #:+gray30+ #:+grey30+ #:+gray31+ #:+grey31+
1794     #:+gray32+ #:+grey32+ #:+gray33+ #:+grey33+
1795     #:+gray34+ #:+grey34+ #:+gray35+ #:+grey35+
1796     #:+gray36+ #:+grey36+ #:+gray37+ #:+grey37+
1797     #:+gray38+ #:+grey38+ #:+gray39+ #:+grey39+
1798     #:+gray40+ #:+grey40+ #:+gray41+ #:+grey41+
1799     #:+gray42+ #:+grey42+ #:+gray43+ #:+grey43+
1800     #:+gray44+ #:+grey44+ #:+gray45+ #:+grey45+
1801     #:+gray46+ #:+grey46+ #:+gray47+ #:+grey47+
1802     #:+gray48+ #:+grey48+ #:+gray49+ #:+grey49+
1803     #:+gray50+ #:+grey50+ #:+gray51+ #:+grey51+
1804     #:+gray52+ #:+grey52+ #:+gray53+ #:+grey53+
1805     #:+gray54+ #:+grey54+ #:+gray55+ #:+grey55+
1806     #:+gray56+ #:+grey56+ #:+gray57+ #:+grey57+
1807     #:+gray58+ #:+grey58+ #:+gray59+ #:+grey59+
1808     #:+gray60+ #:+grey60+ #:+gray61+ #:+grey61+
1809     #:+gray62+ #:+grey62+ #:+gray63+ #:+grey63+
1810     #:+gray64+ #:+grey64+ #:+gray65+ #:+grey65+
1811     #:+gray66+ #:+grey66+ #:+gray67+ #:+grey67+
1812     #:+gray68+ #:+grey68+ #:+gray69+ #:+grey69+
1813     #:+gray70+ #:+grey70+ #:+gray71+ #:+grey71+
1814     #:+gray72+ #:+grey72+ #:+gray73+ #:+grey73+
1815     #:+gray74+ #:+grey74+ #:+gray75+ #:+grey75+
1816     #:+gray76+ #:+grey76+ #:+gray77+ #:+grey77+
1817     #:+gray78+ #:+grey78+ #:+gray79+ #:+grey79+
1818     #:+gray80+ #:+grey80+ #:+gray81+ #:+grey81+
1819     #:+gray82+ #:+grey82+ #:+gray83+ #:+grey83+
1820     #:+gray84+ #:+grey84+ #:+gray85+ #:+grey85+
1821     #:+gray86+ #:+grey86+ #:+gray87+ #:+grey87+
1822     #:+gray88+ #:+grey88+ #:+gray89+ #:+grey89+
1823     #:+gray90+ #:+grey90+ #:+gray91+ #:+grey91+
1824     #:+gray92+ #:+grey92+ #:+gray93+ #:+grey93+
1825     #:+gray94+ #:+grey94+ #:+gray95+ #:+grey95+
1826     #:+gray96+ #:+grey96+ #:+gray97+ #:+grey97+
1827     #:+gray98+ #:+grey98+ #:+gray99+ #:+grey99+
1828     #:+gray100+ #:+grey100+ #:+dark-grey+ #:+darkgrey+
1829     #:+dark-gray+ #:+darkgray+ #:+dark-blue+ #:+darkblue+
1830     #:+dark-cyan+ #:+darkcyan+ #:+dark-magenta+ #:+darkmagenta+
1831     #:+dark-red+ #:+darkred+ #:+light-green+ #:+lightgreen+ ))
1832 cvs 1.1
1833 cvs 1.4 (defpackage :clim-sys
1834 gilbert 1.14 (:use)
1835     ;;
1836 mikemac 1.32 #+cmu
1837 mikemac 1.33 (:import-from :mp
1838 cvs 1.4 #:make-process
1839     #:destroy-process
1840     #:current-process
1841     #:all-processes
1842     #:processp
1843     #:process-name
1844     #:process-state
1845     #:process-whostate
1846     #:process-wait
1847     #:process-wait-with-timeout
1848     #:process-yield
1849     #:process-interrupt
1850     #:disable-process
1851     #:enable-process
1852     #:restart-process
1853     #:without-scheduling
1854     #:atomic-incf
1855 gilbert 1.14 #:atomic-decf)
1856     ;;
1857 cvs 1.4 (:export
1858     #:defresource
1859     #:using-resource
1860     #:allocate-resource
1861     #:deallocate-resource
1862     #:clear-resource
1863     #:map-resource
1864     ;;
1865     #:*multiprocessing-p*
1866     #:make-process
1867     #:destroy-process
1868     #:current-process
1869     #:all-processes
1870     #:processp
1871     #:process-name
1872     #:process-state
1873     #:process-whostate
1874     #:process-wait
1875     #:process-wait-with-timeout
1876     #:process-yield
1877     #:process-interrupt
1878     #:disable-process
1879     #:enable-process
1880     #:restart-process
1881     #:without-scheduling
1882     #:atomic-incf
1883     #:atomic-decf
1884     ;;
1885     #:make-lock
1886     #:with-lock-held
1887     #:make-recursive-lock
1888     #:with-recursive-lock-held
1889     ;;
1890 moore 1.39 #:make-condition-variable
1891     #:condition-wait
1892     #:condition-notify
1893     ;;
1894 cvs 1.4 #:defgeneric*
1895 gilbert 1.14 #:defmethod* ) )
1896 mikemac 1.10
1897 mikemac 1.33 (defpackage :clim-extensions
1898 gilbert 1.14 (:use)
1899 mikemac 1.10 (:export
1900 mikemac 1.33 #:line-style-effective-thickness
1901     #:medium-miter-limit
1902     #:raised-pane #:raising
1903     #:lowered-pane #:lowering
1904     #:viewport-pane
1905     #:draw-glyph #:device-font-text-style-p
1906     #:draw-image
1907     #:image-pane
1908     #:draw-label
1909 hefner1 1.34 #:box-adjuster-gadget
1910 mikemac 1.33 #:compose-space-aux
1911     #:simple-event-loop
1912 moore 1.35 #:pointer-motion-hint-event
1913     #:frame-display-pointer-documentation-string))
1914 cvs 1.1
1915 moore 1.38 ;;; Symbols that must be defined by a backend.
1916     ;;;
1917     ;;; To start with, I grabbed the methods defined by the CLX backend
1918     ;;; whose symbol package is CLIM or CLIMI.
1919    
1920     (defpackage :clim-backend
1921     (:nicknames :climb)
1922     (:use :clim :clim-extensions)
1923     (:export
1924     ;; Originally in CLIM-INTERNALS
1925     #:get-next-event
1926     #:invoke-with-special-choices
1927     #:make-graft
1928     #:medium-draw-circle*
1929     #:medium-draw-glyph
1930     #:mirror-transformation
1931     #:port-allocate-pixmap
1932     #:port-deallocate-pixmap
1933     #:port-disable-sheet
1934     #:port-enable-sheet
1935     #:port-force-output
1936     #:port-grab-pointer
1937     #:port-mirror-height
1938     #:port-mirror-width
1939     #:port-motion-hints
1940     #:port-set-mirror-region
1941     #:port-set-mirror-transformation
1942     #:port-set-sheet-region
1943     #:port-set-sheet-transformation
1944     #:port-ungrab-pointer
1945 ahefner 1.48 #:%set-port-keyboard-focus
1946 moore 1.38 #:set-sheet-pointer-cursor
1947 moore 1.41 #:synthesize-pointer-motion-event
1948 moore 1.38 #:text-style-character-width
1949     ;; From CLIM (mentioned in the spec)
1950     #:adopt-frame
1951     #:allocate-space
1952     #:destroy-mirror
1953     #:destroy-port
1954     #:graft
1955     #:graft-height
1956     #:graft-width
1957     #:handle-repaint
1958     #:make-medium
1959     #:make-pane-1
1960     #:medium-beep
1961     #:medium-buffering-output-p
1962     #:medium-clear-area
1963     #:medium-clipping-region
1964     #:medium-copy-area
1965     #:medium-draw-ellipse*
1966     #:medium-draw-line*
1967     #:medium-draw-lines*
1968     #:medium-draw-point*
1969     #:medium-draw-points*
1970     #:medium-draw-polygon*
1971     #:medium-draw-rectangle*
1972     #:medium-draw-rectangles*
1973     #:medium-draw-text*
1974     #:medium-finish-output
1975     #:medium-force-output
1976     #:medium-line-style
1977     #:medium-text-style
1978     #:note-space-requirements-changed
1979     #:pointer-button-state
1980     #:pointer-modifier-state
1981     #:pointer-position
1982     #:realize-mirror
1983     #:text-size
1984     #:text-style-ascent
1985     #:text-style-descent
1986     #:text-style-height
1987     #:text-style-mapping
1988     #:text-style-width
1989 hefner1 1.45 ;; Text selection protocol
1990     #:selection-owner
1991 crhodes 1.49 #:selection-timestamp
1992 hefner1 1.45 #:selection-event
1993     #:selection-clear-event
1994     #:selection-notify-event
1995     #:selection-request-event
1996     #:selection-event-requestor
1997     #:request-selection
1998     #:release-selection
1999     #:bind-selection
2000     #:send-selection
2001     #:get-selection-from-event
2002 moore 1.38 ;; CLIM-EXTENSIONS
2003     #:medium-miter-limit))
2004    
2005 mikemac 1.33 (defpackage :clim-internals
2006 moore 1.38 (:use :clim :clim-sys :clim-extensions :clim-backend :clim-lisp)
2007 gilbert 1.14 (:nicknames :climi)
2008     #+excl
2009 moore 1.20 (:import-from :excl compile-system load-system)
2010     (:intern #:letf))
2011 gilbert 1.14
2012     ;(defpackage :CLIM
2013     ; (:use #+nil :clim-extensions ; will use it later
2014     ; :clim-internals :common-lisp)
2015     ; )
2016    
2017     ;(let ((climi-package (find-package :climi))
2018     ; (ext-package (find-package :clim-extensions)))
2019     ; (do-external-symbols (sym ext-package)
2020     ; (export sym climi-package)))
2021    
2022     ;(let ((clim-package (find-package :clim))
2023     ; (climi-package (find-package :climi)))
2024     ; (do-external-symbols (sym climi-package)
2025     ; (export sym clim-package)))
2026    
2027     ;(use-package :clim-extensions :clim)
2028 adejneka 1.11
2029 mikemac 1.33 (defpackage :clim-demo
2030 gilbert 1.14 (:use :clim-extensions :clim :clim-lisp)
2031 cvs 1.1 #+excl(:import-from :excl compile-system load-system exit)
2032     )
2033 adejneka 1.11
2034 mikemac 1.33 (defpackage :clim-user
2035 gilbert 1.14 (:use :clim :clim-lisp))
2036 moore 1.16
2037 mikemac 1.33 (defpackage :goatee
2038 moore 1.20 (:use :clim :clim-lisp :clim-sys)
2039 mikemac 1.33 (:import-from :clim-internals #:letf)
2040 moore 1.22 (:export
2041 mikemac 1.33 #:execute-gesture-command
2042     #:goatee-input-editing-mixin
2043     #:simple-screen-area))
2044 moore 1.20
2045 moore 1.37 ;;; Macros and definitions for interfacing with a host Lisp's FFI.
2046     (defpackage :clim-ffi
2047     (:use :clim-lisp)
2048     (:export
2049     #:cref
2050     #:make-record
2051     #:null-pointer
2052     #:with-c-strings
2053     #:with-c-data
2054     ;; Types
2055     #:signed-char
2056     #:signed-byte
2057     #:short
2058     #:signed-halfword
2059     #:int
2060     #:signed-fullword
2061     #:long
2062     #:signed-short
2063     #:signed-int
2064     #:signed-long
2065     #:signed-doubleword
2066     #:char
2067     #:unsigned-char
2068     #:unsigned-byte
2069     #:unsigned-short
2070     #:unsigned-halfword
2071     #:unsigned-int
2072     #:unsigned-fullword
2073     #:unsigned-long
2074     #:unsigned-doubleword
2075     #:float
2076     #:double
2077     #:void
2078     #:address
2079    
2080     ))
2081 moore 1.38

  ViewVC Help
Powered by ViewVC 1.1.5