working again, externalized some device helper functions and added share updating

[mTask.git] / Utils / Devices.dcl

diff --git a/Utils/Devices.dcl b/Utils/Devices.dcl
new file mode 100644 (file)
index 0000000..d816d3f
--- /dev/null
+++ b/Utils/Devices.dcl
@@ -0,0 +1,7 @@
+definition module Utils.Devices
+
+import iTasks
+import Devices.mTaskDevice
+
+getDeviceByName :: String -> Task MTaskDevice
+channels :: MTaskDevice -> Shared Channels