mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-06-24 12:20:20 +02:00
* Cleaned up uses and definition of SCM_ASSYNT.
This commit is contained in:
parent
d69947f744
commit
e11208ca72
4 changed files with 41 additions and 13 deletions
|
@ -48,7 +48,8 @@
|
|||
|
||||
|
||||
|
||||
#define SCM_ASSYNT(_cond, _arg, _pos, _subr) if(!(_cond))scm_wta(_arg, (char *)_pos, _subr);
|
||||
#define SCM_ASSYNT(_cond, _arg, _msg, _subr) \
|
||||
if (!(_cond)) scm_misc_error (_subr, _msg, SCM_EOL);
|
||||
|
||||
extern scm_bits_t scm_tc16_macro;
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue