Hi,

I'm trying to install an #after metalink to a MessageNode that has an
argument, however it fails because the bytecode is missing the argument (I
think).
Note that #before control worked fine, so I am not sure whether this is a
bug, not yet supported, or am I doing something wrong.

code (tested in P6.1):

~~~~~~~~~~~~~~~~~
Something compile: 'add: aNumber
^ 1 + aNumber'.

after := MetaLink new
metaObject: [ self logCr: 'after' ];
selector: #value;
control: #after.
"
after uninstall.
"

ast := (Something>>#add:) ast.
node := ast sendNodes first.
node link: after.

Something new add: 3.
~~~~~~~~~~~~~~~~~~~

error:

[image: image.png]

Thanks!

Peter

Reply via email to