diff options
author | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2013-10-16 09:50:38 +0000 |
---|---|---|
committer | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2013-10-16 09:50:38 +0000 |
commit | c857f0b02463f4b0bc8100434eecdd46ce2ecbd1 (patch) | |
tree | 4496e88a95bac87525f6422274a8b5dafc4c356b /common | |
parent | 32b9fdc4332a6af5d108a0468399661867f4d2b4 (diff) | |
download | compcert-c857f0b02463f4b0bc8100434eecdd46ce2ecbd1.tar.gz compcert-c857f0b02463f4b0bc8100434eecdd46ce2ecbd1.zip |
Cminor parsing and printing (from Andrew Tolmach)
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@2345 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'common')
-rw-r--r-- | common/PrintAST.ml | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/common/PrintAST.ml b/common/PrintAST.ml index 97684470..a3f6bcf0 100644 --- a/common/PrintAST.ml +++ b/common/PrintAST.ml @@ -23,10 +23,10 @@ let name_of_type = function | Tsingle -> "single" let name_of_chunk = function - | Mint8signed -> "int8signed" - | Mint8unsigned -> "int8unsigned" - | Mint16signed -> "int16signed" - | Mint16unsigned -> "int16unsigned" + | Mint8signed -> "int8s" + | Mint8unsigned -> "int8u" + | Mint16signed -> "int16s" + | Mint16unsigned -> "int16u" | Mint32 -> "int32" | Mint64 -> "int64" | Mfloat32 -> "float32" |