diff --git a/extra/alarms/alarms.factor b/extra/alarms/alarms.factor index 6a1793ee95..5b198fdb0d 100755 --- a/extra/alarms/alarms.factor +++ b/extra/alarms/alarms.factor @@ -73,7 +73,7 @@ SYMBOL: alarm-thread PRIVATE> -: add-alarm ( time delay quot -- alarm ) +: add-alarm ( time frequency quot -- alarm ) [ dup dup alarm-time alarms get-global heap-push* swap alarm-entry >box