Skip to content
This repository
Fetching contributors…

Octocat-spinner-32-eaf2f5

Cannot retrieve contributors at this time

file 21 lines (16 sloc) 0.259 kb
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
{-# LANGUAGE CPP #-}
module Tests.HasteReadInt where
#ifdef __HASTE__
import Haste

{-# NOINLINE x #-}
x :: Int
x = read_ "27"

runTest :: IO Int
runTest = return x
#else

{-# NOINLINE x #-}
x :: Int
x = read "27"

runTest :: IO Int
runTest = return x
#endif
Something went wrong with that request. Please try again.