diff options
author | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2014-04-06 07:11:12 +0000 |
---|---|---|
committer | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2014-04-06 07:11:12 +0000 |
commit | 56579f8ade21cb0a880ffbd6d5e28f152e951be8 (patch) | |
tree | 533192cc9757df2c0811497231acb6290f678e29 /test/regression/singlefloats.c | |
parent | f45d0c79bc220fc5dbbf7a59b5d100d16726f1ec (diff) | |
download | compcert-56579f8ade21cb0a880ffbd6d5e28f152e951be8.tar.gz compcert-56579f8ade21cb0a880ffbd6d5e28f152e951be8.zip |
Merge of branch linear-typing:
1) Revised division of labor between RTLtyping and Lineartyping:
- RTLtyping no longer keeps track of single-precision floats,
switches from subtype-based inference to unification-based inference.
- Unityping: new library for unification-based inference.
- Locations: don't normalize at assignment in a stack slot
- Allocation, Allocproof: simplify accordingly.
- Lineartyping: add inference of locations that contain
a single-precision float.
- Stackingproof: adapted accordingly.
This addresses a defect report whereas RTLtyping was rejecting code that used a RTL pseudoreg to hold both double- and single-precision floats (see test/regression/singlefloats.c).
This corresponds to commits 2435+2436 plus improvements in Lineartyping.
2) Add -dtimings option to measure compilation times.
Moved call to C parser from Elab to Parse, to make it easier to
measure parsing time independently of elaboration time.
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@2449 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'test/regression/singlefloats.c')
-rw-r--r-- | test/regression/singlefloats.c | 32 |
1 files changed, 32 insertions, 0 deletions
diff --git a/test/regression/singlefloats.c b/test/regression/singlefloats.c new file mode 100644 index 00000000..9e3c5824 --- /dev/null +++ b/test/regression/singlefloats.c @@ -0,0 +1,32 @@ +/* This caused an internal compiler error in CompCert 2.2. + (RTLtyping failure, because y is used both as a float32 and a float64). */ + +typedef union +{ + float value; + unsigned int word; +} shape; + +float +expf(float x) +{ + float y,hi; + + y = 1/hi; + + shape A; + A.value = y; + + shape B; + B.word = A.word; + y = B.value; + + return y; +} + +/* Another internal compiler error in CompCert 2.2. */ + +void store(volatile float * p, double x) +{ + *p = x + 1.0; +} |