@ -1613,8 +1613,8 @@ YY_RULE_SETUP
/* a non-word constituent char, like a space, tab, curly, paren, etc */
char c = yytext [ yyleng - 1 ] ;
STORE_POS ;
yylval - > str = strdup( yytext ) ;
yylval - > str [yyleng - 1 ] = 0 ;
yylval - > str = ast_malloc( yyleng ) ;
ast_copy_string ( yylval - > str , yytext , yyleng ) ;
unput ( c ) ; /* put this ending char back in the stream */
BEGIN ( 0 ) ;
return word ;
@ -1629,7 +1629,8 @@ YY_RULE_SETUP
STORE_LOC ;
ast_log ( LOG_ERROR , " File=%s, line=%d, column=%d: Mismatched ')' in expression: %s ! \n " , my_file , my_lineno , my_col , yytext ) ;
BEGIN ( 0 ) ;
yylval - > str = strdup ( yytext ) ;
yylval - > str = ast_malloc ( yyleng + 1 ) ;
ast_copy_string ( yylval - > str , yytext , yyleng + 1 ) ;
return word ;
}
parencount2 - - ;
@ -1644,7 +1645,7 @@ YY_RULE_SETUP
case 59 :
/* rule 59 can match eol */
YY_RULE_SETUP
# line 33 6 "ael.flex"
# line 33 7 "ael.flex"
{
char c = yytext [ yyleng - 1 ] ;
if ( c = = ' { ' )
@ -1656,7 +1657,7 @@ YY_RULE_SETUP
case 60 :
/* rule 60 can match eol */
YY_RULE_SETUP
# line 34 4 "ael.flex"
# line 34 5 "ael.flex"
{
char c = yytext [ yyleng - 1 ] ;
if ( pbcpop2 ( c ) ) { /* error */
@ -1664,7 +1665,8 @@ YY_RULE_SETUP
ast_log ( LOG_ERROR , " File=%s, line=%d, column=%d: Mismatched '%c' in expression! \n " ,
my_file , my_lineno , my_col , c ) ;
BEGIN ( 0 ) ;
yylval - > str = strdup ( yytext ) ;
yylval - > str = ast_malloc ( yyleng + 1 ) ;
ast_copy_string ( yylval - > str , yytext , yyleng + 1 ) ;
return word ;
}
yymore ( ) ;
@ -1673,13 +1675,14 @@ YY_RULE_SETUP
case 61 :
/* rule 61 can match eol */
YY_RULE_SETUP
# line 3 58 "ael.flex"
# line 3 60 "ael.flex"
{
if ( pbcpop3 ( ' ] ' ) ) { /* error */
STORE_LOC ;
ast_log ( LOG_ERROR , " File=%s, line=%d, column=%d: Mismatched ')' in expression: %s ! \n " , my_file , my_lineno , my_col , yytext ) ;
BEGIN ( 0 ) ;
yylval - > str = strdup ( yytext ) ;
yylval - > str = ast_malloc ( yyleng + 1 ) ;
ast_copy_string ( yylval - > str , yytext , yyleng + 1 ) ;
return word ;
}
parencount3 - - ;
@ -1694,7 +1697,7 @@ YY_RULE_SETUP
case 62 :
/* rule 62 can match eol */
YY_RULE_SETUP
# line 37 5 "ael.flex"
# line 37 8 "ael.flex"
{
char c = yytext [ yyleng - 1 ] ;
if ( c = = ' [ ' )
@ -1706,7 +1709,7 @@ YY_RULE_SETUP
case 63 :
/* rule 63 can match eol */
YY_RULE_SETUP
# line 38 3 "ael.flex"
# line 38 6 "ael.flex"
{
char c = yytext [ yyleng - 1 ] ;
if ( pbcpop3 ( c ) ) { /* error */
@ -1714,7 +1717,8 @@ YY_RULE_SETUP
ast_log ( LOG_ERROR , " File=%s, line=%d, column=%d: Mismatched '%c' in expression! \n " ,
my_file , my_lineno , my_col , c ) ;
BEGIN ( 0 ) ;
yylval - > str = strdup ( yytext ) ;
yylval - > str = ast_malloc ( yyleng + 1 ) ;
ast_copy_string ( yylval - > str , yytext , yyleng + 1 ) ;
return word ;
}
yymore ( ) ;
@ -1730,13 +1734,14 @@ YY_RULE_SETUP
case 64 :
/* rule 64 can match eol */
YY_RULE_SETUP
# line 40 4 "ael.flex"
# line 40 8 "ael.flex"
{
if ( pbcpop ( ' ) ' ) ) { /* error */
STORE_LOC ;
ast_log ( LOG_ERROR , " File=%s, line=%d, column=%d: Mismatched ')' in expression: %s ! \n " , my_file , my_lineno , my_col , yytext ) ;
BEGIN ( 0 ) ;
yylval - > str = strdup ( yytext ) ;
yylval - > str = ast_malloc ( yyleng + 1 ) ;
ast_copy_string ( yylval - > str , yytext , yyleng + 1 ) ;
prev_word = 0 ;
return word ;
}
@ -1745,8 +1750,8 @@ YY_RULE_SETUP
yymore ( ) ;
} else {
STORE_LOC ;
yylval - > str = strdup( yytext ) ;
yylval - > str [yyleng - 1 ] = ' \0 ' ; /* trim trailing ')' */
yylval - > str = ast_malloc( yyleng ) ;
ast_copy_string ( yylval - > str , yytext , yyleng ) ;
unput ( ' ) ' ) ;
BEGIN ( 0 ) ;
return word ;
@ -1756,7 +1761,7 @@ YY_RULE_SETUP
case 65 :
/* rule 65 can match eol */
YY_RULE_SETUP
# line 4 26 "ael.flex"
# line 4 31 "ael.flex"
{
char c = yytext [ yyleng - 1 ] ;
if ( c = = ' ( ' )
@ -1768,7 +1773,7 @@ YY_RULE_SETUP
case 66 :
/* rule 66 can match eol */
YY_RULE_SETUP
# line 43 4 "ael.flex"
# line 43 9 "ael.flex"
{
char c = yytext [ yyleng - 1 ] ;
if ( pbcpop ( c ) ) { /* error */
@ -1776,7 +1781,8 @@ YY_RULE_SETUP
ast_log ( LOG_ERROR , " File=%s, line=%d, column=%d: Mismatched '%c' in expression! \n " ,
my_file , my_lineno , my_col , c ) ;
BEGIN ( 0 ) ;
yylval - > str = strdup ( yytext ) ;
yylval - > str = ast_malloc ( yyleng + 1 ) ;
ast_copy_string ( yylval - > str , yytext , yyleng + 1 ) ;
return word ;
}
yymore ( ) ;
@ -1793,7 +1799,7 @@ YY_RULE_SETUP
case 67 :
/* rule 67 can match eol */
YY_RULE_SETUP
# line 4 5 6 "ael.flex"
# line 4 62 "ael.flex"
{
char c = yytext [ yyleng - 1 ] ;
if ( c = = ' ( ' )
@ -1805,13 +1811,14 @@ YY_RULE_SETUP
case 68 :
/* rule 68 can match eol */
YY_RULE_SETUP
# line 4 64 "ael.flex"
# line 4 70 "ael.flex"
{
if ( pbcpop ( ' ) ' ) ) { /* error */
STORE_LOC ;
ast_log ( LOG_ERROR , " File=%s, line=%d, column=%d: Mismatched ')' in expression! \n " , my_file , my_lineno , my_col ) ;
BEGIN ( 0 ) ;
yylval - > str = strdup ( yytext ) ;
yylval - > str = ast_malloc ( yyleng + 1 ) ;
ast_copy_string ( yylval - > str , yytext , yyleng + 1 ) ;
return word ;
}
@ -1823,7 +1830,8 @@ YY_RULE_SETUP
BEGIN ( 0 ) ;
if ( ! strcmp ( yytext , " ) " ) )
return RP ;
yylval - > str = strdup ( yytext ) ;
yylval - > str = ast_malloc ( yyleng ) ;
ast_copy_string ( yylval - > str , yytext , yyleng ) ;
yylval - > str [ yyleng - 1 ] = ' \0 ' ; /* trim trailing ')' */
unput ( ' ) ' ) ;
return word ;
@ -1833,16 +1841,16 @@ YY_RULE_SETUP
case 69 :
/* rule 69 can match eol */
YY_RULE_SETUP
# line 4 88 "ael.flex"
# line 4 96 "ael.flex"
{
if ( parencount ! = 0 ) { /* printf( "Folding in a comma!\n"); */
if ( parencount ! = 0 ) { /* ast_log(LOG_NOTICE, "Folding in a comma!\n"); */
yymore ( ) ;
} else {
STORE_LOC ;
if ( ! strcmp ( yytext , " , " ) )
return COMMA ;
yylval - > str = strdup( yytext ) ;
yylval - > str [yyleng - 1 ] = ' \0 ' ;
yylval - > str = ast_malloc( yyleng ) ;
ast_copy_string ( yylval - > str , yytext , yyleng ) ;
unput ( ' , ' ) ;
return word ;
}
@ -1851,14 +1859,15 @@ YY_RULE_SETUP
case 70 :
/* rule 70 can match eol */
YY_RULE_SETUP
# line 5 02 "ael.flex"
# line 5 1 0 "ael.flex"
{
char c = yytext [ yyleng - 1 ] ;
if ( pbcpop ( c ) ) { /* error */
STORE_LOC ;
ast_log ( LOG_ERROR , " File=%s, line=%d, column=%d: Mismatched '%c' in expression! \n " , my_file , my_lineno , my_col , c ) ;
BEGIN ( 0 ) ;
yylval - > str = strdup ( yytext ) ;
yylval - > str = ast_malloc ( yyleng + 1 ) ;
ast_copy_string ( yylval - > str , yytext , yyleng + 1 ) ;
return word ;
}
yymore ( ) ;
@ -1872,7 +1881,7 @@ YY_RULE_SETUP
case 71 :
/* rule 71 can match eol */
YY_RULE_SETUP
# line 5 19 "ael.flex"
# line 5 28 "ael.flex"
{
char c = yytext [ yyleng - 1 ] ;
yymore ( ) ;
@ -1882,14 +1891,15 @@ YY_RULE_SETUP
case 72 :
/* rule 72 can match eol */
YY_RULE_SETUP
# line 5 25 "ael.flex"
# line 5 34 "ael.flex"
{
char c = yytext [ yyleng - 1 ] ;
if ( pbcpop ( c ) ) { /* error */
STORE_LOC ;
ast_log ( LOG_ERROR , " File=%s, line=%d, column=%d: Mismatched '%c' in expression! \n " , my_file , my_lineno , my_col , c ) ;
BEGIN ( 0 ) ;
yylval - > str = strdup ( yytext ) ;
yylval - > str = ast_malloc ( yyleng + 1 ) ;
ast_copy_string ( yylval - > str , yytext , yyleng + 1 ) ;
return word ;
}
yymore ( ) ;
@ -1898,11 +1908,11 @@ YY_RULE_SETUP
case 73 :
/* rule 73 can match eol */
YY_RULE_SETUP
# line 5 3 7 "ael.flex"
# line 5 4 7 "ael.flex"
{
STORE_LOC ;
yylval - > str = strdup( yytext ) ;
yylval - > str [yyleng - 1 ] = ' \0 ' ;
yylval - > str = ast_malloc( yyleng ) ;
ast_copy_string ( yylval - > str , yytext , yyleng ) ;
unput ( ' ; ' ) ;
BEGIN ( 0 ) ;
return word ;
@ -1911,7 +1921,7 @@ YY_RULE_SETUP
case 74 :
/* rule 74 can match eol */
YY_RULE_SETUP
# line 5 4 6 "ael.flex"
# line 5 5 6 "ael.flex"
{
char fnamebuf [ 1024 ] , * p1 , * p2 ;
int glob_ret ;
@ -1964,7 +1974,7 @@ case YY_STATE_EOF(comment):
case YY_STATE_EOF ( curlystate ) :
case YY_STATE_EOF ( wordstate ) :
case YY_STATE_EOF ( brackstate ) :
# line 59 1 "ael.flex"
# line 60 1 "ael.flex"
{
char fnamebuf [ 2048 ] ;
if ( include_stack_index > 0 & & include_stack [ include_stack_index - 1 ] . globbuf_pos < include_stack [ include_stack_index - 1 ] . globbuf . gl_pathc - 1 ) {
@ -1999,10 +2009,10 @@ case YY_STATE_EOF(brackstate):
YY_BREAK
case 75 :
YY_RULE_SETUP
# line 6 2 3 "ael.flex"
# line 6 3 3 "ael.flex"
ECHO ;
YY_BREAK
# line 20 0 5 "ael_lex.c"
# line 20 1 5 "ael_lex.c"
case YY_END_OF_BUFFER :
{
@ -3175,7 +3185,7 @@ void *ael_yyrealloc (void * ptr, yy_size_t size , yyscan_t yyscanner)
# define YYTABLES_NAME "yytables"
# line 6 2 3 "ael.flex"
# line 6 3 3 "ael.flex"