18 lines
317 B
OCaml
18 lines
317 B
OCaml
|
|
(* This file implements native functions of the VM runtime.
|
|
Stuff like printing to the screen, file I/O etc will be implemented
|
|
here.
|
|
*)
|
|
open Types
|
|
|
|
let builtin_print (v : Types.value ref list) =
|
|
List.iter (fun r -> print_endline (print_value !r)) v;
|
|
Types.Nil
|
|
|
|
let table = [|
|
|
builtin_print
|
|
|]
|
|
|
|
|
|
|