ccl.c File Reference

#include "flexdef.h"

Include dependency graph for ccl.c:

Go to the source code of this file.

Functions
void	ccladd (int cclp, int ch)
int	cclinit (void)
void	cclnegate (int cclp)
void	list_character_set (FILE *file, int cset[])

Function Documentation

void ccladd	(	int	cclp,
		int	ch
	)

Definition at line 47 of file ccl.c.

{
    int ind, len, newpos, i;

    len = ccllen[cclp];
    ind = cclmap[cclp];

    /* check to see if the character is already in the ccl */

    for ( i = 0; i < len; ++i )
        if ( ccltbl[ind + i] == ch )
            return;

    newpos = ind + len;

    if ( newpos >= current_max_ccl_tbl_size )
        {
        current_max_ccl_tbl_size += MAX_CCL_TBL_SIZE_INCREMENT;

        ++num_reallocs;

        ccltbl = reallocate_character_array( ccltbl, current_max_ccl_tbl_size );
        }

    ccllen[cclp] = len + 1;
    ccltbl[newpos] = ch;
    }

int cclinit

(

void

)

Definition at line 83 of file ccl.c.

{
    if ( ++lastccl >= current_maxccls )
        {
        current_maxccls += MAX_CCLS_INCREMENT;

        ++num_reallocs;

        cclmap = reallocate_integer_array( cclmap, current_maxccls );
        ccllen = reallocate_integer_array( ccllen, current_maxccls );
        cclng = reallocate_integer_array( cclng, current_maxccls );
        }

    if ( lastccl == 1 )
        /* we're making the first ccl */
        cclmap[lastccl] = 0;

    else
        /* the new pointer is just past the end of the last ccl.  Since
         * the cclmap points to the \first/ character of a ccl, adding the
         * length of the ccl to the cclmap pointer will produce a cursor
         * to the first free space
         */
        cclmap[lastccl] = cclmap[lastccl - 1] + ccllen[lastccl - 1];

    ccllen[lastccl] = 0;
    cclng[lastccl] = 0; /* ccl's start out life un-negated */

    return ( lastccl );
    }

void cclnegate

(

int

cclp

)

Definition at line 122 of file ccl.c.

{
    cclng[cclp] = 1;
    }

void list_character_set	(	FILE *	file,
		int	cset[]
	)

Definition at line 140 of file ccl.c.

{
    int i;
    char *readable_form();

    putc( '[', file );

    for ( i = 0; i < csize; ++i )
        {
        if ( cset[i] )
            {
            int start_char = i;

            putc( ' ', file );

            fputs( readable_form( i ), file );

            while ( ++i < csize && cset[i] )
                ;

            if ( i - 1 > start_char )
                /* this was a run */
                fprintf( file, "-%s", readable_form( i - 1 ) );

            putc( ' ', file );
            }
        }

    putc( ']', file );
    }