Permalink
Browse files

Merge pull request #15 from jonludlam/recursive-idl-types

Ensure the IDL p4 filter can cope with recursive types
  • Loading branch information...
2 parents 89dac17 + ff1bc68 commit 7de5b443160105a96562397e05fae021a212e04d @samoht committed Dec 18, 2012
Showing with 2 additions and 2 deletions.
  1. +2 −2 lib/p4_idl.ml
View
@@ -335,8 +335,8 @@ struct
let _loc = Ast.loc_of_str_item si in
<:str_item<
$si$;
- value $MyRpc.Rpc_of.gen_one (lid,[],body)$;
- value $MyRpc.Of_rpc.gen_one (lid,[],body)$;
+ value rec $MyRpc.Rpc_of.gen_one (lid,[],body)$
+ and $MyRpc.Of_rpc.gen_one (lid,[],body)$;
>>;;
AstFilters.register_str_item_filter begin fun si ->

0 comments on commit 7de5b44

Please sign in to comment.