18 lines
417 B
Haskell
18 lines
417 B
Haskell
{-# OPTIONS -cpp #-}
|
|
|
|
#include "../../../../config.h"
|
|
|
|
import System.Plugins
|
|
import API
|
|
|
|
-- an example where we just want to load an object and run it
|
|
|
|
main = do
|
|
let includes = [TOP ++ "/examples/load/null/api"]
|
|
m_v <- load "../Null.o" includes [] "resource"
|
|
v <- case m_v of
|
|
LoadSuccess _ v -> return v
|
|
_ -> error "load failed"
|
|
|
|
putStrLn ( show (a v) )
|