ExternalVendorCode/trick
1
0
Fork 0
mirror of https://github.com/nasa/trick.git synced 2025-01-02 03:16:43 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Removed commented code

Browse Source
This commit is contained in:
Pherring04 2024-06-10 13:34:51 -05:00 committed by GitHub
parent 79af91f124
commit 89ac4405e7
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
1 changed files with 0 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
libexec/trick/convert_swig
View File

@ -590,7 +590,6 @@ sub process_class($$$$$) {
my ($class_name) ; my ($class_name) ;
my $template_typedefs ; my $template_typedefs ;
## Extract the class_name from the class_string ## Extract the class_name from the class_string
$class_string =~ /^(?:class|struct)\s+ # keyword class or struct $class_string =~ /^(?:class|struct)\s+ # keyword class or struct
([_A-Za-z]\w*) # class name ([_A-Za-z]\w*) # class name
@ -598,12 +597,10 @@ sub process_class($$$$$) {
/sx or die "Internal error" ; /sx or die "Internal error" ;
$class_name = $1 ; $class_name = $1 ;
my $my_class_contents = $class_string ; my $my_class_contents = $class_string ;
#$$new_contents_ref .= "[[[".$class_string."]]]" ;
if ( $class_string !~ /\{$/ ) { if ( $class_string !~ /\{$/ ) {
$$contents_ref =~ s/^(.*?\s*\{)//s ; $$contents_ref =~ s/^(.*?\s*\{)//s ;
$my_class_contents .= $1 ; $my_class_contents .= $1 ;
#$$new_contents_ref .= $1 ;
} }
($extracted, $$contents_ref) = extract_bracketed( "{" . $$contents_ref , "{}") ; ($extracted, $$contents_ref) = extract_bracketed( "{" . $$contents_ref , "{}") ;
@ -629,7 +626,6 @@ sub process_class($$$$$) {
if ( $non_var ne "" ) { if ( $non_var ne "" ) {
#print "*** non_var = $non_var ***\n" ; #print "*** non_var = $non_var ***\n" ;
$my_class_contents .= $non_var ; $my_class_contents .= $non_var ;
#$$new_contents_ref .= $non_var ;
} }
if ( $template_var_def_str ne "" ) { if ( $template_var_def_str ne "" ) {
@ -639,7 +635,6 @@ sub process_class($$$$$) {
my ($template_full_type) = $1 ; my ($template_full_type) = $1 ;
my ($var_name) = $2 ; my ($var_name) = $2 ;
$my_class_contents .= $template_var_def_str ; $my_class_contents .= $template_var_def_str ;
#$$new_contents_ref .= $template_var_def_str ;
$template_full_type =~ /([_A-Za-z][:\w]*)\s*</ ; $template_full_type =~ /([_A-Za-z][:\w]*)\s*</ ;
my ($template_type) = $1 ; my ($template_type) = $1 ;
@ -662,9 +657,6 @@ sub process_class($$$$$) {
my $identifier = "${sanitized_namespace}${class_name}_${var_name}" ; my $identifier = "${sanitized_namespace}${class_name}_${var_name}" ;
my $trick_swig_template = "TRICK_SWIG_TEMPLATE_$identifier" ; my $trick_swig_template = "TRICK_SWIG_TEMPLATE_$identifier" ;
#$my_class_contents .= "\n#define $trick_swig_template\n" ;
#$$new_contents_ref .= "\n#define $trick_swig_template\n" ;
my $typedef = "\n#ifndef $trick_swig_template\n" ; my $typedef = "\n#ifndef $trick_swig_template\n" ;
$typedef .= "\%template($identifier) $template_full_type;\n" ; $typedef .= "\%template($identifier) $template_full_type;\n" ;
$typedef .= "#define $trick_swig_template\n" ; $typedef .= "#define $trick_swig_template\n" ;