void
QAErrorMessage(error_code)
    CASE:
        int     err_code
    PREINIT:
        int     bufflen = 256;
        char    ret_error[bufflen];
    PPCODE:
    {
         QAErrorMessage(err_code, ret_error, bufflen);
         XPUSHs(sv_2mortal( newSVpvn(ret_error,bufflen) ));
    }