From 45db9cdd27434e9d2d143e195562e1f1343c447d Mon Sep 17 00:00:00 2001
From: Neil Brown <neil@twistedsquare.com>
Date: Fri, 3 Apr 2009 20:19:48 +0000
Subject: [PATCH] Realised that my bits and bytes per word were somewhat mixed
 up

---
 data/CompState.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/data/CompState.hs b/data/CompState.hs
index 561082c..ebf87e1 100644
--- a/data/CompState.hs
+++ b/data/CompState.hs
@@ -181,8 +181,8 @@ emptyState = CompState {
     csCurrentFile = "none",
     csUsedFiles = Set.empty,
     csDefinitions = Map.fromList [("COMPILER.TOCK", PreprocNothing)
-                                 ,("TARGET.BITS.PER.WORD", PreprocInt $ show cIntSize)
-                                 ,("TARGET.BYTES.PER.WORD", PreprocInt $ show $ cIntSize `div` 8)
+                                 ,("TARGET.BITS.PER.WORD", PreprocInt $ show $ cIntSize * 8)
+                                 ,("TARGET.BYTES.PER.WORD", PreprocInt $ show cIntSize)
 --                                 ,("TARGET.HAS.FPU", PreprocNothing)
                                  ],