[~/Downloads/Tcl-pTk-0.90] make test PERL_DL_NONLAZY=1 /usr/bin/perl "-MExtUtils::Command::MM" "-e" "test_harness(0, 'blib/lib', 'blib/arch')" t/*.t t/after.t ..................... 1/8 Tcl::pTk::Error: Undefined subroutine &Tcl::_current_refs_widget called at /Users/sandy/Downloads/Tcl-pTk-0.90/blib/lib/Tcl/pTk/Widget.pm line 1214. while executing "::perl::CODE(0x7ff211520ea8)" ("after" script) Error Started at t/after.t line 36. Stack Trace: at /Users/sandy/Downloads/Tcl-pTk-0.90/blib/lib/Tcl/pTk.pm line 891. eval {...} called at /Users/sandy/Downloads/Tcl-pTk-0.90/blib/lib/Tcl/pTk.pm line 891 Tcl::pTk::DoOneEvent('Tcl::pTk=SCALAR(0x7ff211005e80)', 0) called at /Users/sandy/Downloads/Tcl-pTk-0.90/blib/lib/Tcl/pTk.pm line 869 Tcl::pTk::MainLoop() called at t/after.t line 36 t/after.t ..................... Failed 1/8 subtests t/afterDestroy.t .............. Undefined subroutine &Tcl::_current_refs_widget called at /Users/sandy/Downloads/Tcl-pTk-0.90/blib/lib/Tcl/pTk/Widget.pm line 1308. at t/afterDestroy.t line 15.