1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
|
(defpackage swank/backend
(:use cl)
(:nicknames swank-backend)
(:export *debug-swank-backend*
*log-output*
sldb-condition
compiler-condition
original-condition
message
source-context
condition
severity
with-compilation-hooks
make-location
location
location-p
location-buffer
location-position
location-hints
position-p
position-pos
print-output-to-string
quit-lisp
references
unbound-slot-filler
declaration-arglist
type-specifier-arglist
with-struct
when-let
defimplementation
converting-errors-to-error-location
make-error-location
deinit-log-output
;; interrupt macro for the backend
*pending-slime-interrupts*
check-slime-interrupts
*interrupt-queued-handler*
;; inspector related symbols
emacs-inspect
label-value-line
label-value-line*
boolean-to-feature-expression
with-symbol
choose-symbol
;; package helper for backend
import-to-swank-mop
import-swank-mop-symbols
;;
default-directory
set-default-directory
frame-source-location
restart-frame
gdb-initial-commands
sldb-break-on-return
buffer-first-change
profiled-functions
unprofile-all
profile-report
profile-reset
profile-package
with-collected-macro-forms
auto-flush-loop
*auto-flush-interval*))
(defpackage swank/rpc
(:use :cl)
(:export
read-message
read-packet
swank-reader-error
swank-reader-error.packet
swank-reader-error.cause
write-message))
(defpackage swank/match
(:use cl)
(:export match))
;; FIXME: rename to sawnk/mop
(defpackage swank-mop
(:use)
(:export
;; classes
standard-generic-function
standard-slot-definition
standard-method
standard-class
eql-specializer
eql-specializer-object
;; standard-class readers
class-default-initargs
class-direct-default-initargs
class-direct-slots
class-direct-subclasses
class-direct-superclasses
class-finalized-p
class-name
class-precedence-list
class-prototype
class-slots
specializer-direct-methods
;; generic function readers
generic-function-argument-precedence-order
generic-function-declarations
generic-function-lambda-list
generic-function-methods
generic-function-method-class
generic-function-method-combination
generic-function-name
;; method readers
method-generic-function
method-function
method-lambda-list
method-specializers
method-qualifiers
;; slot readers
slot-definition-allocation
slot-definition-documentation
slot-definition-initargs
slot-definition-initform
slot-definition-initfunction
slot-definition-name
slot-definition-type
slot-definition-readers
slot-definition-writers
slot-boundp-using-class
slot-value-using-class
slot-makunbound-using-class
;; generic function protocol
compute-applicable-methods-using-classes
finalize-inheritance))
(defpackage swank
(:use cl swank/backend swank/match swank/rpc)
(:export #:startup-multiprocessing
#:start-server
#:create-server
#:stop-server
#:restart-server
#:ed-in-emacs
#:inspect-in-emacs
#:print-indentation-lossage
#:invoke-slime-debugger
#:swank-debugger-hook
#:emacs-inspect
;;#:inspect-slot-for-emacs
;; These are user-configurable variables:
#:*communication-style*
#:*dont-close*
#:*fasl-pathname-function*
#:*log-events*
#:*use-dedicated-output-stream*
#:*dedicated-output-stream-port*
#:*configure-emacs-indentation*
#:*readtable-alist*
#:*globally-redirect-io*
#:*global-debugger*
#:*sldb-quit-restart*
#:*backtrace-printer-bindings*
#:*default-worker-thread-bindings*
#:*macroexpand-printer-bindings*
#:*swank-pprint-bindings*
#:*record-repl-results*
#:*inspector-verbose*
;; This is SETFable.
#:debug-on-swank-error
;; These are re-exported directly from the backend:
#:buffer-first-change
#:frame-source-location
#:gdb-initial-commands
#:restart-frame
#:sldb-step
#:sldb-break
#:sldb-break-on-return
#:profiled-functions
#:profile-report
#:profile-reset
#:unprofile-all
#:profile-package
#:default-directory
#:set-default-directory
#:quit-lisp
#:eval-for-emacs
#:eval-in-emacs
#:y-or-n-p-in-emacs
#:*find-definitions-right-trim*
#:*find-definitions-left-trim*
#:*after-toggle-trace-hook*
#:unreadable-result
#:unreadable-result-p
#:unreadable-result-string
#:parse-string
#:from-string
#:to-string
#:*swank-debugger-condition*))
|
