X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=mTask.icl;h=2bbcc30264dc78736e2bbd60709ae48ebf209981;hb=a2df77cbda43d5a24eeb8ac7db7452baae9f18aa;hp=b92b1fcca3c0ff6e75e6ba72e42dc0c46c05d681;hpb=28f4e19f893889e6d19d8c0653a643ae1580fd6d;p=mTask.git

diff --git a/mTask.icl b/mTask.icl
index b92b1fc..2bbcc30 100644
--- a/mTask.icl
+++ b/mTask.icl
@@ -123,9 +123,8 @@ instance == DigitalPin where (==) x y = x === y
 instance == AnalogPin   where (==) x y = x === y
 instance == UserLED where (==) x y = x === y
 
-derive gEq UserLED
-derive gPrint Pin, Button, UserLED, AnalogPin, DigitalPin, PinMode
-derive class gCons Pin, Button, UserLED, AnalogPin, DigitalPin, PinMode
+//derive class gCons UserLED, Long, Pin, Button, UserLED, AnalogPin, DigitalPin, PinMode
+//derive class iTask UserLED, Long, Pin, Button, UserLED, AnalogPin, DigitalPin, PinMode
 
 tab =: toString (repeatn tabSize ' ')
 tabSize :== 2