Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
asdf
asdf
Commits
872e560e
Commit
872e560e
authored
Jan 18, 2014
by
Robert P. Goldman
Browse files
Comment about INITIALIZE-INSTANCE.
parent
28a5c936
Changes
1
Hide whitespace changes
Inline
Side-by-side
operation.lisp
View file @
872e560e
...
...
@@ -22,6 +22,8 @@
((
original-initargs
;; for backward-compat -- used by GBBopen and swank (via operation-forced)
:initform
nil
:initarg
:original-initargs
:accessor
operation-original-initargs
)))
;; Cache a copy of the INITARGS in the ORIGINAL-INITARGS slot, if that slot is not
;; already bound.
(
defmethod
initialize-instance
:after
((
o
operation
)
&rest
initargs
&key
force
force-not
system
verbose
&allow-other-keys
)
(
declare
(
ignorable
force
force-not
system
verbose
))
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment