Up
module
Cst
:
sig
#
type
cst =
#
| CstTerminal
of
Grammar
.
Terminal
.
t
#
| CstNonTerminal
of
Grammar
.
Production
.
index
*
cst
array
#
| CstError
#
val
print :
Pervasives
.
out_channel
->
cst
->
unit
#
val
show :
Pervasives
.
out_channel
->
cst
->
unit
end