USING: kernel tools.test definitions compiler.units ;
IN: compiler.tests.redefine21

[ ] [ : a ( -- ) ; << : b ( quot -- ) call a ; inline >> [ ] b ] unit-test

[ ] [ [ { a b } forget-all ] with-compilation-unit ] unit-test

[ ] [ : A ( -- ) ; << : B ( -- ) A ; inline >> B ] unit-test

[ ] [ [ { A B } forget-all ] with-compilation-unit ] unit-test