Mercurial > hg > Gears > Gears
view src/parallel_execution/examples/DebughelloWorld/meta.pm @ 1070:fba66b75a7dc default tip
rollback
author | matac42 <matac@cr.ie.u-ryukyu.ac.jp> |
---|---|
date | Mon, 05 Feb 2024 01:48:23 +0900 |
parents | e6778c866876 |
children |
line wrap: on
line source
package meta; use strict; use warnings; sub replaceMeta { return ( [qr/HelloImpl/ => \&generatedebugMeta], ); } #my ($currentCodeGearName, $context, $next) = @_; sub generatedebugMeta { my ($context, $next) = @_; return "goto debugMeta($context, $next);"; } 1;