From 6b9953b41f3d691f61e3d07e88076da908fd6a74 Mon Sep 17 00:00:00 2001
From: Dmitry Boulytchev <dboulytchev@gmail.com>
Date: Sun, 4 Mar 2018 18:13:51 +0300
Subject: [PATCH] Added missed CONST instruction

---
 src/SM.ml | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/SM.ml b/src/SM.ml
index 0e0bc687d..490b99f01 100644
--- a/src/SM.ml
+++ b/src/SM.ml
@@ -4,6 +4,7 @@ open Language
 (* The type for the stack machine instructions *)
 @type insn =
 (* binary operator                 *) | BINOP of string
+(* put a constant on the stack     *) | CONST of int                 
 (* read to stack                   *) | READ
 (* write from stack                *) | WRITE
 (* load a variable to the stack    *) | LD    of string