mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-17 09:10:22 +02:00
Code Activity

* Replaced SCM_CHARS with SCM_STRING_CHARS or SCM_SYMBOL_CHARS.

Browse source
This commit is contained in:
Dirk Herrmann 2000-09-22 17:17:55 +00:00
parent c1aef03710
commit 86c991c2a2
17 changed files with 48 additions and 32 deletions
Download patch file Download diff file Expand all files Collapse all files

4
libguile/validate.h
View file

@ -1,4 +1,4 @@
/* $Id: validate.h,v 1.14 2000-09-03 21:56:03 mdj Exp $ */
/* $Id: validate.h,v 1.15 2000-09-22 17:17:55 dirk Exp $ */
/* Copyright (C) 1999, 2000 Free Software Foundation, Inc.
*
* This program is free software; you can redistribute it and/or modify
@ -156,7 +156,7 @@
#define SCM_VALIDATE_STRING_COPY(pos, str, cvar) \
do { \
SCM_ASSERT (SCM_STRINGP (str), str, pos, FUNC_NAME); \
cvar = SCM_CHARS(str); \
cvar = SCM_STRING_CHARS(str); \
} while (0)
#define SCM_VALIDATE_RWSTRING(pos, str) \