From 57ccfa2352a4e69f641db68fa597abbc1b8a55f3 Mon Sep 17 00:00:00 2001
From: Podkopaev Anton <podkoav239@gmail.com>
Date: Tue, 6 Mar 2018 18:37:17 +0300
Subject: [PATCH] Typo

---
 src/Language.ml | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/Language.ml b/src/Language.ml
index 55782a205..ed24bdc1c 100644
--- a/src/Language.ml
+++ b/src/Language.ml
@@ -94,9 +94,9 @@ type t = Stmt.t
 
 (* Top-level evaluator
 
-     eval : int list -> t -> int list
+     eval : t -> int list -> int list
 
    Takes a program and its input stream, and returns the output stream
 *)
-let eval i p =
+let eval p i =
   let _, _, o = Stmt.eval (Expr.empty, i, []) p in o