module ExternDll0 where

extern dynamic ccall putChar "WinDLL" "putChar" :: Int! -> Int!

main = putChar 65