X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=mTaskCode.dcl;h=91c70382e6b231b1a7fa56a4886ce91264a755ad;hb=7ab8606c3d22a2bc2743eae7a398407c84d502f2;hp=47aff54518a95cd537e576df4f098b7df3bcc634;hpb=0d7dc6966d2f428cd7543708e220aa4315d64978;p=mTask.git

diff --git a/mTaskCode.dcl b/mTaskCode.dcl
index 47aff54..91c7038 100644
--- a/mTaskCode.dcl
+++ b/mTaskCode.dcl
@@ -14,6 +14,7 @@ instance toCode Char
 instance toCode String
 instance toCode DigitalPin
 instance toCode AnalogPin
+instance toCode UserLED
 
 argType :: (((Code a p)->Code b q)->In ((Code a p)->Code b q) (Code c s)) -> a | type a