Don't optimize chains with commands

Signed-off-by: Tom Eastep <teastep@shorewall.net>
This commit is contained in:
Tom Eastep 2012-06-07 14:11:44 -07:00
parent 38adf3d186
commit db6a7276ec

View File

@ -707,7 +707,9 @@ sub macro_comment( $ ) {
# Functions to manipulate cmdlevel
#
sub incr_cmd_level( $ ) {
$_[0]->{cmdlevel}++;
my $chain = $_[0];
$chain->{cmdlevel}++;
$chain->{optflags} |= ( DONT_OPTIMIZE | DONT_MOVE );
}
sub decr_cmd_level( $ ) {
@ -1021,6 +1023,7 @@ sub add_commands ( $$;@ ) {
} for @_;
$chainref->{referenced} = 1;
$chainref->{optflags} |= ( DONT_OPTIMIZE | DONT_MOVE );
}
#