timeout-sig.sml

来自「这是我们参加06年全国开源软件的竞赛作品」· SML 代码 · 共 19 行

(* timeout-sig.sml
 *
 * COPYRIGHT (c) 1995 AT&T Bell Laboratories.
 * COPYRIGHT (c) 1989-1991 John H. Reppy
 *
 * Exported interface for timeout synchronization.
 *)

signature TIME_OUT =
  sig

    type 'a event

    val timeOutEvt : Time.time -> unit event
    val atTimeEvt : Time.time -> unit event

  end;