diff options
author | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 2000-01-18 11:24:03 +0000 |
---|---|---|
committer | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 2000-01-18 11:24:03 +0000 |
commit | b380b88547226544d5a2b7d09379c79fbe300e10 (patch) | |
tree | 24d2fdcbac65af33e5c77b4d293e585ebf0cd798 /libguile/chars.c | |
parent | fcb1720f878502b9f46eaddf2077838bcdf101d7 (diff) | |
download | guile-b380b88547226544d5a2b7d09379c79fbe300e10.tar.gz |
* alist.c, chars.c, debug.c, dynl.c, dynwind.c, error.c, eval.c,
evalext.c, filesys.c, gc.c, hash.c, hashtab.c, ioext.c,
keywords.c, list.c, load.c, macros.c, net_db.c, numbers.c,
objprop.c, ports.c, posix.c, print.c, procprop.c, procs.c,
ramap.c, regex-posix.c, root.c, scmsigs.c, simpos.c, socket.c,
stacks.c, stime.c, strings.c, strop.c, strports.c, struct.c,
symbols.c, throw.c, unif.c, vectors.c, version.c, vports.c,
weaks.c: Converted docstrings to ANSI C format.
Diffstat (limited to 'libguile/chars.c')
-rw-r--r-- | libguile/chars.c | 56 |
1 files changed, 28 insertions, 28 deletions
diff --git a/libguile/chars.c b/libguile/chars.c index b603510c2..f93f8d785 100644 --- a/libguile/chars.c +++ b/libguile/chars.c @@ -54,7 +54,7 @@ SCM_DEFINE (scm_char_p, "char?", 1, 0, 0, (SCM x), -"Return #t iff X is a character, else #f.") + "Return #t iff X is a character, else #f.") #define FUNC_NAME s_scm_char_p { return SCM_BOOL(SCM_ICHRP(x)); @@ -63,7 +63,7 @@ SCM_DEFINE (scm_char_p, "char?", 1, 0, 0, SCM_DEFINE1 (scm_char_eq_p, "char=?", scm_tc7_rpsubr, (SCM x, SCM y), -"Return #t iff X is the same character as Y, else #f.") + "Return #t iff X is the same character as Y, else #f.") #define FUNC_NAME s_scm_char_eq_p { SCM_VALIDATE_ICHR (1,x); @@ -75,7 +75,7 @@ SCM_DEFINE1 (scm_char_eq_p, "char=?", scm_tc7_rpsubr, SCM_DEFINE1 (scm_char_less_p, "char<?", scm_tc7_rpsubr, (SCM x, SCM y), -"Return #t iff X is less than Y in the Ascii sequence, else #f.") + "Return #t iff X is less than Y in the Ascii sequence, else #f.") #define FUNC_NAME s_scm_char_less_p { SCM_VALIDATE_ICHR (1,x); @@ -86,7 +86,7 @@ SCM_DEFINE1 (scm_char_less_p, "char<?", scm_tc7_rpsubr, SCM_DEFINE1 (scm_char_leq_p, "char<=?", scm_tc7_rpsubr, (SCM x, SCM y), -"Return #t iff X is less than or equal to Y in the Ascii sequence, else #f.") + "Return #t iff X is less than or equal to Y in the Ascii sequence, else #f.") #define FUNC_NAME s_scm_char_leq_p { SCM_VALIDATE_ICHR (1,x); @@ -97,7 +97,7 @@ SCM_DEFINE1 (scm_char_leq_p, "char<=?", scm_tc7_rpsubr, SCM_DEFINE1 (scm_char_gr_p, "char>?", scm_tc7_rpsubr, (SCM x, SCM y), -"Return #t iff X is greater than Y in the Ascii sequence, else #f.") + "Return #t iff X is greater than Y in the Ascii sequence, else #f.") #define FUNC_NAME s_scm_char_gr_p { SCM_VALIDATE_ICHR (1,x); @@ -108,7 +108,7 @@ SCM_DEFINE1 (scm_char_gr_p, "char>?", scm_tc7_rpsubr, SCM_DEFINE1 (scm_char_geq_p, "char>=?", scm_tc7_rpsubr, (SCM x, SCM y), -"Return #t iff X is greater than or equal to Y in the Ascii sequence, else #f.") + "Return #t iff X is greater than or equal to Y in the Ascii sequence, else #f.") #define FUNC_NAME s_scm_char_geq_p { SCM_VALIDATE_ICHR (1,x); @@ -119,7 +119,7 @@ SCM_DEFINE1 (scm_char_geq_p, "char>=?", scm_tc7_rpsubr, SCM_DEFINE1 (scm_char_ci_eq_p, "char-ci=?", scm_tc7_rpsubr, (SCM x, SCM y), -"Return #t iff X is the same character as Y ignoring case, else #f.") + "Return #t iff X is the same character as Y ignoring case, else #f.") #define FUNC_NAME s_scm_char_ci_eq_p { SCM_VALIDATE_ICHR (1,x); @@ -130,7 +130,7 @@ SCM_DEFINE1 (scm_char_ci_eq_p, "char-ci=?", scm_tc7_rpsubr, SCM_DEFINE1 (scm_char_ci_less_p, "char-ci<?", scm_tc7_rpsubr, (SCM x, SCM y), -"Return #t iff X is less than Y in the Ascii sequence ignoring case, else #f.") + "Return #t iff X is less than Y in the Ascii sequence ignoring case, else #f.") #define FUNC_NAME s_scm_char_ci_less_p { SCM_VALIDATE_ICHR (1,x); @@ -141,7 +141,7 @@ SCM_DEFINE1 (scm_char_ci_less_p, "char-ci<?", scm_tc7_rpsubr, SCM_DEFINE1 (scm_char_ci_leq_p, "char-ci<=?", scm_tc7_rpsubr, (SCM x, SCM y), -"Return #t iff X is less than or equal to Y in the Ascii sequence ignoring case, else #f.") + "Return #t iff X is less than or equal to Y in the Ascii sequence ignoring case, else #f.") #define FUNC_NAME s_scm_char_ci_leq_p { SCM_VALIDATE_ICHR (1,x); @@ -152,7 +152,7 @@ SCM_DEFINE1 (scm_char_ci_leq_p, "char-ci<=?", scm_tc7_rpsubr, SCM_DEFINE1 (scm_char_ci_gr_p, "char-ci>?", scm_tc7_rpsubr, (SCM x, SCM y), -"Return #t iff X is greater than Y in the Ascii sequence ignoring case, else #f.") + "Return #t iff X is greater than Y in the Ascii sequence ignoring case, else #f.") #define FUNC_NAME s_scm_char_ci_gr_p { SCM_VALIDATE_ICHR (1,x); @@ -163,7 +163,7 @@ SCM_DEFINE1 (scm_char_ci_gr_p, "char-ci>?", scm_tc7_rpsubr, SCM_DEFINE1 (scm_char_ci_geq_p, "char-ci>=?", scm_tc7_rpsubr, (SCM x, SCM y), -"Return #t iff X is greater than or equal to Y in the Ascii sequence ignoring case, else #f.") + "Return #t iff X is greater than or equal to Y in the Ascii sequence ignoring case, else #f.") #define FUNC_NAME s_scm_char_ci_geq_p { SCM_VALIDATE_ICHR (1,x); @@ -175,8 +175,8 @@ SCM_DEFINE1 (scm_char_ci_geq_p, "char-ci>=?", scm_tc7_rpsubr, SCM_DEFINE (scm_char_alphabetic_p, "char-alphabetic?", 1, 0, 0, (SCM chr), -"Return #t iff CHR is alphabetic, else #f. -Alphabetic means the same thing as the isalpha C library function.") + "Return #t iff CHR is alphabetic, else #f.\n" + "Alphabetic means the same thing as the isalpha C library function.") #define FUNC_NAME s_scm_char_alphabetic_p { SCM_VALIDATE_ICHR (1,chr); @@ -186,8 +186,8 @@ Alphabetic means the same thing as the isalpha C library function.") SCM_DEFINE (scm_char_numeric_p, "char-numeric?", 1, 0, 0, (SCM chr), -"Return #t iff CHR is numeric, else #f. -Numeric means the same thing as the isdigit C library function.") + "Return #t iff CHR is numeric, else #f.\n" + "Numeric means the same thing as the isdigit C library function.") #define FUNC_NAME s_scm_char_numeric_p { SCM_VALIDATE_ICHR (1,chr); @@ -197,8 +197,8 @@ Numeric means the same thing as the isdigit C library function.") SCM_DEFINE (scm_char_whitespace_p, "char-whitespace?", 1, 0, 0, (SCM chr), -"Return #t iff CHR is whitespace, else #f. -Whitespace means the same thing as the isspace C library function.") + "Return #t iff CHR is whitespace, else #f.\n" + "Whitespace means the same thing as the isspace C library function.") #define FUNC_NAME s_scm_char_whitespace_p { SCM_VALIDATE_ICHR (1,chr); @@ -210,8 +210,8 @@ Whitespace means the same thing as the isspace C library function.") SCM_DEFINE (scm_char_upper_case_p, "char-upper-case?", 1, 0, 0, (SCM chr), -"Return #t iff CHR is uppercase, else #f. -Uppercase means the same thing as the isupper C library function.") + "Return #t iff CHR is uppercase, else #f.\n" + "Uppercase means the same thing as the isupper C library function.") #define FUNC_NAME s_scm_char_upper_case_p { SCM_VALIDATE_ICHR (1,chr); @@ -222,8 +222,8 @@ Uppercase means the same thing as the isupper C library function.") SCM_DEFINE (scm_char_lower_case_p, "char-lower-case?", 1, 0, 0, (SCM chr), -"Return #t iff CHR is lowercase, else #f. -Lowercase means the same thing as the islower C library function.") + "Return #t iff CHR is lowercase, else #f.\n" + "Lowercase means the same thing as the islower C library function.") #define FUNC_NAME s_scm_char_lower_case_p { SCM_VALIDATE_ICHR (1,chr); @@ -235,9 +235,9 @@ Lowercase means the same thing as the islower C library function.") SCM_DEFINE (scm_char_is_both_p, "char-is-both?", 1, 0, 0, (SCM chr), -"Return #t iff CHR is either uppercase or lowercase, else #f. -Uppercase and lowercase are as defined by the isupper and islower -C library functions.") + "Return #t iff CHR is either uppercase or lowercase, else #f.\n" + "Uppercase and lowercase are as defined by the isupper and islower\n" + "C library functions.") #define FUNC_NAME s_scm_char_is_both_p { SCM_VALIDATE_ICHR (1,chr); @@ -250,7 +250,7 @@ C library functions.") SCM_DEFINE (scm_char_to_integer, "char->integer", 1, 0, 0, (SCM chr), -"Return the number corresponding to ordinal position of CHR in the Ascii sequence.") + "Return the number corresponding to ordinal position of CHR in the Ascii sequence.") #define FUNC_NAME s_scm_char_to_integer { SCM_VALIDATE_ICHR (1,chr); @@ -262,7 +262,7 @@ SCM_DEFINE (scm_char_to_integer, "char->integer", 1, 0, 0, SCM_DEFINE (scm_integer_to_char, "integer->char", 1, 0, 0, (SCM n), -"Return the character at position N in the Ascii sequence.") + "Return the character at position N in the Ascii sequence.") #define FUNC_NAME s_scm_integer_to_char { SCM_VALIDATE_INUM_RANGE (1, n, 0, 256); @@ -273,7 +273,7 @@ SCM_DEFINE (scm_integer_to_char, "integer->char", 1, 0, 0, SCM_DEFINE (scm_char_upcase, "char-upcase", 1, 0, 0, (SCM chr), -"Return the uppercase character version of CHR.") + "Return the uppercase character version of CHR.") #define FUNC_NAME s_scm_char_upcase { SCM_VALIDATE_ICHR (1,chr); @@ -284,7 +284,7 @@ SCM_DEFINE (scm_char_upcase, "char-upcase", 1, 0, 0, SCM_DEFINE (scm_char_downcase, "char-downcase", 1, 0, 0, (SCM chr), -"Return the lowercase character version of CHR.") + "Return the lowercase character version of CHR.") #define FUNC_NAME s_scm_char_downcase { SCM_VALIDATE_ICHR (1,chr); |