home *** CD-ROM | disk | FTP | other *** search
- (* Copyright 1989 by AT&T Bell Laboratories *)
- (* printutil.sig *)
-
- signature PRINTUTIL =
- sig
- structure Symbol : SYMBOL
- val newline : unit -> unit
- val tab : int -> unit
- val printSequence : string -> ('a -> unit) -> 'a list -> unit
- val printClosedSequence : (string*string*string) -> ('a -> unit) ->
- 'a list -> unit
- val printSym : Symbol.symbol -> unit
- val formatQid : Symbol.symbol list -> string
- val mlstr : string -> string
- val pr_mlstr : string -> unit
- val nlindent : int -> unit
- val printvseq : int -> string -> ('a -> unit) -> 'a list -> unit
- val prIntPath : int list -> unit
- val prSymPath : Symbol.symbol list -> unit
- end
-
-