X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fcompiler%2Fsparc%2Fvm.lisp;h=65865ae95d0d1153fd8fda949a7eda63d402b3eb;hb=d335afdcf50b641a0aafd32741e0777d4e12a59b;hp=9bfe46b8a2bb77bc6ed1f082bee3c83fbbca0924;hpb=06b4f7dc62e1ce045ff7409686f27534ecb13ada;p=sbcl.git

diff --git a/src/compiler/sparc/vm.lisp b/src/compiler/sparc/vm.lisp
index 9bfe46b..65865ae 100644
--- a/src/compiler/sparc/vm.lisp
+++ b/src/compiler/sparc/vm.lisp
@@ -129,7 +129,7 @@
 ;;; and seems to be working so far    -dan
 ;;;
 ;;; arbitrarily taken for alpha, too. - Christophe
-(def!constant kludge-nondeterministic-catch-block-size 7)
+(def!constant kludge-nondeterministic-catch-block-size 6)
 
 (!define-storage-classes