diff --git a/compiler/ir1util.lisp b/compiler/ir1util.lisp index 077508460b4718d56b0af9a3d3e4788fdc04ca0d..24e9a799b7a1c0066844dc3dddff4261c6f409f0 100644 --- a/compiler/ir1util.lisp +++ b/compiler/ir1util.lisp @@ -7,7 +7,7 @@ ;;; Scott Fahlman or slisp-group@cs.cmu.edu. ;;; (ext:file-comment - "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/ir1util.lisp,v 1.73 1993/11/16 18:17:27 ram Exp $") + "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/ir1util.lisp,v 1.74 1993/11/16 18:28:07 ram Exp $") ;;; ;;; ********************************************************************** ;;; @@ -1486,7 +1486,7 @@ (ref-leaf (continuation-use (basic-combination-fun call)))) -(defvar *inline-expansion-limit* 50 +(defvar *inline-expansion-limit* 200 "An upper limit on the number of inline function calls that will be expanded in any given code object (single function or block compilation.)")