Topspeed_JPI/TS/SRC/C_CMTBT.A

(*
   Copyright (c) 1990 by Jensen & Partners International (JPI),
   All Rights Reserved
*)

(*
   Special support module for using the B-tree Toolkit with multi-threaded
   TopSpeed C programs.
*)

module c_cmtbt

segment Process_TEXT(CODE,28H);

extrn _Delay
extrn _Lock
extrn _Unlock
extrn _Delay

public Process$Delay:
  jmp far _Delay

public Process$Lock:
  jmp far _Lock

public Process$Unlock:
  jmp far _Unlock

$0:
  ret far 0

segment Process_CONST(FAR_DATA,00028H)

public Process$:
  dd $0
  db 0FFH,0FFH

end