X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=Tasks%2FmTaskTask.dcl;h=3370e4a7f546439f6858f0b5ec6ceedeac4b908e;hb=8246c6551faa818be7a58638dbbc2e521f21c454;hp=19a3db0af236ea27a7afeebf60ba301a6d22ec29;hpb=18c1286739897b65578e87b17167c6cef1922a3b;p=mTask.git diff --git a/Tasks/mTaskTask.dcl b/Tasks/mTaskTask.dcl index 19a3db0..3370e4a 100644 --- a/Tasks/mTaskTask.dcl +++ b/Tasks/mTaskTask.dcl @@ -13,3 +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 ()