diff options
author | Peter Breitenlohner <peb@mppmu.mpg.de> | 2009-11-10 10:27:09 +0000 |
---|---|---|
committer | Peter Breitenlohner <peb@mppmu.mpg.de> | 2009-11-10 10:27:09 +0000 |
commit | 5e8e9500102800e68c9e7fcac9e85c1668b71a36 (patch) | |
tree | 81d79ac70ffbb127e8063f18c8f55475ca169ee1 /Build/source/texk/web2c/omegafonts/pl-lexer.l | |
parent | e6a9c88ada2f11dd61e4c4e39dff84944bed5787 (diff) |
towards TL2010: texk/web2c
git-svn-id: svn://tug.org/texlive/trunk@15964 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/omegafonts/pl-lexer.l')
-rw-r--r-- | Build/source/texk/web2c/omegafonts/pl-lexer.l | 15 |
1 files changed, 12 insertions, 3 deletions
diff --git a/Build/source/texk/web2c/omegafonts/pl-lexer.l b/Build/source/texk/web2c/omegafonts/pl-lexer.l index bd17b8c2500..cfd63bfaf32 100644 --- a/Build/source/texk/web2c/omegafonts/pl-lexer.l +++ b/Build/source/texk/web2c/omegafonts/pl-lexer.l @@ -1,5 +1,5 @@ %{ -/* pl.l: Lexical analysis of property list files. +/* pl-lexer.l: Lexical analysis of property list files. This file is part of Omega, which is based on the web2c distribution of TeX, @@ -50,7 +50,7 @@ char saved_text[MAX_PTR]; static void scan_int(unsigned); static void scan_char(void); static void scan_fix(void); -static void scan_string(char *, unsigned, unsigned); +static void scan_string(const char *, unsigned, unsigned); static void scan_hex_string(void); /* from kpathsea, but avoid including kpathsea header files */ @@ -239,6 +239,15 @@ NATURALFONTDIR{ws}BL {yylval.yint = DIR_NAT+DIR_BL; return(FONTDIR);} NATURALFONTDIR{ws}RT {yylval.yint = DIR_NAT+DIR_RT; return(FONTDIR);} NATURALFONTDIR{ws}BR {yylval.yint = DIR_NAT+DIR_BR; return(FONTDIR);} NATURALFONTDIR{ws}RB {yylval.yint = DIR_NAT+DIR_RB; return(FONTDIR);} + /* for compatibility with the omegaware versions */ +NFONTDIR{ws}TL {yylval.yint = DIR_NAT+DIR_TL; return(FONTDIR);} +NFONTDIR{ws}LT {yylval.yint = DIR_NAT+DIR_LT; return(FONTDIR);} +NFONTDIR{ws}TR {yylval.yint = DIR_NAT+DIR_TR; return(FONTDIR);} +NFONTDIR{ws}LB {yylval.yint = DIR_NAT+DIR_LB; return(FONTDIR);} +NFONTDIR{ws}BL {yylval.yint = DIR_NAT+DIR_BL; return(FONTDIR);} +NFONTDIR{ws}RT {yylval.yint = DIR_NAT+DIR_RT; return(FONTDIR);} +NFONTDIR{ws}BR {yylval.yint = DIR_NAT+DIR_BR; return(FONTDIR);} +NFONTDIR{ws}RB {yylval.yint = DIR_NAT+DIR_RB; return(FONTDIR);} FONTIVALUE return(FONTIVALUE); FONTFVALUE return(FONTFVALUE); @@ -415,7 +424,7 @@ scan_char(void) } static void -scan_string(char *attribute, unsigned keep, unsigned length) +scan_string(const char *attribute, unsigned keep, unsigned length) { register unsigned c, saved_ptr = 0, paren_level = 0; unsigned error_msg = FALSE; |