view paper/src/meta.pm @ 10:884ba6158dd6

add describe for transpiler
author Takato Matsuoka <t.matsuoka@cr.ie.u-ryukyu.ac.jp>
date Sun, 30 Jan 2022 23:34:06 +0900 (2022-01-30)
parents 1ba2a1f7c4e5
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;