diff options
| author | Matthias Andreas Benkard <code@mail.matthias.benkard.de> | 2013-07-21 00:29:44 +0200 |
|---|---|---|
| committer | Matthias Andreas Benkard <code@mail.matthias.benkard.de> | 2013-07-21 00:29:44 +0200 |
| commit | 6e35fccdb1f7905eaa1c59c131c8e861da96ee8e (patch) | |
| tree | f26a9ca84855b79e721f332d3bd874d030b70973 | |
| parent | 75e0a7ccf136a8275c91b37ad72f33d053c025b0 (diff) | |
Permit function names of the form (SB-PCL::SLOT-ACCESSOR ...).
| -rw-r--r-- | sb-eval2.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/sb-eval2.lisp b/sb-eval2.lisp index db4ded3..029c6a1 100644 --- a/sb-eval2.lisp +++ b/sb-eval2.lisp @@ -758,7 +758,7 @@ (prepare-lambda (rest fun-form) context)) ((sb-int:named-lambda) (prepare-lambda (cddr fun-form) context)) - ((setf) + ((setf sb-pcl::slot-accessor) (prepare-function-ref fun-form context))))))) ((lambda) (prepare-lambda (rest form) context)) |