The R Project SVN R

Rev

Rev 24516 | Rev 31119 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 24516 Rev 25214
Line 131... Line 131...
131 
		copyVector(names, onames);
 131 
		copyVector(names, onames);
132 
	    }
 132 
	    }
133 
	    if ((err = extract_one(uf, dest, NULL, names, nnames)) != UNZ_OK) break;
 133 
	    if ((err = extract_one(uf, dest, NULL, names, nnames)) != UNZ_OK) break;
134 
#ifdef Win32
 134 
#ifdef Win32
135 
	    R_ProcessEvents();
 135 
	    R_ProcessEvents();
- 
 
 136 
#else
- 
 
 137 
	    R_CheckUserInterrupt();
136 
#endif
 138 
#endif
137 
	}
 139 
	}
138 
    } else {
 140 
    } else {
139 
	for (i = 0; i < nfiles; i++) {
 141 
	for (i = 0; i < nfiles; i++) {
140 
	    if ((err = unzLocateFile(uf, files[i], 0)) != UNZ_OK) break;
 142 
	    if ((err = unzLocateFile(uf, files[i], 0)) != UNZ_OK) break;
141 
	    if ((err = extract_one(uf, dest, files[i], names, nnames)) != UNZ_OK) break;
 143 
	    if ((err = extract_one(uf, dest, files[i], names, nnames)) != UNZ_OK) break;
142 
#ifdef Win32
 144 
#ifdef Win32
143 
	    R_ProcessEvents();
 145 
	    R_ProcessEvents();
- 
 
 146 
#else
- 
 
 147 
	    R_CheckUserInterrupt();
144 
#endif
 148 
#endif
145 
	}
 149 
	}
146 
    }
 150 
    }
147 
    *pnames = names;
 151 
    *pnames = names;
148 
    unzClose(uf);
 152 
    unzClose(uf);