From 1fbbb6c8743e02cd8e0504292c682d3b210b6fbc Mon Sep 17 00:00:00 2001
From: Tony Mann <tony@harlequin.com>
Date: Fri, 10 Sep 1999 11:33:37 +0100
Subject: [PATCH] Change.dylan.kinglet.160274: incorrect value for
 basic_wrapper_size in fmtdy.h

Copied from Perforce
 Change: 20907
 ServerID: perforce.ravenbrook.com
---
 mps/src/fmtdy.h | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/mps/src/fmtdy.h b/mps/src/fmtdy.h
index 88db725eb27..61bae2f1043 100644
--- a/mps/src/fmtdy.h
+++ b/mps/src/fmtdy.h
@@ -1,6 +1,6 @@
 /* impl.h.fmtdy: DYLAN OBJECT FORMAT
  *
- * $HopeName: MMsrc!fmtdy.h(trunk.4) $
+ * $HopeName: MMsrc!fmtdy.h(trunk.5) $
  * Copyright (C) 1997 Harlequin Group, all rights reserved
  */
 
@@ -36,7 +36,7 @@ extern int dylan_wrapper_check(mps_word_t *w);
 #define WS 5
 #define WP 6
 
-#define BASIC_WRAPPER_SIZE WS
+#define BASIC_WRAPPER_SIZE (WS + 1)
 
 #define ALIGN           sizeof(mps_word_t)