|
|
1.1 root 1: (* Copyright 1989 by AT&T Bell Laboratories *)
2: (* printutil.sig *)
3:
4: signature PRINTUTIL =
5: sig
6: structure Symbol : SYMBOL
7: val newline : unit -> unit
8: val tab : int -> unit
9: val printSequence : string -> ('a -> unit) -> 'a list -> unit
10: val printClosedSequence : (string*string*string) -> ('a -> unit) ->
11: 'a list -> unit
12: val printSym : Symbol.symbol -> unit
13: val formatQid : Symbol.symbol list -> string
14: val mlstr : string -> string
15: val pr_mlstr : string -> unit
16: val nlindent : int -> unit
17: val printvseq : int -> string -> ('a -> unit) -> 'a list -> unit
18: end
19:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.