diff options
| author | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2012-11-03 10:36:15 +0000 |
|---|---|---|
| committer | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2012-11-03 10:36:15 +0000 |
| commit | dcb9f48f51cec5e864565862a700c27df2a1a7e6 (patch) | |
| tree | b453b51b7406d3b1cf7191729637446a23ffc92c /cparser/Parser.mly | |
| parent | bd93aa7ef9c19a4def8aa64c32faeb04ab2607e9 (diff) | |
| download | compcert-dcb9f48f51cec5e864565862a700c27df2a1a7e6.tar.gz compcert-dcb9f48f51cec5e864565862a700c27df2a1a7e6.zip | |
Flocq-based parsing of floating-point literals (Jacques-Henri Jourdan)
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@2065 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'cparser/Parser.mly')
| -rw-r--r-- | cparser/Parser.mly | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/cparser/Parser.mly b/cparser/Parser.mly index 0eebb84a..83b1984c 100644 --- a/cparser/Parser.mly +++ b/cparser/Parser.mly @@ -199,14 +199,13 @@ let transformOffsetOf (speclist, dtype) member = let sizeofType = [SpecType Tunsigned], JUSTBASE in let resultExpr = CAST (sizeofType, SINGLE_INIT addrExpr) in resultExpr - %} %token <string * Cabs.cabsloc> IDENT %token <int64 list * Cabs.cabsloc> CST_CHAR %token <int64 list * Cabs.cabsloc> CST_WCHAR %token <string * Cabs.cabsloc> CST_INT -%token <string * Cabs.cabsloc> CST_FLOAT +%token <Cabs.floatInfo * Cabs.cabsloc> CST_FLOAT %token <string * Cabs.cabsloc> NAMED_TYPE /* Each character is its own list element, and the terminating nul is not |