NetBSD/dist/cdk/debug.c
garbled 5940edcfb4 Initial import of CDK 4.9.9. The work to port this was performed by
Charles Hannum, and that is the version being imported:
cdk-4.9.9-20000407-myc3
2001-01-04 19:57:58 +00:00

51 lines
858 B
C

#include <cdk.h>
/*
* $Author: garbled $
* $Date: 2001/01/04 19:58:14 $
* $Revision: 1.1.1.1 $
*/
FILE *CDKDEBUG;
/*
* This starts debugging for CDK.
*/
FILE *startCDKDebug (char *filename)
{
char *defFile = "cdkdebug.log";
/* Check if the filename is null. */
if (filename == 0)
{
filename = defFile;
}
/* Try to open the file. */
return ( fopen (filename, "w") );
}
/*
* This writes a message to the debug file.
*/
void writeCDKDebugMessage (FILE *fd, char *filename, char *function, int line, char *message)
{
/* Print the message as long as the file pointer is not null. */
if (fd != 0)
{
fprintf (fd, "%s::%s (Line %d) %s\n", filename, function, line, message);
}
}
/*
* This turns off the debugging for CDK.
*/
void stopCDKDebug (FILE *fd)
{
if (fd != 0)
{
fclose (fd);
}
}