X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=mTaskInterpret.dcl;h=63778bd54c8bffbd84b02e4f5e6cdf14523f310f;hb=4bb252b0423c73d134a541db44b8b08eab507a39;hp=29e1fb95b6e98a089fedd10317b105aa9894383b;hpb=a2df77cbda43d5a24eeb8ac7db7452baae9f18aa;p=mTask.git

diff --git a/mTaskInterpret.dcl b/mTaskInterpret.dcl
index 29e1fb9..63778bd 100644
--- a/mTaskInterpret.dcl
+++ b/mTaskInterpret.dcl
@@ -21,7 +21,7 @@ from Generics.gCons import class gCons, generic conses, generic consName, generi
 	| MTEmpty
 
 :: MTaskMSGSend
-	= MTTask MTaskInterval String
+	= MTTask MTaskInterval Char String
 	| MTTaskDel Int
 	| MTSds Int BCValue
 	| MTUpd Int BCValue