Пример #1
0
//
//  Make_OS_Error: C
//
void Make_OS_Error(REBVAL *out, int errnum)
{
    REBCHR str[100];

    OS_FORM_ERROR(errnum, str, 100);
    Val_Init_String(out, Copy_OS_Str(str, OS_STRLEN(str)));
}
Пример #2
0
*/	REBVAL *Make_OS_Error()
/*
***********************************************************************/
{
	REBCHR str[100];

	OS_FORM_ERROR(0, str, 100);
	Set_String(DS_RETURN, Copy_OS_Str(str, LEN_STR(str)));
	return DS_RETURN;
}