Mercurial > hg > Gears > Gears
diff src/parallel_execution/lib/Gears/Util.pm @ 625:d02866506b9b
...
author | anatofuz <anatofuz@cr.ie.u-ryukyu.ac.jp> |
---|---|
date | Tue, 09 Jun 2020 15:01:53 +0900 |
parents | d560184a7ce7 |
children | 670b972b6ff0 |
line wrap: on
line diff
--- a/src/parallel_execution/lib/Gears/Util.pm Mon Jun 08 15:45:49 2020 +0900 +++ b/src/parallel_execution/lib/Gears/Util.pm Tue Jun 09 15:01:53 2020 +0900 @@ -90,7 +90,7 @@ my $type = $2; my $vname = $3; next if ($type eq '__code'); - $type =~ s/^(?:Impl|Type|Isa)\s*(\*)?/union Data $1/; + $type =~ s/^(?:Impl|Type|Isa)\s*(\*)?/union Data$1/; my $val = "$type $vname;\n"; push(@tmp_args, $const_type ? "$const_type $val" : $val); }