2005-04-24 08:51:33 +00:00
|
|
|
|
2005-05-15 06:03:55 +00:00
|
|
|
import System.Plugins
|
2005-04-24 08:51:33 +00:00
|
|
|
import API
|
|
|
|
|
|
|
|
|
|
main = do
|
|
|
|
|
m_v <- dynload "../Plugin.o"
|
|
|
|
|
["../api"]
|
2005-08-18 05:03:08 +00:00
|
|
|
[]
|
2005-04-24 08:51:33 +00:00
|
|
|
"resource_dyn"
|
|
|
|
|
|
|
|
|
|
case m_v of
|
|
|
|
|
LoadFailure _ -> putStrLn "didn't compile"
|
|
|
|
|
LoadSuccess _ v -> putStrLn $ function v
|
|
|
|
|
|
