Differences From Artifact [ef30e9647e]:
- File mttroot/mtt/lib/cr/perl/lcos.pm — part of check-in [fb59d9c88a] at 2004-09-02 00:06:21 on branch origin/master — Implementation of lcos CR in Perl. (user: geraint@users.sourceforge.net, size: 3019) [annotate] [blame] [check-ins using] [more...]
To Artifact [ed0476b24c]:
- File mttroot/mtt/lib/cr/perl/lcos.pm — part of check-in [e777591396] at 2004-09-02 21:50:49 on branch origin/master — Require EXACT match of component type (so that TF doesn't match EMTF, etc.) (user: geraint@users.sourceforge.net, size: 3021) [annotate] [blame] [check-ins using] [more...]
︙ | |||
42 43 44 45 46 47 48 | 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 | - + | s/\((.*)\)/$1/; # strip brackets my @args = split (/,/); # split arguments $_ = $args[0]; # get component type # select rule to use |
︙ |