Changeset 32347 for trunk/psModules/src/objects/mksource.pl
- Timestamp:
- Sep 6, 2011, 1:02:53 PM (15 years ago)
- Location:
- trunk/psModules/src/objects
- Files:
-
- 2 edited
-
. (modified) (1 prop)
-
mksource.pl (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/psModules/src/objects
- Property svn:ignore
-
old new 5 5 *.la 6 6 *.lo 7 pmSourceIO_CMF_PS1_V1.c 8 pmSourceIO_CMF_PS1_V2.c 9 pmSourceIO_CMF_PS1_V3.c
-
- Property svn:ignore
-
trunk/psModules/src/objects/mksource.pl
r31670 r32347 14 14 15 15 # see if we can add in PS1_DV* and PS1_SV* as well... 16 @cmfmodes = ("PS1_V1", 1,16 %cmfmodes = ("PS1_V1", 1, 17 17 "PS1_V2", 2, 18 18 "PS1_V3", 3); 19 20 print "1: $cmfmodes{1}\n"; 21 print "PS1_V1: $cmfmodes{'PS1_V1'}\n"; 19 22 20 23 open (FILE, "$template") || die "failed to open template $template\n"; … … 50 53 51 54 if ($gtMode) { 55 # print "gtMode : $line\n"; 52 56 $thisLevel = $cmfmodes{$gtMode}; 53 57 $myLevel = $cmfmodes{$cmfmode}; 54 if ($thisLevel <= $myLevel) { next; } 55 $line =~ s|\@<\S*\@\s*||; 58 print "gtMode : $gtMode vs $cmfmode, $thisLevel, $myLevel\n"; 59 if ($myLevel <= $thisLevel) { next; } 60 $line =~ s|\@>\S*\@\s*||; 56 61 } 57 62 58 63 if ($ltMode) { 64 # print "ltMode : $line\n"; 59 65 $thisLevel = $cmfmodes{$ltMode}; 60 66 $myLevel = $cmfmodes{$cmfmode}; 61 if ($thisLevel >= $myLevel) { next; } 62 $line =~ s|\@>\S*\@\s*||; 67 print "ltMode : $ltMode vs $cmfmode, $thisLevel, $myLevel\n"; 68 if ($myLevel >= $thisLevel) { next; } 69 $line =~ s|\@<\S*\@\s*||; 63 70 } 64 71
Note:
See TracChangeset
for help on using the changeset viewer.
