Runtime компиляция в Haskell
![топ 100 блогов](/media/images/default.jpg)
UPD.
Просто выполнить код a la ghci можно так (частично взято отсюда):
{-# LANGUAGE NoMonomorphismRestriction #-}
module Test
where
import Language.Haskell.Interpreter
import Control.Monad
run = runInterpreter . test
test :: String -> Interpreter String
test s =
do
setImports ["Prelude"]
res <- eval s
return res
А вот так можно выполнить некую заранее неизвестную (кроме типа) операцию:
{-# LANGUAGE NoMonomorphismRestriction #-}
module Test
where
import Language.Haskell.Interpreter
import Control.Monad
import System.IO
run = runInterpreter . test
getOperation s = interpret s (as::(Double -> Double))
test :: String -> Interpreter Double
test s =
do
setImports ["Prelude"]
op <- getOperation s
let res = op 1.0
return res
main :: IO ()
main =
do
s <- getLine
res <- run s
print res
return ()
Для примера:
*Test> main
sin
Right 0.8414709848078965
*Test> main
cos
Right 0.5403023058681398
Замечания, критика, поправки и вежливые ругательства приветствуются...
Кстати, как можно сделать в жж syntax colorizing?
|
</> |