diff options
author | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2012-03-09 10:01:06 +0000 |
---|---|---|
committer | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2012-03-09 10:01:06 +0000 |
commit | de7c3ec210cb5374bfcd133394fa35f0c7f516ac (patch) | |
tree | 2882b70cc334b9989970233ceeb356f22dd65616 /backend/PrintCminor.ml | |
parent | 8a64451e6f474d20a469b939a938577bbe6d3d66 (diff) | |
download | compcert-de7c3ec210cb5374bfcd133394fa35f0c7f516ac.tar.gz compcert-de7c3ec210cb5374bfcd133394fa35f0c7f516ac.zip |
PrintCminor: printing Sskip
test/cminor: updating
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1839 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'backend/PrintCminor.ml')
-rw-r--r-- | backend/PrintCminor.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/backend/PrintCminor.ml b/backend/PrintCminor.ml index 330c6c21..619c788b 100644 --- a/backend/PrintCminor.ml +++ b/backend/PrintCminor.ml @@ -173,7 +173,7 @@ let rec print_sig p = function let rec print_stmt p s = match s with | Sskip -> - fprintf p "/*skip*/;" + fprintf p "/*skip*/" | Sassign(id, e2) -> fprintf p "@[<hv 2>%s =@ %a;@]" (ident_name id) print_expr e2 | Sstore(chunk, a1, a2) -> |