Navigation Menu

Skip to content

Commit

Permalink
Fix build with OCaml 3.12.0
Browse files Browse the repository at this point in the history
The quotation <:ctyp< $a$ $b$ >> doesn't work any more with OCaml
3.12.0+beta1; we manually expand it.

Bug-OCaml: http://caml.inria.fr/mantis/view.php?id=5080
Bug-Debian: http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=586493
Signed-off-by: Stephane Glondu <steph@glondu.net>
  • Loading branch information
glondu authored and thelema committed Jul 15, 2010
1 parent 87c5ca7 commit dbe3064
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/syntax/pa_strings/pa_format.ml
Expand Up @@ -246,7 +246,7 @@ struct
<:expr< fun paren out x -> BatIO.nwrite out "<abstract>" >>
| <:ctyp@_loc< $id:id$ >> ->
<:expr< $id:map_id id$ >>
| <:ctyp@_loc< $a$ $b$ >> ->
| Ast.TyApp (_loc, b, a) ->
<:expr< $vprinter_of_ctyp b$ $vprinter_of_ctyp a$ >>
| <:ctyp@_loc< $tup:t$ >> ->
let l = Ast.list_of_ctyp t [] in
Expand Down

0 comments on commit dbe3064

Please sign in to comment.