RosettaCodeData/Task/Truncate-a-file/MATLAB/truncate-a-file.m
Ingy döt Net 776bba907c Sync
2013-10-27 22:24:23 +00:00

9 lines
159 B
Matlab

function truncate_a_file(fn,count);
fid=fopen(fn,'r');
s = fread(fid,count,'uint8');
fclose(fid);
fid=fopen(fn,'w');
s = fwrite(fid,s,'uint8');
fclose(fid);