From: Christophe R. <cr...@us...> - 2003-08-14 17:34:22
|
Update of /cvsroot/sbcl/sbcl/src/compiler/x86 In directory sc8-pr-cvs1:/tmp/cvs-serv30278/src/compiler/x86 Modified Files: call.lisp Log Message: 0.8.2.28: Extend FORMAT string checking to ERROR, CERROR and WARN (and many internal functions too) ... correct the surprising number of bugs that this reveals; ... since one of said bugs was the *INTEXP-MAX-EXPONENT* one, default this to NIL and make the error non-continuable. Index: call.lisp =================================================================== RCS file: /cvsroot/sbcl/sbcl/src/compiler/x86/call.lisp,v retrieving revision 1.24 retrieving revision 1.25 diff -u -d -r1.24 -r1.25 --- call.lisp 26 May 2003 04:25:57 -0000 1.24 +++ call.lisp 14 Aug 2003 17:16:12 -0000 1.25 @@ -645,8 +645,9 @@ (inst pop ebp-tn)) (t - (cerror "Continue any-way" - "VOP return-local doesn't work if old-fp (in slot %s) is not in slot 0" + (cerror "Continue anyway" + "VOP return-local doesn't work if old-fp (in slot ~ + ~S) is not in slot 0" (tn-offset old-fp))))) ((any-reg descriptor-reg) |