function _string (num) %{
    sprintf (THIS->__retvalue, "%lld", (long long) THIS->num);
%}

function string (num) {
    return "" . _string (num + 0)
}