File: nastyhack

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 (16 lines) | stat: -rw-r--r-- 359 bytes parent folder | download | duplicates (7) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
#define GHC_PKG_VERSION 6.2.2
-- hackery to convice cpp to splice GHC_PKG_VERSION into a string
version :: String
version = tail "\ 
    \ GHC_PKG_VERSION"

version2 = "GHC_PKG_VERSION"

#define v3 "GHC_PKG_VERSION"
version3 = v3

#define stringify(s) #s
version4 = stringify(GHC_PKG_VERSION)

#define stringify2(s) "s"
version5 = stringify2(GHC_PKG_VERSION)