/*
**  ***********************************************************************
**
**  ScanHandlerTypeDefs (c) by Stefan Schor
**
**  ***********************************************************************
*/


#include <exec/types.h>

#define UPPER(a) ((a) & 95)

__asm
ULONG
ScanHandlerTypeDefs(register __d0 ULONG len, register __a0 char **text)
{
    const char *version = "$VER: TypeDefs 1.0 (24.3.94)";

    if (len > 8)
    {
        char *pos  = *text;
        char *last = *text + len -1;

        if (    *pos++ == 't'
             && *pos++ == 'y'
             && *pos++ == 'p'
             && *pos++ == 'e'
             && *pos++ == 'd'
             && *pos++ == 'e'
             && *pos++ == 'f'
             && *pos   == ' ' )
        {
            while (pos<=last && *++pos!=';');

            if (*pos == ';')
            {
                ULONG len=0;

                while (*--pos!=' ' && *pos!='*' && *pos!='&' )   len++;

                *text = pos +1;

                return (len);
            }
        }
    }



    return 0;
}