2007-09-17非生産的な生産活動を行うときほど楽しいものは無い。 （以下では前提として実行するCPUをx86とします。SPARCとかの人はごめんなさい） Haskellから任意の機械語のコードを実行するにはどうすればよいのだろう。 Foreign.PtrにFunPtrという型が定義してあり、これは機械語コードの入っているメモリへのポインタを示す。 さらに、 type IntFunction = CInt -> IO () foreign import ccall "dynamic" mkFun :: FunPtr IntFunction -> IntFunctionなどとすることによりFunPtrの指すコードを呼び出すためのラッパを生成できる。 型ごとに別個のラッパが必要になり、必要に応じて自動的に定義されるわけでもないので、必要なものは個別に書いてやる必要がある。 これらを用いれば、Haskellから
