1999-06-13 Alan Modra <alan@spri.levels.unisa.edu.au>
[deliverable/binutils-gdb.git] / binutils / deflex.l
CommitLineData
252b5132
RH
1%{/* deflex.l - Lexer for .def files */
2
3/* Copyright (C) 1995, 1997, 1998 Free Software Foundation, Inc.
4
5This file is part of GNU Binutils.
6
7This program is free software; you can redistribute it and/or modify
8it under the terms of the GNU General Public License as published by
9the Free Software Foundation; either version 2 of the License, or
10(at your option) any later version.
11
12This program is distributed in the hope that it will be useful,
13but WITHOUT ANY WARRANTY; without even the implied warranty of
14MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15GNU General Public License for more details.
16
17You should have received a copy of the GNU General Public License
18along with this program; if not, write to the Free Software
19Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
20
21
22/* Contributed by Steve Chamberlain
23 sac@cygnus.com
24
25*/
26#define DONTDECLARE_MALLOC
27#include "libiberty.h"
28#include "defparse.h"
29#include "dlltool.h"
30
31int linenumber;
32
33%}
34%%
35"NAME" { return NAME;}
36"LIBRARY" { return LIBRARY;}
37"DESCRIPTION" { return DESCRIPTION;}
38"STACKSIZE" { return STACKSIZE;}
39"HEAPSIZE" { return HEAPSIZE;}
40"CODE" { return CODE;}
41"DATA" { return DATA;}
42"SECTIONS" { return SECTIONS;}
43"EXPORTS" { return EXPORTS;}
44"IMPORTS" { return IMPORTS;}
45"VERSION" { return VERSIONK;}
46"BASE" { return BASE;}
47"CONSTANT" { return CONSTANT; }
48"NONAME" { return NONAME; }
49"READ" { return READ;}
50"WRITE" { return WRITE;}
51"EXECUTE" { return EXECUTE;}
52"SHARED" { return SHARED;}
53
54[0-9][x0-9A-Fa-f]* { yylval.number = strtol (yytext,0,0);
55 return NUMBER; }
56
57[A-Za-z$:\-\_?][A-Za-z0-9/$:\-\_@?]+ {
58 yylval.id = xstrdup (yytext);
59 return ID;
60 }
61
62"\""[^\"]*"\"" {
63 yylval.id = xstrdup (yytext+1);
64 yylval.id[yyleng-2] = 0;
65 return ID;
66 }
67
68"\'"[^\']*"\'" {
69 yylval.id = xstrdup (yytext+1);
70 yylval.id[yyleng-2] = 0;
71 return ID;
72 }
73"*".* { }
74";".* { }
75" " { }
76"\t" { }
77"\n" { linenumber ++ ;}
78"=" { return '=';}
79"." { return '.';}
80"@" { return '@';}
81"," { return ',';}
82%%
83#ifndef yywrap
84/* Needed for lex, though not flex. */
85int yywrap() { return 1; }
86#endif
This page took 0.027688 seconds and 4 git commands to generate.