version 1.5, 2001/06/17 07:30:42 |
version 1.6, 2001/11/19 19:02:14 |
|
|
int size; |
int size; |
size_t element_size; |
size_t element_size; |
{ |
{ |
register void *mem; |
void *mem; |
size_t num_bytes = element_size * size; |
size_t num_bytes = element_size * size; |
|
|
mem = flex_alloc( num_bytes ); |
mem = flex_alloc( num_bytes ); |
|
|
/* all_lower - true if a string is all lower-case */ |
/* all_lower - true if a string is all lower-case */ |
|
|
int all_lower( str ) |
int all_lower( str ) |
register char *str; |
char *str; |
{ |
{ |
while ( *str ) |
while ( *str ) |
{ |
{ |
|
|
/* all_upper - true if a string is all upper-case */ |
/* all_upper - true if a string is all upper-case */ |
|
|
int all_upper( str ) |
int all_upper( str ) |
register char *str; |
char *str; |
{ |
{ |
while ( *str ) |
while ( *str ) |
{ |
{ |
|
|
void bubble( v, n ) |
void bubble( v, n ) |
int v[], n; |
int v[], n; |
{ |
{ |
register int i, j, k; |
int i, j, k; |
|
|
for ( i = n; i > 1; --i ) |
for ( i = n; i > 1; --i ) |
for ( j = 1; j < i; ++j ) |
for ( j = 1; j < i; ++j ) |
|
|
/* clower - replace upper-case letter to lower-case */ |
/* clower - replace upper-case letter to lower-case */ |
|
|
Char clower( c ) |
Char clower( c ) |
register int c; |
int c; |
{ |
{ |
return (Char) ((isascii( c ) && isupper( c )) ? tolower( c ) : c); |
return (Char) ((isascii( c ) && isupper( c )) ? tolower( c ) : c); |
} |
} |
|
|
/* copy_string - returns a dynamically allocated copy of a string */ |
/* copy_string - returns a dynamically allocated copy of a string */ |
|
|
char *copy_string( str ) |
char *copy_string( str ) |
register const char *str; |
const char *str; |
{ |
{ |
register const char *c1; |
const char *c1; |
register char *c2; |
char *c2; |
char *copy; |
char *copy; |
unsigned int size; |
unsigned int size; |
|
|
|
|
*/ |
*/ |
|
|
Char *copy_unsigned_string( str ) |
Char *copy_unsigned_string( str ) |
register Char *str; |
Char *str; |
{ |
{ |
register Char *c; |
Char *c; |
Char *copy; |
Char *copy; |
|
|
/* find length */ |
/* find length */ |
|
|
void out_line_count( str ) |
void out_line_count( str ) |
const char str[]; |
const char str[]; |
{ |
{ |
register int i; |
int i; |
|
|
for ( i = 0; str[i]; ++i ) |
for ( i = 0; str[i]; ++i ) |
if ( str[i] == '\n' ) |
if ( str[i] == '\n' ) |
|
|
*/ |
*/ |
|
|
char *readable_form( c ) |
char *readable_form( c ) |
register int c; |
int c; |
{ |
{ |
static char rform[10]; |
static char rform[10]; |
|
|
|
|
int size; |
int size; |
size_t element_size; |
size_t element_size; |
{ |
{ |
register void *new_array; |
void *new_array; |
size_t num_bytes = element_size * size; |
size_t num_bytes = element_size * size; |
|
|
new_array = flex_realloc( array, num_bytes ); |
new_array = flex_realloc( array, num_bytes ); |
|
|
char *region_ptr; |
char *region_ptr; |
size_t size_in_bytes; |
size_t size_in_bytes; |
{ |
{ |
register char *rp, *rp_end; |
char *rp, *rp_end; |
|
|
rp = region_ptr; |
rp = region_ptr; |
rp_end = region_ptr + size_in_bytes; |
rp_end = region_ptr + size_in_bytes; |