forked from KolibriOS/kolibrios
76 lines
1.2 KiB
C
76 lines
1.2 KiB
C
#ifndef INCLUDE_DEBUG_H
|
|
#define INCLUDE_DEBUG_H
|
|
#print "[include <debug.h>]\n"
|
|
|
|
#ifndef INCLUDE_STRING_H
|
|
#include "../lib/strings.h"
|
|
#endif
|
|
|
|
inline fastcall void debugch( ECX)
|
|
{
|
|
$push eax
|
|
$push ebx
|
|
$mov eax,63
|
|
$mov ebx,1
|
|
$int 0x40
|
|
$pop ebx
|
|
$pop eax
|
|
}
|
|
|
|
inline fastcall void debug( EDX)
|
|
{
|
|
$push eax
|
|
$push ebx
|
|
$push ecx
|
|
$mov eax, 63
|
|
$mov ebx, 1
|
|
NEXT_CHAR:
|
|
$mov ecx, DSDWORD[edx]
|
|
$or cl, cl
|
|
$jz DONE
|
|
$int 0x40
|
|
$inc edx
|
|
$jmp NEXT_CHAR
|
|
DONE:
|
|
$pop ecx
|
|
$pop ebx
|
|
$pop eax
|
|
}
|
|
|
|
inline fastcall void debugln( EDX)
|
|
{
|
|
debug( EDX);
|
|
debugch(10);
|
|
debugch(13);
|
|
}
|
|
|
|
inline void debugi(dword d_int)
|
|
{
|
|
char tmpch[12];
|
|
itoa_(#tmpch, d_int);
|
|
debugln(#tmpch);
|
|
}
|
|
|
|
:void debugval(dword text,number)
|
|
{
|
|
debug(text);
|
|
debug(": ");
|
|
debugi(number);
|
|
}
|
|
|
|
:void assert(dword _type, _actual, _expected)
|
|
{
|
|
char r[4096];
|
|
if (_type=='s') {
|
|
if (streq(_actual, _expected)) return;
|
|
sprintf(#r, "==========nok{\nactual: %s\nexpected: %s", _actual, _expected);
|
|
debugln(#r);
|
|
}
|
|
if (_type=='i') {
|
|
if (_actual == _expected)) return;
|
|
sprintf(#r, "==========nok{\nactual: %i\nexpected: %i", _actual, _expected);
|
|
debugln(#r);
|
|
}
|
|
}
|
|
|
|
#endif |