Subversion Repositories DevTools

Rev

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

Rev 6177 Rev 6387
Line 491... Line 491...
491
#
491
#
492
 
492
 
493
sub SectionIfDef
493
sub SectionIfDef
494
{
494
{
495
    my $self = shift;
495
    my $self = shift;
496
    $self->{SDEF} = $_[0];
496
    $self->{SDEF} = 'ifdef ' . $_[0];
497
}
497
}
498
 
498
 
499
#-------------------------------------------------------------------------------
499
#-------------------------------------------------------------------------------
-
 
500
# Function        : SectionIfEq
-
 
501
#
-
 
502
# Description     : Place the current section within a ifeq ... endif block
-
 
503
#
-
 
504
# Inputs          : arg1
-
 
505
#                   arg2
-
 
506
#
-
 
507
# Returns         : Nothing
-
 
508
#
-
 
509
 
-
 
510
sub SectionIfEq
-
 
511
{
-
 
512
    my $self = shift;
-
 
513
    $self->{SDEF} = 'ifeq "' . $_[0] . '" "' . $_[1] . '"';
-
 
514
}
-
 
515
 
-
 
516
#-------------------------------------------------------------------------------
-
 
517
# Function        : SectionIfNeq
-
 
518
#
-
 
519
# Description     : Place the current section within a ifeq ... endif block
-
 
520
#
-
 
521
# Inputs          : arg1
-
 
522
#                   arg2
-
 
523
#
-
 
524
# Returns         : Nothing
-
 
525
#
-
 
526
sub SectionIfNeq
-
 
527
{
-
 
528
    my $self = shift;
-
 
529
    $self->{SDEF} = 'ifneq "' . $_[0] . '" "' . $_[1] . '"';
-
 
530
}
-
 
531
 
-
 
532
 
-
 
533
#-------------------------------------------------------------------------------
500
# Function        : Print
534
# Function        : Print
501
#
535
#
502
# Description     : Print the entry
536
# Description     : Print the entry
503
#
537
#
504
# Inputs          : None
538
# Inputs          : None
Line 610... Line 644...
610
            my $shell =   $recipeEntry->{SHELL};
644
            my $shell =   $recipeEntry->{SHELL};
611
            my $sdef =    $recipeEntry->{SDEF};
645
            my $sdef =    $recipeEntry->{SDEF};
612
 
646
 
613
            if ($sdef)
647
            if ($sdef)
614
            {
648
            {
615
                print "\nifdef $sdef";
649
                print "\n$sdef";
616
            }
650
            }
617
 
651
 
618
            #
652
            #
619
            #   Print the Recipe runtime comment
653
            #   Print the Recipe runtime comment
620
            #
654
            #