diff options
| -rw-r--r-- | parsing/g_prim.ml4 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/parsing/g_prim.ml4 b/parsing/g_prim.ml4 index 507e16a44a..86207be125 100644 --- a/parsing/g_prim.ml4 +++ b/parsing/g_prim.ml4 @@ -100,7 +100,7 @@ GEXTEND Gram ; dirpath: [ [ id = ident; l = LIST0 field -> - make_dirpath (l@[id]) ] ] + make_dirpath (List.rev (id::l)) ] ] ; string: [ [ s = STRING -> s ] ] |