small typo

diff --git a/mTaskInterpret.icl b/mTaskInterpret.icl
index c81476a..5e17aeb 100644 (file)
--- 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=[]}