Changeset 8904 for src/Pugs/Embed

Show
Ignore:
Timestamp:
02/01/06 15:09:07 (3 years ago)
Author:
audreyt
Message:

* some failed attempts at disabling DOD/GC.

Files:
1 modified

Legend:

Unmodified
Added
Removed

  • src/Pugs/Embed/Parrot.hsc

    r8902 r8904  
    189189    parrot_imcc_init interp 
    190190 
     191{- 
     192    parrot_block_DOD interp 
     193    parrot_block_GC interp 
     194-} 
     195 
    191196    pf      <- parrot_packfile_new interp 0 
    192197    parrot_loadbc interp pf 
    … …  
    330335    parrot_string_to_cstring :: ParrotInterp -> ParrotString -> IO CString 
    331336 
     337{- 
     338foreign import ccall "Parrot_block_DOD" 
     339    parrot_block_DOD :: ParrotInterp -> IO () 
     340 
     341foreign import ccall "Parrot_block_GC" 
     342    parrot_block_GC :: ParrotInterp -> IO () 
     343-} 
     344 
    332345foreign import ccall "imcc_init" 
    333346    parrot_imcc_init :: ParrotInterp -> IO ()