X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=mTaskInterpret.dcl;h=00488591cd8620d97ca29995eda4d516f62544cf;hb=ff56601fe3bbca4a5d507de43f31de10a11dfdb5;hp=fa5d1d2700b5da2211a771e7c19f5f8f9930ad2d;hpb=8316870cacd21b19badf032f3b8189bdd54eb1e3;p=mTask.git

diff --git a/mTaskInterpret.dcl b/mTaskInterpret.dcl
index fa5d1d2..0048859 100644
--- a/mTaskInterpret.dcl
+++ b/mTaskInterpret.dcl
@@ -35,8 +35,10 @@ import mTask
 	| BCSerialRead
 	| BCSerialParseInt
 	//Pins
-	| BCAnalogRead AnalogPin
-	| BCAnalogWrite AnalogPin
+	| BCAnalogRead String
+	| BCAnalogWrite String
+	| BCDigitalRead String
+	| BCDigitalWrite String
 
 //:: ByteCode a p = BC (BCState -> ([BC], BCState))
 :: ByteCode a p = BC [BC]