Subversion Repositories Vertical

%{
/*
 * $Header: c:\\cygwin\\cvsroot/Vert03/rep_src/rep_lex.l,v 1.1.1.1 2003/11/04 23:34:58 mjames Exp $ 
 * $Log: rep_lex.l,v $
 * Revision 1.1.1.1  2003/11/04 23:34:58  mjames
 * Imported into local repositrory
 *
 * Revision 1.8  2002/10/02 19:37:27  MJAMES
 * Moved dummy functions to a separate support file.
 *
 * Used correct number of arguments to define_pin
 *
 * Revision 1.7  2002/09/18 09:18:37  mjames
 * Added dummy function to make code link to create final application
 *
 * Revision 1.6  2002/01/16 11:22:48  mjames
 * database.h header file is read in first as it undefined DLL stuff irrelevant
 * to HPUX
 *
 * Revision 1.5  2001/12/13 22:10:56  mjames
 * Added dummy tidy_lex function : used in Vertical reader only
 *
 * Revision 1.4  2001/10/31 22:20:15  mjames
 * Tidying up problematical comments caused by CVS
 * 'intelligent' comment guessing
 *
 * Revision 1.3  2001/09/16 19:55:03  mjames
 * tidying
 *
 * Revision 1.2  2001/06/06 12:10:18  mjames
 * Move from HPUX
 *
 * Revision 1.1  2001/02/12 10:51:29  mjames
 * Inserted new correct version number in vertcl_main.c
 *
 * Added lex files to the list.
 *
 * 
 * Revision 1.10  2000/05/31  11:14:46  11:14:46  mjames (Mike James)
 * Added '#' to valid characters in identifiers
 * 
 * Revision 1.9  2000/05/08  17:01:39  17:01:39  mjames (Mike James)
 * Part of Release May__8_2000
 * 
 * Revision 1.8  2000/05/08  16:59:32  16:59:32  mjames (Mike James)
 * Part of Release May__8_2000
 * 
 * Revision 1.7  2000/05/08  16:57:08  16:57:08  mjames (Mike James)
 * Part of Release May__8_2000
 * 
 * Revision 1.6  2000/03/08  16:19:27  16:19:27  mjames (Mike James)
 * New version including PC
 * 
 * Revision 1.3  2000/01/20  15:58:48  15:58:48  mjames (Mike James)
 * Part of Release R22
 * 
 * Revision 1.2  99/12/22  11:15:29  11:15:29  mjames (Mike James)
 * Part of Release Dec_22_1999
 * 
 * Revision 1.1  99/11/23  13:54:16  13:54:16  mjames (Mike James)
 * Initial revision
 * 
 *
 *  */
#include <stdio.h>
/* see makefile for why */
#include "expression.h"
#if defined HAS_TCL
#include "tcl_l.h"
#endif
#include "generic.h"
#include "database.h"

#include "rep_yacc.h"
#include "lx_support.h"
#define YYLMAX MAXIDLEN

#ident "@(#)$Header: c:\\cygwin\\cvsroot/Vert03/rep_src/rep_lex.l,v 1.1.1.1 2003/11/04 23:34:58 mjames Exp $"

extern  int yyval;

extern int lineno;
%}

L [A-Za-z\~\-]

L2 [A-Za-z0-9_/\~\-\*\$\#\.]

Ct [ -\~]

Cm [^\n]

D [0-9]
Spc [ \t]

S [^\"]
Q [\"]


%%


{Q}{S}*{Q}        {  yylval.string = make_string(yytext,&lx_first,&lx_last) ; /* do it anyway */
                   return(ASTRING); };
{L2}{L2}*         { yylval.string = make_string(yytext,&lx_first,&lx_last) ; /* do it anyway */
                   return(ASTRING); };

"--"{Cm}*"\n"     { lineno++; return(LF);/* VHDL comment */  };
"/\*"{Ct}*"*\/"   { break; /* c comment */   };

{Spc}*            { return(SPACE); /* white space */ };
"\r"              { return(CR); };
"\n"              { lineno++; return(LF); };

<<EOF>>           { yyterminate(); };
%%