X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=src%2Fcore%2Fao_task.c;h=d7d0e8a2a493354eab8e4f051a9ded4ca0bbd4d8;hb=93481fd3d9305a107b88c8a64de4194a6d94dc0e;hp=32826114c4e5e855fa6e1159378c57321cb2c9ae;hpb=8125acc030574afed6f23aa8aa302d9c768bb04e;p=fw%2Faltos

diff --git a/src/core/ao_task.c b/src/core/ao_task.c
index 32826114..d7d0e8a2 100644
--- a/src/core/ao_task.c
+++ b/src/core/ao_task.c
@@ -107,7 +107,6 @@ ao_sleep(__xdata void *wchan)
 		ao_cur_task->wchan = wchan;
 		);
 	ao_yield();
-	ao_cur_task->alarm = 0;
 	if (ao_cur_task->wchan) {
 		ao_cur_task->wchan = NULL;
 		return 1;
@@ -135,6 +134,12 @@ ao_alarm(uint16_t delay)
 		ao_cur_task->alarm = 1;
 }
 
+void
+ao_clear_alarm(void)
+{
+	ao_cur_task->alarm = 0;
+}
+
 void
 ao_exit(void)
 {
@@ -159,7 +164,7 @@ ao_task_info(void)
 		task = ao_tasks[i];
 		printf("%12s: wchan %04x\n",
 		       task->name,
-		       (int16_t) task->wchan);
+		       (int) task->wchan);
 	}
 }