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

diff --git a/mTaskInterpret.dcl b/mTaskInterpret.dcl
index 5a80189..0048859 100644
--- a/mTaskInterpret.dcl
+++ b/mTaskInterpret.dcl
@@ -9,7 +9,6 @@ import mTask
 	| BCPush String
 	| BCPop
 	//Unary ops
-	| BCNeg
 	| BCNot
 	//Binary Int ops
 	| BCAdd
@@ -29,6 +28,17 @@ import mTask
 	| BCJmp Int
 	| BCJmpT Int
 	| BCJmpF Int
+	//Serial
+	| BCSerialAvail
+	| BCSerialPrint
+	| BCSerialPrintln
+	| BCSerialRead
+	| BCSerialParseInt
+	//Pins
+	| BCAnalogRead String
+	| BCAnalogWrite String
+	| BCDigitalRead String
+	| BCDigitalWrite String
 
 //:: ByteCode a p = BC (BCState -> ([BC], BCState))
 :: ByteCode a p = BC [BC]