Changeset 12102 for third-party

Show
Ignore:
Timestamp:
08/11/06 07:09:05 (2 years ago)
Author:
cmarcelo
Message:

HsJudy?: use pugs-fps.

Location:
third-party
Files:
3 modified
1 copied

Legend:

Unmodified
Added
Removed

  • third-party/HsJudy/HsJudy.cabal

    r12024 r12102  
    66author:              Caio Marcelo de Oliveira Filho <cmarcelo@gmail.com>, John Meacham 
    77maintainer:          Caio Marcelo de Oliveira Filho <cmarcelo@gmail.com> 
    8 build-depends:       base 
     8build-depends:       base -any, pugs-fps -any 
    99exposed-modules:     Judy.BitSet Judy.Freeze Judy.Hash Judy.IntMap Judy.StrMap Judy.CollectionsM Judy.HashIO Judy.Refeable Judy.Stringable 
    1010other-modules:       Judy.Private Judy.MiniGC 
    1111extensions:          ForeignFunctionInterface 
    12 ghc-options:         -fglasgow-exts -O2 
    13 include-dirs:        . 
     12ghc-options:         -fglasgow-exts -O2 -static 
     13include-dirs:        . ../judy/Judy-1.0.3/src 
    1414-- FIXME: make Cabal work nicely with _hsc files, now I think it works, but doesnt clean _hsc files 
    1515c-sources:           Judy/Private_hsc.c 
    1616extra-libraries:     Judy 
     17extra-lib-dirs:      . 

  • third-party/HsJudy/Judy/Stringable.hs

    r12024 r12102  
    77import Foreign.C.String 
    88 
     9-- #if __GLASGOW_HASKELL__ >= 605 
    910import qualified Data.ByteString as B 
     11-- #endif 
    1012 
    1113-- TODO: See if its possible to use Storable, ie. to let any Storable type be "stringable". 
    … …  
    2931    fromString = id 
    3032 
     33-- #if __GLASGOW_HASKELL__ >= 605 
    3134instance Stringable B.ByteString where 
    32     toString = undefined 
    33     fromString = undefined 
    34  
    35     useAsCS = B.useAsCString  
    36     useAsCSLen = B.useAsCStringLen 
    37  
    38     copyCS = B.copyCString 
    39     copyCSLen = B.copyCStringLen 
     35     toString = undefined 
     36     fromString = undefined 
     37  
     38     useAsCS = B.useAsCString  
     39     useAsCSLen = B.useAsCStringLen 
     40  
     41     copyCS = B.copyCString 
     42     copyCSLen = B.copyCStringLen 
     43-- #endif 
    4044 
    4145 

  • third-party/HsJudy/tests/CheckDup.hs

    r12024 r12102  
     1{-# OPTIONS -fallow-overlapping-instances #-} 
     2 
    13import qualified Judy.Hash as H 
    24import qualified Judy.StrMap as S