X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=Tasks%2FmTaskTask.dcl;h=0beddf281cebe49c50e3845760ee5f1f356e8e81;hb=41ba74ece94d91858a6683a58a0f064c36900c4b;hp=3370e4a7f546439f6858f0b5ec6ceedeac4b908e;hpb=a408afc0974b9a122d34f42afe177b08668c075c;p=mTask.git

diff --git a/Tasks/mTaskTask.dcl b/Tasks/mTaskTask.dcl
index 3370e4a..0beddf2 100644
--- a/Tasks/mTaskTask.dcl
+++ b/Tasks/mTaskTask.dcl
@@ -13,4 +13,4 @@ derive class iTask MTaskTask, MTaskInterval, Main, ByteCode, Stmt, Expr, BC, BCS
 	}
 
 makeTask :: String Int -> Task MTaskTask
-sendTaskToDevice :: String (Main (ByteCode () Stmt)) (MTaskDevice, MTaskInterval) -> Task ()
+sendTaskToDevice :: String (Main (ByteCode a Stmt)) (MTaskDevice, MTaskInterval) -> Task ()