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

SCM Repository

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

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

Parent Directory Parent Directory | Revision Log Revision Log


Revision 113 - (download) (annotate)
Fri Jun 5 19:41:21 1998 UTC (22 years, 2 months ago) by monnier
Original Path: sml/branches/FLINT/src/compiler/PervEnv/Boot/debug.sml
File size: 511 byte(s)
110.7
(* debug.sml
 *
 * COPYRIGHT (c) 1996 AT&T Research.
 *
 * This structure provides access to the run-time system debug output
 * stream.  It is useful for debugging the basis code, since it doesn't
 * depend on the SML I/O stack.
 *
 *)

structure Debug : sig

    val pr : string -> unit
    val dummy : string -> unit

  end = struct

    val pr : string -> unit = CInterface.c_function "SMLNJ-RunT" "debug"
    val dummy : string -> unit = CInterface.c_function "SMLNJ-RunT" "dummy"

  end


(*
 * $Log$
 *)

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