add datetime device, revise device handling, remove tracing code
This commit is contained in:
parent
56a3398c8f
commit
cf31dc5564
8 changed files with 115 additions and 119 deletions
|
|
@ -17,7 +17,6 @@ type _ Effect.t +=
|
|||
| BRK : int Effect.t
|
||||
| DEI : ([ `Byte | `Short ] * int) -> int Effect.t
|
||||
| DEO : (int * int) -> unit Effect.t
|
||||
| Trace : (int * Instr.t * int list) -> unit Effect.t
|
||||
|
||||
val create : string -> machine
|
||||
val dispatch : ?trace:bool -> machine -> int -> 'a
|
||||
val dispatch : machine -> int -> 'a
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue