Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] Annotation of /sml/trunk/src/compiler/PervEnv/Boot/debug.sml
ViewVC logotype

Annotation of /sml/trunk/src/compiler/PervEnv/Boot/debug.sml

Parent Directory Parent Directory | Revision Log Revision Log


Revision 223 - (view) (download)
Original Path: sml/branches/FLINT/src/compiler/PervEnv/Boot/debug.sml

1 : monnier 89 (* debug.sml
2 :     *
3 :     * COPYRIGHT (c) 1996 AT&T Research.
4 :     *
5 :     * This structure provides access to the run-time system debug output
6 :     * stream. It is useful for debugging the basis code, since it doesn't
7 :     * depend on the SML I/O stack.
8 :     *
9 :     *)
10 :    
11 :     structure Debug : sig
12 :    
13 :     val pr : string -> unit
14 :     val dummy : string -> unit
15 :    
16 :     end = struct
17 :    
18 :     val pr : string -> unit = CInterface.c_function "SMLNJ-RunT" "debug"
19 :     val dummy : string -> unit = CInterface.c_function "SMLNJ-RunT" "dummy"
20 :    
21 :     end
22 :    
23 :    
24 :     (*
25 : monnier 223 * $Log: debug.sml,v $
26 :     * Revision 1.1.1.1 1998/04/08 18:40:05 george
27 :     * Version 110.5
28 :     *
29 : monnier 89 *)

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0