modularize more

[mTask.git] / Devices / mTaskDevice.dcl

diff --git a/Devices/mTaskDevice.dcl b/Devices/mTaskDevice.dcl
index 6551eb3..457a1a6 100644 (file)
--- a/Devices/mTaskDevice.dcl
+++ b/Devices/mTaskDevice.dcl
@@ -36,3 +36,5 @@ class MTaskDuplex a where
 addDevice :: (Shared [MTaskDevice]) -> Task String
 //addDevice :: (Shared [MTaskDevice]) -> Task MTaskResource
 //addDevice :: (Shared [MTaskDevice]) -> Task ()
+
+viewDevices :: [MTaskDevice] -> Task ()