Skip to content
Snippets Groups Projects
Commit ec123f6f authored by ram's avatar ram
Browse files

Removed suprious duplicate binding of CODE-GENERATORS in

COMPUTE-CONSTRUCTOR-CODE.
parent 7eef46a0
No related branches found
No related tags found
No related merge requests found
...@@ -434,9 +434,7 @@ ...@@ -434,9 +434,7 @@
(shared (shared
(compute-applicable-methods #'shared-initialize (list proto t))) (compute-applicable-methods #'shared-initialize (list proto t)))
(code-generators (code-generators
(constructor-code-generators constructor)) (constructor-code-generators constructor)))
(code-generators
(constructor-code-generators constructor)))
(flet ((call-code-generator (generator) (flet ((call-code-generator (generator)
(when (null generator) (when (null generator)
(unless (setq generator (getf code-generators 'fallback)) (unless (setq generator (getf code-generators 'fallback))
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment