As I refactor pil21 for my amusement, I've found the function '+ being used
on single numbers. What is this for? As far as I could think, it might have
to do something with formatting... but I really can't think of anything.
here are two examples, in related operations:
(de timeout (N)
(if2 N (assoc -1 *Run)
(set (cdr @) (+ N)) # here
(push '*Run (list -1 (+ N) '(bye))) # here
(del @ '*Run) ) )
it is also used inside 'task, in this expression:
`(link (+ (eval (++ Prg) 1)))`
, though the entire thing is too long for me to comfortably paste here.