12 lines
257 B
Haskell
Raw Normal View History

2005-04-24 08:51:33 +00:00
import Plugins
import API
main = do
m_v <- load_ "../Test.o" ["../api"] "resource"
v <- case m_v of
LoadFailure _ -> error "load failed"
LoadSuccess _ v -> return v
let s = field v
print s