testsuite/tests/rts/T12031/ExternBug.hs


1
2
3
4
5
6
7
8
9

-- Copyright (c) 2016, Ryan Scott
-- ExternBug.hs
{-# LANGUAGE ForeignFunctionInterface #-}
module ExternBug (bar) where

{-# INCLUDE foo.h #-}

foreign import ccall "bar"
  bar :: IO ()