Inicio Explorar Axuda
Iniciar sesión
sapientech
/
guile-for-guile-emacs
Seguir 1
Destacar 0
Fork 0
Ficheiros Incidencias 0 Pull Requests 0 Wiki
Árbore: a9733af620
Ramas Etiquetas
guile-for-gu...
/
libguile
/
srfi-13.h

srfi-13.h 7.4 KB
Histórico Raw

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121 
  1. #ifndef SCM_SRFI_13_H
    2. 

  2. #define SCM_SRFI_13_H
    3. 

  3. 

  4. /* srfi-13.c --- SRFI-13 procedures for Guile
    5. 

  5.  *
    6. 

  6.  * 	Copyright (C) 2001, 2004, 2006, 2008, 2010 Free Software Foundation, Inc.
    7. 

  7.  *
    8. 

  8.  * This library is free software; you can redistribute it and/or
    9. 

  9.  * modify it under the terms of the GNU Lesser General Public License
    10. 

  10.  * as published by the Free Software Foundation; either version 3 of
    11. 

  11.  * the License, or (at your option) any later version.
    12. 

  12.  *
    13. 

  13.  * This library is distributed in the hope that it will be useful, but
    14. 

  14.  * WITHOUT ANY WARRANTY; without even the implied warranty of
    15. 

  15.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
    16. 

  16.  * Lesser General Public License for more details.
    17. 

  17.  *
    18. 

  18.  * You should have received a copy of the GNU Lesser General Public
    19. 

  19.  * License along with this library; if not, write to the Free Software
    20. 

  20.  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
    21. 

  21.  * 02110-1301 USA
    22. 

  22.  */
    23. 

  23. 
    24. 

  24. 

  25. #include "libguile/__scm.h"
    26. 

  26. 

  27. SCM_API SCM scm_string_null_p (SCM s);
    28. 

  28. SCM_API SCM scm_string_any (SCM pred, SCM s, SCM start, SCM end);
    29. 

  29. SCM_API SCM scm_string_every (SCM pred, SCM s, SCM start, SCM end);
    30. 

  30. SCM_API SCM scm_string_tabulate (SCM proc, SCM len);
    31. 

  31. SCM_API SCM scm_string_to_list (SCM str);
    32. 

  32. SCM_API SCM scm_substring_to_list (SCM str, SCM start, SCM end);
    33. 

  33. SCM_API SCM scm_reverse_list_to_string (SCM chrs);
    34. 

  34. SCM_API SCM scm_string_join (SCM ls, SCM delimiter, SCM grammar);
    35. 

  35. SCM_API SCM scm_string_copy (SCM str);
    36. 

  36. SCM_API SCM scm_string_copy_x (SCM target, SCM tstart, SCM s, SCM start, SCM end);
    37. 

  37. SCM_API SCM scm_substring_move_x (SCM str1, SCM start1, SCM end1, 
    38. 

  38. 				  SCM str2, SCM start2);
    39. 

  39. SCM_API SCM scm_string_take (SCM s, SCM n);
    40. 

  40. SCM_API SCM scm_string_drop (SCM s, SCM n);
    41. 

  41. SCM_API SCM scm_string_take_right (SCM s, SCM n);
    42. 

  42. SCM_API SCM scm_string_drop_right (SCM s, SCM n);
    43. 

  43. SCM_API SCM scm_string_pad (SCM s, SCM len, SCM chr, SCM start, SCM end);
    44. 

  44. SCM_API SCM scm_string_pad_right (SCM s, SCM len, SCM chr, SCM start, SCM end);
    45. 

  45. SCM_API SCM scm_string_trim (SCM s, SCM char_pred, SCM start, SCM end);
    46. 

  46. SCM_API SCM scm_string_trim_right (SCM s, SCM char_pred, SCM start, SCM end);
    47. 

  47. SCM_API SCM scm_string_trim_both (SCM s, SCM char_pred, SCM start, SCM end);
    48. 

  48. SCM_API SCM scm_substring_fill_x (SCM str, SCM chr, SCM start, SCM end);
    49. 

  49. SCM_API SCM scm_string_fill_x (SCM str, SCM chr);
    50. 

  50. SCM_API SCM scm_string_compare (SCM s1, SCM s2, SCM proc_lt, SCM proc_eq, SCM proc_gt, SCM start1, SCM end1, SCM start2, SCM end2);
    51. 

  51. SCM_API SCM scm_string_compare_ci (SCM s1, SCM s2, SCM proc_lt, SCM proc_eq, SCM proc_gt, SCM start1, SCM end1, SCM start2, SCM end2);
    52. 

  52. SCM_API SCM scm_string_eq (SCM s1, SCM s2, SCM start1, SCM end1, SCM start2, SCM end2);
    53. 

  53. SCM_API SCM scm_string_neq (SCM s1, SCM s2, SCM start1, SCM end1, SCM start2, SCM end2);
    54. 

  54. SCM_API SCM scm_string_lt (SCM s1, SCM s2, SCM start1, SCM end1, SCM start2, SCM end2);
    55. 

  55. SCM_API SCM scm_string_gt (SCM s1, SCM s2, SCM start1, SCM end1, SCM start2, SCM end2);
    56. 

  56. SCM_API SCM scm_string_le (SCM s1, SCM s2, SCM start1, SCM end1, SCM start2, SCM end2);
    57. 

  57. SCM_API SCM scm_string_ge (SCM s1, SCM s2, SCM start1, SCM end1, SCM start2, SCM end2);
    58. 

  58. SCM_API SCM scm_string_ci_eq (SCM s1, SCM s2, SCM start1, SCM end1, SCM start2, SCM end2);
    59. 

  59. SCM_API SCM scm_string_ci_neq (SCM s1, SCM s2, SCM start1, SCM end1, SCM start2, SCM end2);
    60. 

  60. SCM_API SCM scm_string_ci_lt (SCM s1, SCM s2, SCM start1, SCM end1, SCM start2, SCM end2);
    61. 

  61. SCM_API SCM scm_string_ci_gt (SCM s1, SCM s2, SCM start1, SCM end1, SCM start2, SCM end2);
    62. 

  62. SCM_API SCM scm_string_ci_le (SCM s1, SCM s2, SCM start1, SCM end1, SCM start2, SCM end2);
    63. 

  63. SCM_API SCM scm_string_ci_ge (SCM s1, SCM s2, SCM start1, SCM end1, SCM start2, SCM end2);
    64. 

  64. SCM_API SCM scm_substring_hash (SCM s, SCM bound, SCM start, SCM end);
    65. 

  65. SCM_API SCM scm_substring_hash_ci (SCM s, SCM bound, SCM start, SCM end);
    66. 

  66. SCM_API SCM scm_string_prefix_length (SCM s1, SCM s2, SCM start1, SCM end1, SCM start2, SCM end2);
    67. 

  67. SCM_API SCM scm_string_prefix_length_ci (SCM s1, SCM s2, SCM start1, SCM end1, SCM start2, SCM end2);
    68. 

  68. SCM_API SCM scm_string_suffix_length (SCM s1, SCM s2, SCM start1, SCM end1, SCM start2, SCM end2);
    69. 

  69. SCM_API SCM scm_string_suffix_length_ci (SCM s1, SCM s2, SCM start1, SCM end1, SCM start2, SCM end2);
    70. 

  70. SCM_API SCM scm_string_prefix_p (SCM s1, SCM s2, SCM start1, SCM end1, SCM start2, SCM end2);
    71. 

  71. SCM_API SCM scm_string_prefix_ci_p (SCM s1, SCM s2, SCM start1, SCM end1, SCM start2, SCM end2);
    72. 

  72. SCM_API SCM scm_string_suffix_p (SCM s1, SCM s2, SCM start1, SCM end1, SCM start2, SCM end2);
    73. 

  73. SCM_API SCM scm_string_suffix_ci_p (SCM s1, SCM s2, SCM start1, SCM end1, SCM start2, SCM end2);
    74. 

  74. SCM_API SCM scm_string_index (SCM s, SCM char_pred, SCM start, SCM end);
    75. 

  75. SCM_API SCM scm_string_index_right (SCM s, SCM char_pred, SCM start, SCM end);
    76. 

  76. SCM_API SCM scm_string_rindex (SCM s, SCM char_pred, SCM start, SCM end);
    77. 

  77. SCM_API SCM scm_string_skip (SCM s, SCM char_pred, SCM start, SCM end);
    78. 

  78. SCM_API SCM scm_string_skip_right (SCM s, SCM char_pred, SCM start, SCM end);
    79. 

  79. SCM_API SCM scm_string_count (SCM s, SCM char_pred, SCM start, SCM end);
    80. 

  80. SCM_API SCM scm_string_contains (SCM s1, SCM s2, SCM start1, SCM end1, SCM start2, SCM end2);
    81. 

  81. SCM_API SCM scm_string_contains_ci (SCM s1, SCM s2, SCM start1, SCM end1, SCM start2, SCM end2);
    82. 

  82. SCM_API SCM scm_substring_upcase_x (SCM str, SCM start, SCM end);
    83. 

  83. SCM_API SCM scm_substring_upcase (SCM str, SCM start, SCM end);
    84. 

  84. SCM_API SCM scm_string_upcase_x (SCM str);
    85. 

  85. SCM_API SCM scm_string_upcase (SCM str);
    86. 

  86. SCM_API SCM scm_substring_downcase_x (SCM str, SCM start, SCM end);
    87. 

  87. SCM_API SCM scm_substring_downcase (SCM str, SCM start, SCM end);
    88. 

  88. SCM_API SCM scm_string_downcase_x (SCM str);
    89. 

  89. SCM_API SCM scm_string_downcase (SCM str);
    90. 

  90. SCM_API SCM scm_string_titlecase_x (SCM str, SCM start, SCM end);
    91. 

  91. SCM_API SCM scm_string_titlecase (SCM str, SCM start, SCM end);
    92. 

  92. SCM_API SCM scm_string_capitalize_x (SCM str);
    93. 

  93. SCM_API SCM scm_string_capitalize (SCM str);
    94. 

  94. SCM_API SCM scm_string_reverse (SCM str, SCM start, SCM end);
    95. 

  95. SCM_API SCM scm_string_reverse_x (SCM str, SCM start, SCM end);
    96. 

  96. SCM_API SCM scm_string_append_shared (SCM ls);
    97. 

  97. SCM_API SCM scm_string_concatenate (SCM ls);
    98. 

  98. SCM_API SCM scm_string_concatenate_shared (SCM ls);
    99. 

  99. SCM_API SCM scm_string_concatenate_reverse (SCM ls, SCM final_string, SCM end);
    100. 

  100. SCM_API SCM scm_string_concatenate_reverse_shared (SCM ls, SCM final_string, SCM end);
    101. 

  101. SCM_API SCM scm_string_map (SCM proc, SCM s, SCM start, SCM end);
    102. 

  102. SCM_API SCM scm_string_map_x (SCM proc, SCM s, SCM start, SCM end);
    103. 

  103. SCM_API SCM scm_string_fold (SCM kons, SCM knil, SCM s, SCM start, SCM end);
    104. 

  104. SCM_API SCM scm_string_fold_right (SCM kons, SCM knil, SCM s, SCM start, SCM end);
    105. 

  105. SCM_API SCM scm_string_unfold (SCM p, SCM f, SCM g, SCM seed, SCM base, SCM make_final);
    106. 

  106. SCM_API SCM scm_string_unfold_right (SCM p, SCM f, SCM g, SCM seed, SCM base, SCM make_final);
    107. 

  107. SCM_API SCM scm_string_for_each (SCM proc, SCM s, SCM start, SCM end);
    108. 

  108. SCM_API SCM scm_string_for_each_index (SCM proc, SCM s, SCM start, SCM end);
    109. 

  109. SCM_API SCM scm_xsubstring (SCM s, SCM from, SCM to, SCM start, SCM end);
    110. 

  110. SCM_API SCM scm_string_xcopy_x (SCM target, SCM tstart, SCM s, SCM sfrom, SCM sto, SCM start, SCM end);
    111. 

  111. SCM_API SCM scm_string_replace (SCM s1, SCM s2, SCM start1, SCM end1, SCM start2, SCM end2);
    112. 

  112. SCM_API SCM scm_string_tokenize (SCM s, SCM token_char, SCM start, SCM end);
    113. 

  113. SCM_API SCM scm_string_split (SCM s, SCM char_pred);
    114. 

  114. SCM_API SCM scm_string_filter (SCM char_pred, SCM s, SCM start, SCM end);
    115. 

  115. SCM_API SCM scm_string_delete (SCM char_pred, SCM s, SCM start, SCM end);
    116. 

  116. 

  117. SCM_INTERNAL void scm_init_srfi_13 (void);
    118. 

  118. SCM_INTERNAL void scm_init_srfi_13_14 (void);
    119. 

  119. 

  120. #endif /* SCM_SRFI_13_H */
    121. 

  121.