The R Project SVN R

Rev

Rev 85303 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 85303 Rev 85310
Line 490... Line 490...
490
    TIFFSetField(out, TIFFTAG_ORIENTATION, ORIENTATION_TOPLEFT);
490
    TIFFSetField(out, TIFFTAG_ORIENTATION, ORIENTATION_TOPLEFT);
491
    TIFFSetField(out, TIFFTAG_PLANARCONFIG, PLANARCONFIG_CONTIG);
491
    TIFFSetField(out, TIFFTAG_PLANARCONFIG, PLANARCONFIG_CONTIG);
492
    TIFFSetField(out, TIFFTAG_PHOTOMETRIC, PHOTOMETRIC_RGB);
492
    TIFFSetField(out, TIFFTAG_PHOTOMETRIC, PHOTOMETRIC_RGB);
493
    TIFFSetField(out, TIFFTAG_SOFTWARE, "R " R_MAJOR "." R_MINOR);
493
    TIFFSetField(out, TIFFTAG_SOFTWARE, "R " R_MAJOR "." R_MINOR);
494
 
494
 
495
    /* JPEG compression does not work a line at a time, so switch to
495
    /* JBIG compression does not work a line at a time, so switch to
496
     * whole image -- we could use strips if necessary */
496
     * whole image -- we could use strips if necessary */
497
    int byline = 1, fail = 0;
497
    int byline = 1, fail = 0;
498
    if(compression < 0) {
498
    if(compression < 0) {
499
	byline = 0;
499
	byline = 0;
500
	compression = -compression;
500
	compression = -compression;