Linux_C_12/cdebug_121.c


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39

/********************************************************************************************
    Clean OS Windows library module version 1.2.1.
    This module is part of the Clean Object I/O library, version 1.2.1,
    for the Windows platform.
********************************************************************************************/

/********************************************************************************************
    About this module:
    Routines useful for debugging.
********************************************************************************************/
#include "cdebug_121.h"
#include "time.h"

int Rand (void)
{
    static int holdrand;
    static int randinited = 0;
    printf("Rand\n");

    if (!randinited)
    {
        holdrand = (int) 0; //GetTickCount ();
        randinited = -1;
    }

    holdrand = holdrand * 214013 + 2531011;

    return ((holdrand >> 16) & 0x7fff);
}

OS ConsolePrint (CLEAN_STRING cleanstr, OS os)
{
    char *cstr;
    printf("ConsolePrint\n");

    cstr = cstring (cleanstr);
    rprintf (cstr);
    return os;
}