summaryrefslogtreecommitdiff
path: root/caml
diff options
context:
space:
mode:
authorGravatar xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e>2006-09-11 16:19:29 +0000
committerGravatar xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e>2006-09-11 16:19:29 +0000
commit02e7ed8a362a7cd5a1a85571dee8b39c9ed7144f (patch)
treebb6b64ef9afa482f7c3cc392b3d430f74a5f4bd0 /caml
parent52c209f09fa266d4b05cccec061954efbd909ee6 (diff)
Typo dans impression structs
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@97 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'caml')
-rw-r--r--caml/PrintCsyntax.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/caml/PrintCsyntax.ml b/caml/PrintCsyntax.ml
index f837099..6e88da9 100644
--- a/caml/PrintCsyntax.ml
+++ b/caml/PrintCsyntax.ml
@@ -423,7 +423,7 @@ let print_struct_or_union p (name, fld) =
fprintf p "@ %s;" (name_cdecl (extern_atom id) ty);
print_fields rem in
print_fields fld;
- fprintf p "@;<0 -2>}@]@ "
+ fprintf p "@;<0 -2>};@]@ "
let print_program p prog =
struct_unions := StructUnionSet.empty;