fix aTHX