tumble / file diff

diff: parser.y

parser.y

changeset 15
dda3d673b82b
parent 12
c3e2c2344560
child 17
d4699dfddcc0
     1.1 diff -r 4c261fbf8c77 -r dda3d673b82b parser.y
     1.2 --- a/parser.y	Sun Dec 30 04:16:46 2001 +0000
     1.3 +++ b/parser.y	Sun Dec 30 04:16:46 2001 +0000
     1.4 @@ -69,16 +69,16 @@
     1.5  	| INTEGER { $$.first = $1; $$.last = $1; } ;
     1.6  
     1.7  image_ranges:
     1.8 -	range
     1.9 -	| image_ranges ',' range ;
    1.10 +	range { input_images ($1.first, $1.last); }
    1.11 +	| image_ranges ',' range { input_images ($3.first, $3.last); } ;
    1.12  
    1.13  
    1.14  input_file_clause:
    1.15  	FILE_KEYWORD STRING  ';'  { open_tiff_input_file ($2) } ;
    1.16  
    1.17  image_clause:
    1.18 -	IMAGE INTEGER ';'
    1.19 -	| IMAGE INTEGER modifier_clause_list ';' ;
    1.20 +	IMAGE INTEGER ';' { input_images ($2, $2); }
    1.21 +	| IMAGE INTEGER modifier_clause_list ';' { input_images ($2, $2); } ;
    1.22  
    1.23  images_clause:
    1.24  	IMAGES image_ranges ';'
    1.25 @@ -155,12 +155,12 @@
    1.26  	FILE_KEYWORD STRING  ';' { open_pdf_output_file ($2) } ;
    1.27  
    1.28  page_ranges:
    1.29 -	range
    1.30 -	| page_ranges ',' range ;
    1.31 +	range { output_pages ($1.first, $1.last); }
    1.32 +	| page_ranges ',' range { output_pages ($3.first, $3.last); } ;
    1.33  
    1.34  page_clause:
    1.35 -	PAGE INTEGER ';'
    1.36 -	| PAGE STRING ',' INTEGER ';' ;
    1.37 +	PAGE INTEGER ';' { output_pages ($2, $2); }
    1.38 +	| PAGE STRING ',' INTEGER ';' { output_pages ($4, $4); } ;
    1.39  
    1.40  pages_clause:
    1.41  	PAGES page_ranges ';'