264 |
# collect file to one line |
# collect file to one line |
265 |
push(@tmp_lines, $_); |
push(@tmp_lines, $_); |
266 |
if ("@tmp_lines" =~ /\;/) { |
if ("@tmp_lines" =~ /\;/) { |
267 |
if ( "@tmp_lines" =~ /^void/ |
# GLhalf is in then newest NV header, but |
268 |
or "@tmp_lines" =~ /^GL/) { |
# not in standard headers. |
269 |
|
# Avoid blowing up by ignoring. |
270 |
|
|
271 |
|
if ( ("@tmp_lines" =~ /^void/ |
272 |
|
or "@tmp_lines" =~ /^GL/) |
273 |
|
and not "@tmp_lines" =~ /GLhalf/ |
274 |
|
) { |
275 |
|
|
276 |
# remove ' '->' ' |
# remove ' '->' ' |
277 |
s/ / /g while ("$_" =~ / /); |
s/ / /g while ("$_" =~ / /); |