X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=src%2Fcore%2Fao_task.c;h=a19a6a6f5e62f1f484ea09991c89d30cae9c7b79;hb=4299b5a36a2f6f9f7bbbc3a1b935dd2357c1fb0f;hp=32826114c4e5e855fa6e1159378c57321cb2c9ae;hpb=776df9ce2e7b4fa5cedda326988e66c614299af4;p=fw%2Faltos

diff --git a/src/core/ao_task.c b/src/core/ao_task.c
index 32826114..a19a6a6f 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)
 {