@@ -0,0 +1,15 @@
(* Datatypes for Postscript instructions *)
open Lang
type instr =
IVal of value
| IVar of int
| IOper of string
| IBloc of instr
| ISeq of instr list
| ILoop of instr
| IDef of fname * instr
let string_of_instr instr = ""
The note is not visible to the blocked user.