str TRNglobal_abort(bit *ret) { TMabort(); *ret = TRUE; return MAL_SUCCEED; }
str TRNglobal_abort(bit *ret) { *ret = TMabort()?FALSE:TRUE; return MAL_SUCCEED; }
str TRNglobal_abort(bit *ret) { *ret = TMabort() == GDK_SUCCEED; return MAL_SUCCEED; }