Rev 2 | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed
%{
/*
* $Id: frb_lex.l,v 1.1.1.1 2003/11/04 23:34:59 mjames Exp $
*
* $Log: frb_lex.l,v $
* Revision 1.1.1.1 2003/11/04 23:34:59 mjames
* Imported into local repositrory
*
* Revision 1.11 2002/10/02 19:37:29 MJAMES
* Moved dummy functions to a separate support file.
*
* Used correct number of arguments to define_pin
*
* Revision 1.10 2002/09/18 09:18:37 mjames
* Added dummy function to make code link to create final application
*
* Revision 1.9 2002/01/21 09:34:50 mjames
* FRBread adds the ability to ignore .ATT_PIN construct that appears in
* a recent FRB file.
*
* Revision 1.8 2002/01/16 11:22:44 mjames
* database.h header file is read in first as it undefined DLL stuff irrelevant
* to HPUX
*
* Revision 1.7 2001/12/13 22:21:37 mjames
* Using #ident with header to identify file
*
* Added dummy function to satisfy linker needs for read command
*
* Revision 1.6 2001/10/31 22:20:05 mjames
* Tidying up problematical comments caused by CVS
* 'intelligent' comment guessing
*
* Revision 1.5 2001/09/16 19:57:29 mjames
* tidying
*
* Revision 1.4 2001/06/06 12:10:22 mjames
* Move from HPUX
*
* Revision 1.3 2001/05/01 15:20:39 mjames
* Added comment leaders on some patterns matched but not used
*
* Revision 1.2 2001/03/29 08:27:07 mjames
* Converted frbread for use with the newer files from the drawing office
*
* Revision 1.1 2001/02/12 10:51:28 mjames
* Inserted new correct version number in vertcl_main.c
*
* Added lex files to the list.
*
* Revision 1.22 2000/03/08 16:19:01 16:19:01 mjames (Mike James)
* New version including PC
*
* Revision 1.19 2000/01/20 15:58:43 15:58:43 mjames (Mike James)
* Part of Release R22
*
* Revision 1.18 99/12/22 11:15:24 11:15:24 mjames (Mike James)
* Part of Release Dec_22_1999
*
* Revision 1.17 99/06/25 14:35:31 14:35:31 mjames (Mike James)
* Added in reference to expression.h, but no changes made
* to the function of acfread yet.
*
* Revision 1.16 98/02/11 11:25:59 11:25:59 mjames (Mike James)
* Checked in for version 6.2a
*
* Revision 1.15 97/04/23 08:45:03 08:45:03 mjames (Mike James)
* CHecked in for release rel23041997
*
* 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 "expression.h"
#if defined HAS_TCL
#include "tcl_l.h"
#endif
#include "generic.h"
#include "database.h"
#include "frb_yacc.h"
#include "lx_support.h"
#define YYLMAX MAXIDLEN
#ident "@(#)$Header: c:\\cygwin\\cvsroot/Vert03/frb_src/frb_lex.l,v 1.1.1.1 2003/11/04 23:34:59 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 [\"]
%%
".HEA" { return (HEADER); };
".END" { return (END); };
".TIM" { return (TIME); };
".UNI" { return (UNITS); };
".JOB" { return (JOB); };
".TYP" { return (TYPE); };
".APP" { return (APP); };
".ADD_COM" { free_strings(&lx_first,&lx_last);return(ADD_COM); };
".ADD_TER" { free_strings(&lx_first,&lx_last);return(ADD_TER); };
".ATT_COM" { free_strings(&lx_first,&lx_last);return(ATT_COM); };
".ATT_PIN" { free_strings(&lx_first,&lx_last);return(ATT_PIN); };
".ATT_TRE" { free_strings(&lx_first,&lx_last);return(ATT_TRE); };
".TER" { free_strings(&lx_first,&lx_last);return(TER); };
{Q}{S}*{Q} { yylval.string = make_string(yytext,&lx_first,&lx_last) ; /* do it anyway */
return(ASTRING); };
{L2}+ { yylval.string = make_string(yytext,&lx_first,&lx_last) ; /* do it anyway */
return(ASTRING); };
"--"{Cm}*"\n" { lineno++; return(NL);/* VHDL comment */ };
"/\*"{Ct}*"*\/" { break; /* c comment */ };
{Spc} { break; /* white space */ };
"\r"|"\n" { lineno++; return(NL); };
. { printf("?? unexpected char '%c' code %02X\n",yytext[0]>31?yytext[0]:' ',yytext[0]); };
<<EOF>> { yyterminate(); };
%%