Parent Directory | Revision Log | Patch
revision 1.78 by ossau, Fri Mar 15 10:37:39 2002 UTC | revision 1.79 by dirk, Sun Jun 30 22:03:43 2002 UTC | |
---|---|---|
# | Line 77 | Line 77 |
77 | * Note that these functions shouldn't generate errors themselves. | * Note that these functions shouldn't generate errors themselves. |
78 | */ | */ |
79 | ||
#ifndef SCM_RECKLESS | ||
80 | #undef SCM_ASSERT | #undef SCM_ASSERT |
81 | #define SCM_ASSERT(_cond, _arg, _pos, _subr) \ | #define SCM_ASSERT(_cond, _arg, _pos, _subr) \ |
82 | if (!(_cond)) \ | if (!(_cond)) \ |
83 | return SCM_BOOL_F; | return SCM_BOOL_F; |
#endif | ||
84 | ||
85 | SCM scm_the_last_stack_fluid_var; | SCM scm_the_last_stack_fluid_var; |
86 |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |