[project @ 2001-05-23 16:47:09 by sewardj]

[ghc-hetmet.git] / ghc / compiler / utils / PrimPacked.lhs

diff --git a/ghc/compiler/utils/PrimPacked.lhs b/ghc/compiler/utils/PrimPacked.lhs
index f12fe6c..d6b25c4 100644 (file)
--- a/ghc/compiler/utils/PrimPacked.lhs
+++ b/ghc/compiler/utils/PrimPacked.lhs
@@ -8,6 +8,7 @@ of bytes (character strings). Used by the interface lexer input
 subsystem, mostly.
 
 \begin{code}
+{-# OPTIONS -fvia-C -monly-3-regs #-}
 module PrimPacked
        (
         strLength,          -- :: _Addr -> Int