X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=int%2Finterpret.c;h=39c24b0e58e8684b1f0816f1a5315031b4146b72;hb=f90517d738696125a067f113edf93f404873115b;hp=683638f7e908ac2466f368d154b682549f432bdb;hpb=5ffe54378cb4b91ee2a5717d57c1bf4ba4ca563e;p=mTask.git

diff --git a/int/interpret.c b/int/interpret.c
index 683638f..39c24b0 100644
--- a/int/interpret.c
+++ b/int/interpret.c
@@ -139,6 +139,12 @@ void run_task(struct task *t)
 			write_dpin(program[pc++], stack[sp-1]);
 			sp--;
 			break;
+		case BCLEDON: trace("LedOn(%d)", program[pc]);
+			led_on(program[pc++]);
+			break;
+		case BCLEDOFF: trace("LedOn(%d)", program[pc]);
+			led_off(program[pc++]);
+			break;
 		default:
 			trace("unrecognized");
 			die("Unrecognized command: %d", program[pc-1]);