File: Test.hsc

package info (click to toggle)
hugs98 98.200609.21-6
  • links: PTS
  • area: main
  • in suites: bookworm
  • size: 43,136 kB
  • sloc: haskell: 118,978; xml: 61,802; ansic: 46,695; sh: 8,750; cpp: 6,033; makefile: 2,663; yacc: 1,111; cs: 883; sed: 10
file content (11 lines) | stat: -rw-r--r-- 207 bytes parent folder | download | duplicates (7) 
1
2
3
4
5
6
7
8
9
10
11
 
module Test where

main :: IO ()
main = putStrLn "shows a cpphs+hsc2hs bug with comments"

#def inline int that_one_will_work(void) {return 42;}

{-
#def inline int cpphs_will_stumble(void) {return 42;}
-}