1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14

[@@@ocaml.text "/*"]

(** Copyright 2021-2024, Kakadu and contributors *)

(** SPDX-License-Identifier: LGPL-3.0-or-later *)

[@@@ocaml.text "/*"]

open Mml

let () =
  let text = In_channel.(input_all stdin) |> String.trim in
  Interpret.parse_and_run text
;;