458 |
|
|
459 |
SCM_DEFINE (scm_array_fill_x, "array-fill!", 2, 0, 0, |
SCM_DEFINE (scm_array_fill_x, "array-fill!", 2, 0, 0, |
460 |
(SCM ra, SCM fill), |
(SCM ra, SCM fill), |
461 |
"Stores @var{fill} in every element of @var{array}. The value returned\n" |
"Store @var{fill} in every element of @var{array}. The value returned\n" |
462 |
"is unspecified.") |
"is unspecified.") |
463 |
#define FUNC_NAME s_scm_array_fill_x |
#define FUNC_NAME s_scm_array_fill_x |
464 |
{ |
{ |
829 |
|
|
830 |
SCM_DEFINE (scm_array_copy_x, "array-copy!", 2, 0, 0, |
SCM_DEFINE (scm_array_copy_x, "array-copy!", 2, 0, 0, |
831 |
(SCM src, SCM dst), |
(SCM src, SCM dst), |
832 |
"@deffnx primitive array-copy-in-order! src dst\n" |
"@deffnx {Scheme Procedure} array-copy-in-order! src dst\n" |
833 |
"Copies every element from vector or array @var{source} to the\n" |
"Copy every element from vector or array @var{source} to the\n" |
834 |
"corresponding element of @var{destination}. @var{destination} must have\n" |
"corresponding element of @var{destination}. @var{destination} must have\n" |
835 |
"the same rank as @var{source}, and be at least as large in each\n" |
"the same rank as @var{source}, and be at least as large in each\n" |
836 |
"dimension. The order is unspecified.") |
"dimension. The order is unspecified.") |
1512 |
|
|
1513 |
SCM_DEFINE (scm_array_map_x, "array-map!", 2, 0, 1, |
SCM_DEFINE (scm_array_map_x, "array-map!", 2, 0, 1, |
1514 |
(SCM ra0, SCM proc, SCM lra), |
(SCM ra0, SCM proc, SCM lra), |
1515 |
"@deffnx primitive array-map-in-order! ra0 proc . lra\n" |
"@deffnx {Scheme Procedure} array-map-in-order! ra0 proc . lra\n" |
1516 |
"@var{array1}, @dots{} must have the same number of dimensions as\n" |
"@var{array1}, @dots{} must have the same number of dimensions as\n" |
1517 |
"@var{array0} and have a range for each index which includes the range\n" |
"@var{array0} and have a range for each index which includes the range\n" |
1518 |
"for the corresponding index in @var{array0}. @var{proc} is applied to\n" |
"for the corresponding index in @var{array0}. @var{proc} is applied to\n" |
1664 |
|
|
1665 |
SCM_DEFINE (scm_array_for_each, "array-for-each", 2, 0, 1, |
SCM_DEFINE (scm_array_for_each, "array-for-each", 2, 0, 1, |
1666 |
(SCM proc, SCM ra0, SCM lra), |
(SCM proc, SCM ra0, SCM lra), |
1667 |
"@var{proc} is applied to each tuple of elements of @var{array0} @dots{}\n" |
"Apply @var{proc} to each tuple of elements of @var{array0} @dots{}\n" |
1668 |
"in row-major order. The value returned is unspecified.") |
"in row-major order. The value returned is unspecified.") |
1669 |
#define FUNC_NAME s_scm_array_for_each |
#define FUNC_NAME s_scm_array_for_each |
1670 |
{ |
{ |
1677 |
|
|
1678 |
SCM_DEFINE (scm_array_index_map_x, "array-index-map!", 2, 0, 0, |
SCM_DEFINE (scm_array_index_map_x, "array-index-map!", 2, 0, 0, |
1679 |
(SCM ra, SCM proc), |
(SCM ra, SCM proc), |
1680 |
"applies @var{proc} to the indices of each element of @var{array} in\n" |
"Apply @var{proc} to the indices of each element of @var{array} in\n" |
1681 |
"turn, storing the result in the corresponding element. The value\n" |
"turn, storing the result in the corresponding element. The value\n" |
1682 |
"returned and the order of application are unspecified.\n\n" |
"returned and the order of application are unspecified.\n\n" |
1683 |
"One can implement @var{array-indexes} as\n" |
"One can implement @var{array-indexes} as\n" |