From: Mart Lubbers <mart@martlubbers.net>
Date: Fri, 12 May 2017 09:48:49 +0000 (+0200)
Subject: small typo
X-Git-Url: https://git.martlubbers.net/?a=commitdiff_plain;h=7be7221d08489763405ec243b3b4c38d65598d43;p=mTask.git

small typo
---

diff --git a/mTaskInterpret.icl b/mTaskInterpret.icl
index c81476a..5e17aeb 100644
--- a/mTaskInterpret.icl
+++ b/mTaskInterpret.icl
@@ -283,7 +283,7 @@ instance userLed ByteCode where
 	ledOff (BC l) = BC $ l >>| tell [BCLedOff]
 
 instance retrn ByteCode where
-  retrn (BC l) = BC $ tell [BCReturn]
+  retrn (BC l) = tell` [BCReturn]
 
 instance zero BCState where
 	zero = {freshl=[1..], freshs=[1..], sdss=[]}