X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fvars.h;h=668c2cb1d8b0ac3f066b6a3bb1f4bf1f247ffda6;hb=c8617f57d0413beb2890e94dabe227cef9c5ddad;hp=ae1a1001c0d71a8407a3432ff9e2ba7dab59166b;hpb=a530bbe337109d898d5b4a001fc8f1afa3b5dc39;p=sbcl.git diff --git a/src/runtime/vars.h b/src/runtime/vars.h index ae1a100..668c2cb 100644 --- a/src/runtime/vars.h +++ b/src/runtime/vars.h @@ -9,10 +9,6 @@ * files for more information. */ -/* - * $Header$ - */ - /* FIXME: I wonder what this stuff is for. A comment or two would be * nice.. */ @@ -21,10 +17,10 @@ extern struct var *lookup_by_name(char *name); extern struct var *lookup_by_obj(lispobj obj); extern struct var *define_var(char *name, lispobj obj, boolean perm); extern struct var *define_dynamic_var(char *name, - lispobj update_fn(struct var *var), - boolean perm); + lispobj update_fn(struct var *var), + boolean perm); extern char *var_name(struct var *var); extern lispobj var_value(struct var *var); -extern long var_clock(struct var *var); -extern void var_setclock(struct var *var, long value); +extern sword_t var_clock(struct var *var); +extern void var_setclock(struct var *var, sword_t value);