pp_tag : ppstream -> tag -> unit
- val ppstrm = PP.mk_ppstream (Portable.defaultConsumer()); > val ppstrm = <ppstream> : ppstream - Tag.pp_tag ppstrm (Tag.read "fooble"); > val it = () : unit - (PP.flush_ppstream ppstrm; print "\n"); [oracles: fooble] [axioms: ] > val it = () : unit