Functor Camlp4.Struct.Grammar.Fold.Make

module Make: 
functor (Structure : Camlp4.Struct.Grammar.Structure.S) -> sig .. end

module Parse: Camlp4.Struct.Grammar.Parser.Make(Structure)

module Fail: Camlp4.Struct.Grammar.Failed.Make(Structure)

module Stream: sig .. end

val sfold0 : ('a -> 'b -> 'b) ->
       'b ->
       'c ->
       'd ->
       ('e Stream.t -> 'a) ->
       'e Stream.t -> 'b

val sfold1 : ('a -> 'b -> 'b) ->
       'b ->
       'c ->
       'd ->
       ('e Stream.t -> 'a) ->
       'e Stream.t -> 'b

val sfold0sep : ('a -> 'b -> 'b) ->
       'b ->
       Structure.internal_entry ->
       Structure.symbol list ->
       ('c Stream.t -> 'a) ->
       ('c Stream.t -> unit) ->
       'c Stream.t -> 'b

val sfold1sep : ('a -> 'b -> 'b) ->
       'b ->
       Structure.internal_entry ->
       Structure.symbol list ->
       ((Structure.Token.t * Structure.token_info)
        Stream.t -> 'a) ->
       ((Structure.Token.t * Structure.token_info)
        Stream.t -> unit) ->
       (Structure.Token.t * Structure.token_info)
       Stream.t -> 'b