diff options
| author | Dirk Herrmann <dirk@dirk-herrmanns-seiten.de> | 2001-03-30 15:03:23 +0000 |
|---|---|---|
| committer | Dirk Herrmann <dirk@dirk-herrmanns-seiten.de> | 2001-03-30 15:03:23 +0000 |
| commit | 22a52da14dd86801cc3a36837601929effde1904 (patch) | |
| tree | 3742d5d516018e6fcf53ace4d6f68762e285891c /libguile/variable.h | |
| parent | 8715ff170378801396575750c54f32fba3a0b624 (diff) | |
| download | guile-22a52da14dd86801cc3a36837601929effde1904.tar.gz | |
* Replaced a lot of calls to SCM_C[AD]R with more appropriate macros.
* Minor cleanups to hashtable implementation.
* Minor code beautifications.
Diffstat (limited to 'libguile/variable.h')
| -rw-r--r-- | libguile/variable.h | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/libguile/variable.h b/libguile/variable.h index 22a2e0438..f5fc686ed 100644 --- a/libguile/variable.h +++ b/libguile/variable.h @@ -1,8 +1,8 @@ /* classes: h_files */ -#ifndef VARIABLEH -#define VARIABLEH -/* Copyright (C) 1995,1996, 2000 Free Software Foundation, Inc. +#ifndef SCM_VARIABLE_H +#define SCM_VARIABLE_H +/* Copyright (C) 1995,1996,2000,2001 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 @@ -55,7 +55,7 @@ */ extern scm_bits_t scm_tc16_variable; -#define SCM_VARVCELL(V) SCM_CDR(V) +#define SCM_VARVCELL(V) SCM_CELL_OBJECT_1 (V) #define SCM_VARIABLEP(X) (!SCM_IMP (X) && SCM_CELL_TYPE (X) == scm_tc16_variable) #define SCM_UDVARIABLEP(X) (SCM_VARIABLEP(X) && SCM_UNBNDP (SCM_CDR (SCM_VARVCELL (X)))) #define SCM_DEFVARIABLEP(X) (SCM_VARIABLEP(X) && !SCM_UNBNDP (SCM_CDR (SCM_VARVCELL (X)))) @@ -71,7 +71,7 @@ extern SCM scm_builtin_variable (SCM name); extern SCM scm_variable_bound_p (SCM var); extern void scm_init_variable (void); -#endif /* VARIABLEH */ +#endif /* SCM_VARIABLE_H */ /* Local Variables: |