plugins-1.0: testsuite/dynload/should_fail_1/Plugin.hs

--
-- trying to be really mean.
--

module Plugin where

import API
import AltData.Dynamic

v :: Int -> Int
v = \x -> 0xdeadbeef

resource_dyn :: Dynamic
resource_dyn = toDyn v