Subversion Repositories Vertical

%{
/* $Header: c:\\cygwin\\cvsroot/Vert03/spares/sa_lex.l,v 1.1.1.1 2003/11/04 23:34:56 mjames Exp $ */
/* $Log: sa_lex.l,v $
/* Revision 1.1.1.1  2003/11/04 23:34:56  mjames
/* Imported into local repositrory
/*
 * Revision 1.18  2000/10/02  11:04:20  11:04:20  mjames (Mike James)
 * new_vhdl
 * 
 * Revision 1.17  2000/09/27  14:42:21  14:42:21  mjames (Mike James)
 * Part of Release Sep_27_ST_2000
 * 
 * Revision 1.16  2000/09/21  10:15:51  10:15:51  mjames (Mike James)
 * Part of Release Sep21Alpha
 * 
 * Revision 1.15  2000/08/25  09:57:16  09:57:16  mjames (Mike James)
 * Part of Release Aug25_alpha
 * 
 * Revision 1.14  2000/08/16  08:57:32  08:57:32  mjames (Mike James)
 * Part of Release CD01_Aug2000
 * 
 * Revision 1.13  2000/08/14  14:45:13  14:45:13  mjames (Mike James)
 * Part of Release Aug_14_2000
 * 
 * Revision 1.12  2000/08/11  08:30:34  08:30:34  mjames (Mike James)
 * Part of Release Aug_11_2000
 * 
 * Revision 1.11  2000/08/09  10:31:49  10:31:49  mjames (Mike James)
 * Part of Release Aug__9_2000
 * 
 * Revision 1.10  2000/05/31  11:43:00  11:43:00  mjames (Mike James)
 * Part of Release May_31_2000
 * 
 * Revision 1.9  2000/05/08  17:01:40  17:01:40  mjames (Mike James)
 * Part of Release May__8_2000
 * 
 * Revision 1.8  2000/05/08  16:59:33  16:59:33  mjames (Mike James)
 * Part of Release May__8_2000
 * 
 * Revision 1.7  2000/05/08  16:57:09  16:57:09  mjames (Mike James)
 * Part of Release May__8_2000
 * 
 * Revision 1.6  2000/03/08  16:19:30  16:19:30  mjames (Mike James)
 * New version including PC
 * 
 * Revision 1.3  2000/01/20  15:58:50  15:58:50  mjames (Mike James)
 * Part of Release R22
 * 
 * Revision 1.2  99/12/22  11:15:31  11:15:31  mjames (Mike James)
 * Part of Release Dec_22_1999
 * 
 * Revision 1.1  99/11/23  13:55:08  13:55:08  mjames (Mike James)
 * Initial revision
 * 
 * Revision 1.4  99/06/25  14:35:43  14:35:43  mjames (Mike James)
 * Added in reference to expression.h, but no changes made 
 * to the function of acfread yet.
 * 
 * Revision 1.3  98/02/11  11:26:42  11:26:42  mjames (Mike James)
 * Checked in for version 6.2a
 * 
 * Revision 1.2  97/04/23  08:45:04  08:45:04  mjames (Mike James)
 * CHecked in for release rel23041997
 * 
 * Revision 1.1  96/12/13  08:43:24  08:43:24  mjames (Mike James)
 * Initial revision
 * 
 * Revision 1.14  96/07/19  14:38:28  14:38:28  mjames (Mike James)
 * Update to give to PRL
 *
 * Revision 1.13  1996/07/12  15:52:12  mjames
 * Sorted out things like Alias and Jumpers
 * Work Correctly
 * Print COrrectly
 *
 * Revision 1.12  96/06/17  10:52:22  10:52:22  mjames (Mike James)
 * Tidying up
 *
 * Revision 1.11  96/06/04  11:52:43  11:52:43  mjames (Mike James)
 * Slight modifications
 *
 * Revision 1.10  96/04/26  16:03:54  16:03:54  mjames (Mike James)
 *  Set the limit on token length to be consistent with the rest of the code
 *
 * Revision 1.9  96/03/29  14:47:24  14:47:24  mjames (Mike James)
 * Added VHDL netlist writing to the capabilities of ACFREAD
 *
 * Revision 1.8  96/03/18  13:51:30  13:51:30  mjames (Mike James)
 * Real Revision 2.1
 *
 * Revision 1.6  96/02/13  09:13:19  09:13:19  mjames (Mike James)
 * Updated to be version 2.0 with net joining
 *
 * Revision 1.5  96/02/07  16:01:27  16:01:27  mjames (Mike James)
 * Added correct RCS header
 *
 * Revision 1.4  96/02/07  15:50:32  15:50:32  mjames (Mike James)
 * Added RCS ident message
 *
 * Revision 1.3  96/01/10  13:13:24  13:13:24  mjames (Mike James)
 * Works in debug mode with EPLD listings and PCB layout
 *
 * Revision 1.2  96/01/08  15:23:44  15:23:44  mjames (Mike James)
 * Managing to make sense of things now
 *
 * Revision 1.1  96/01/07  12:40:11  Mike_James
 * Initial revision
 *
 * Revision 1.1  96/01/04  17:55:24  17:55:24  mjames (Mike James)
 * Initial revision
 *
 * Revision 1.2  96/01/04  11:37:16  11:37:16  mjames (Mike James)
 * Compete parsing of FIT and ACF with ignore of junk .
 *
 * Revision 1.1  96/01/04  10:18:25  10:18:25  mjames (Mike James)
 * Initial revision
 *
 *  */
#include <stdio.h>
/* see makefile for why */
#include "net_yacc_tab.h"
#include "lx_support.h"
#include "generic.h"
#include "expression.h"
#include "database.h"
#define YYLMAX MAXIDLEN

static char IDstr[] = "@(#)$Header: c:\\cygwin\\cvsroot/Vert03/spares/sa_lex.l,v 1.1.1.1 2003/11/04 23:34:56 mjames Exp $";

extern  int yyval;

extern int lineno;
%}

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

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

Ct [ -\~]

Cm [^\n]

D [0-9]
Spc [ \r\t]

S [^\"]
Q [\"]


%%

";"                { return(SEMI); };
"!"                { return(PLING); };
"."                { return(DOT); };
","                { return(COMMA); };

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

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

{Spc}             { break; /* white space */ };
"\n"              { lineno++; return(NL); };
%%
/* dummy functions */
void tidy_lex(void) 
  {
  }

expression_t * compile_expression_from_string(char * s)
  {
  }