diff options
| author | Pierre Weis <Pierre.Weis@inria.fr> | 2000-02-17 16:52:32 +0000 |
|---|---|---|
| committer | Pierre Weis <Pierre.Weis@inria.fr> | 2000-02-17 16:52:32 +0000 |
| commit | 2fdd0e280ad22b7664cc3f66f66a6b172d0dbfec (patch) | |
| tree | 20e199a57a4d54a726106aade5ebb3d3e812caa1 /otherlibs/labltk/compiler/parser.mly | |
| parent | e995789ca9035ecbc625b50a34cd95cc1396075f (diff) | |
cosmetique pour comprendre
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@2834 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'otherlibs/labltk/compiler/parser.mly')
| -rw-r--r-- | otherlibs/labltk/compiler/parser.mly | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/otherlibs/labltk/compiler/parser.mly b/otherlibs/labltk/compiler/parser.mly index 336c4d47a..eb7b3137d 100644 --- a/otherlibs/labltk/compiler/parser.mly +++ b/otherlibs/labltk/compiler/parser.mly @@ -90,7 +90,7 @@ Type2 : Labeled_type2 : Type2 - { "",$1 } + { "", $1 } | IDENT COLON Type2 { $1, $3 } ; @@ -134,16 +134,16 @@ SimpleArg: STRING {StringArg $1} | Type - {TypeArg ("",$1) } + {TypeArg ("", $1) } ; Arg: STRING {StringArg $1} | Type - {TypeArg ("",$1) } + {TypeArg ("", $1) } | IDENT COLON Type - {TypeArg ($1,$3)} + {TypeArg ($1, $3)} | QUESTION IDENT COLON LBRACKET SimpleArgList RBRACKET DefaultList {OptionalArgs ( $2, $5, $7 )} | QUESTION WIDGET COLON LBRACKET SimpleArgList RBRACKET DefaultList @@ -153,7 +153,7 @@ Arg: | QUESTION WIDGET COLON LBRACKET SimpleArgList RBRACKET {OptionalArgs ( "widget", $5, [] )} | WIDGET COLON Type - {TypeArg ("widget",$3)} + {TypeArg ("widget", $3)} | Template { $1 } ; |