LIB "tst.lib"; tst_init();
  package Test;
  int i; exportto(Test,i);
  listvar();
  listvar(Test);
  package dummy = Test;
  kill Test;
  listvar(dummy);
tst_status(1);$