diff options
author | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 2000-06-04 01:30:32 +0000 |
---|---|---|
committer | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 2000-06-04 01:30:32 +0000 |
commit | 4fd1f6529d31841d09bfc1d73788de3d47e354af (patch) | |
tree | 72a09ab53351a9d69b0fc4b8c7c9ef794b83f4e9 /libguile/variable.c | |
parent | bccb33a9f01708bf8e96c74b754a7223a229ebdf (diff) | |
download | guile-4fd1f6529d31841d09bfc1d73788de3d47e354af.tar.gz |
* variable.c: Code layout fixes.
Diffstat (limited to 'libguile/variable.c')
-rw-r--r-- | libguile/variable.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/libguile/variable.c b/libguile/variable.c index 137a7aa01..4dcfc0e67 100644 --- a/libguile/variable.c +++ b/libguile/variable.c @@ -1,4 +1,4 @@ -/* Copyright (C) 1995, 1996, 1997, 1998 Free Software Foundation, Inc. +/* Copyright (C) 1995, 1996, 1997, 1998, 2000 Free Software Foundation, Inc. * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by @@ -153,7 +153,7 @@ SCM_DEFINE (scm_variable_p, "variable?", 1, 0, 0, "Return #t iff OBJ is a variable object, else return #f\n") #define FUNC_NAME s_scm_variable_p { - return SCM_BOOL(SCM_VARIABLEP (obj)); + return SCM_BOOL (SCM_VARIABLEP (obj)); } #undef FUNC_NAME @@ -165,7 +165,7 @@ SCM_DEFINE (scm_variable_ref, "variable-ref", 1, 0, 0, "`make-undefined-variable'") #define FUNC_NAME s_scm_variable_ref { - SCM_VALIDATE_VARIABLE (1,var); + SCM_VALIDATE_VARIABLE (1, var); return SCM_CDR (SCM_CDR (var)); } #undef FUNC_NAME |