diff options
| author | Manuel M T Chakravarty <chak@cse.unsw.edu.au> | 2013-09-04 15:29:03 +1000 |
|---|---|---|
| committer | Manuel M T Chakravarty <chak@cse.unsw.edu.au> | 2013-09-04 15:29:03 +1000 |
| commit | fc4856f9e811d9a23ae9212f43a09ddf5ef12b26 (patch) | |
| tree | be25695f2b816016314e912f512a40d5cdf43c22 /utils | |
| parent | 62d3fdeb9edfcfdeb661a6b8551ac2fc45b8595c (diff) | |
| download | haskell-fc4856f9e811d9a23ae9212f43a09ddf5ef12b26.tar.gz | |
Make validate play nice with clang (for Xcode 5 command line tools)
* This partially fixes #8148. However, --with-ghc-4.8 will still not work given the rather dubious m4 macros and the failures in the test suite due to '-nodefaultlibs' still need to be fixed.
Diffstat (limited to 'utils')
| -rw-r--r-- | utils/hp2ps/Axes.c | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/utils/hp2ps/Axes.c b/utils/hp2ps/Axes.c index 4c2e4f5e95..adc3c45146 100644 --- a/utils/hp2ps/Axes.c +++ b/utils/hp2ps/Axes.c @@ -203,14 +203,18 @@ Round(floatish y) int i; if (y > 10.0) { - for (i = 0; y > 10.0; y /= 10.0, i++) ; + for (i = 0; y > 10.0; y /= 10.0, i++) + ; y = OneTwoFive(y); - for ( ; i > 0; y = y * 10.0, i--) ; + for ( ; i > 0; y = y * 10.0, i--) + ; } else if (y < 1.0) { - for (i = 0; y < 1.0; y *= 10.0, i++) ; + for (i = 0; y < 1.0; y *= 10.0, i++) + ; y = OneTwoFive(y); - for ( ; i > 0; y = y / 10.0, i--) ; + for ( ; i > 0; y = y / 10.0, i--) + ; } else { y = OneTwoFive(y); |