Ну всё, теперь точно готов для продакшона
{-# LANGUAGE QuasiQuotes #-}
{-# LANGUAGE TemplateHaskell #-}
import qualified Language.C.Inline as C
C.include "<stdio.h>"
C.include "<math.h>"
main :: IO ()
main = do
x <- [C.exp| int{ printf("Some number: %.2f\n", cos(0.5)) } |]
putStrLn $ show x ++ " characters printed."
Цоперайт © 2010-2016 @stiletto.
пиздец убожество