summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/omegafonts/pl-lexer.l
diff options
context:
space:
mode:
Diffstat (limited to 'Build/source/texk/web2c/omegafonts/pl-lexer.l')
-rw-r--r--Build/source/texk/web2c/omegafonts/pl-lexer.l15
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;