X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fir1tran-lambda.lisp;h=10e2b08fe156368b3ff29954e56773493a541574;hb=9c0c32bf94b510ea0f7bed34a91d0ddf3ea909fc;hp=ffd254c9804436acb7c76271df9f7f433d502e02;hpb=47f408ca8480937ac946db8455b7c3d3e0b353bb;p=sbcl.git diff --git a/src/compiler/ir1tran-lambda.lisp b/src/compiler/ir1tran-lambda.lisp index ffd254c..10e2b08 100644 --- a/src/compiler/ir1tran-lambda.lisp +++ b/src/compiler/ir1tran-lambda.lisp @@ -1253,7 +1253,6 @@ (get-defined-fun name (fifth inline-lambda)) (get-defined-fun name)))) (when (boundp '*lexenv*) - (remhash name *free-funs*) (aver (fasl-output-p *compile-object*)) (if (member name *fun-names-in-this-file* :test #'equal) (warn 'duplicate-definition :name name)