mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-24 12:20:20 +02:00
Code Activity

* scm_validate.h, chars.c, ports.c, print.c, read.c, strings.c,

Browse source 
strop.c: Use SCM_VALIDATE_ICHR, SCM_VALIDATE_ICHR_COPY instead of
SCM_VALIDATE_CHAR, SCM_VALIDATE_CHAR_COPY.  Change made for
consistency with the other macros dealing with immediate
characters.  (Similar to INT -> INUM change a week or so ago).
This commit is contained in:
Greg J. Badros 2000-01-11 19:19:59 +00:00
parent 7965d98fd6
commit 9a8351bc15
7 changed files with 39 additions and 39 deletions
Download patch file Download diff file Expand all files Collapse all files

4
libguile/strings.c
View file

@ -258,7 +258,7 @@ SCM_DEFINE (scm_make_string, "make-string", 1, 1, 0,
res = scm_makstr (i, 0);
if (!SCM_UNBNDP (chr))
{
SCM_VALIDATE_CHAR (2,chr);
SCM_VALIDATE_ICHR (2,chr);
{
unsigned char *dst = SCM_UCHARS (res);
char c = SCM_ICHR (chr);
@ -299,7 +299,7 @@ SCM_DEFINE (scm_string_set_x, "string-set!", 3, 0, 0,
{
SCM_VALIDATE_RWSTRING (1,str);
SCM_VALIDATE_INUM_RANGE (2,k,0,SCM_LENGTH(str));
SCM_VALIDATE_CHAR (3,chr);
SCM_VALIDATE_ICHR (3,chr);
SCM_UCHARS (str)[SCM_INUM (k)] = SCM_ICHR (chr);
return SCM_UNSPECIFIED;
}