We carelessly overwrote the mirror primitive selectors in SandboxContext; however, this also affects their behavior when invoked from the simulated code, of course. Besides the MirrorPrimitiveTests, simple usage examples like the following fail, too:
| x |
x := #(1) copy.
Sandbox evaluate: [
thisContext object: x basicAt: 1 put: 2.
x at: 1]
Expected output: 2
Actual output: 1
As the usage of thisContext for invoking mirror primitives is already too much spread, it will probably be necessary to remove this overriding and replace all their senders in Context instead. Or would some metaprogramming such as "test simCustomizationLevel" or "test sender of the primitive" be possible, too?
We carelessly overwrote the mirror primitive selectors in
SandboxContext; however, this also affects their behavior when invoked from the simulated code, of course. Besides theMirrorPrimitiveTests, simple usage examples like the following fail, too:Expected output: 2
Actual output: 1
As the usage of
thisContextfor invoking mirror primitives is already too much spread, it will probably be necessary to remove this overriding and replace all their senders inContextinstead. Or would some metaprogramming such as "test simCustomizationLevel" or "test sender of the primitive" be possible, too?