2005-04-24 08:51:33 +00:00
|
|
|
--
|
|
|
|
|
-- the plugin doesn't even make the resource_dyn a Dynamic.
|
|
|
|
|
--
|
|
|
|
|
-- let's hope that makeWith strips out the invalid declarations
|
|
|
|
|
--
|
|
|
|
|
|
|
|
|
|
{-# OPTIONS -fglasgow-exts #-}
|
|
|
|
|
|
|
|
|
|
module Plugin where
|
|
|
|
|
|
|
|
|
|
import API
|
2005-05-15 06:03:55 +00:00
|
|
|
import AltData.Typeable
|
2005-04-24 08:51:33 +00:00
|
|
|
import GHC.Base
|
|
|
|
|
|
|
|
|
|
v :: Int
|
|
|
|
|
v = 0xdeadbeef
|
|
|
|
|
|
|
|
|
|
resource_dyn = (typeOf v, unsafeCoerce v)
|
|
|
|
|
|
