|
DataMuseum.dkPresents historical artifacts from the history of: Commodore CBM-900 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Commodore CBM-900 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 1040 (0x410)
Types: TextFile
Notes: UNIX file
Names: »elog.c«
└─⟦f27320a65⟧ Bits:30001972 Commodore 900 hard disk image with partial source code
└─⟦2d53db1df⟧ UNIX V7 Filesystem
└─ ⟦this⟧ »sys/ker/elog.c«
/* (-lgl
* The information contained herein is a trade secret of Mark Williams
* Company, and is confidential information. It is provided under a
* license agreement, and may be copied or disclosed only under the
* terms of that agreement. Any reproduction or disclosure of this
* material without the express written authorization of Mark Williams
* Company or persuant to the license agreement is unlawful.
*
* COHERENT Version 0.7.3
* Copyright (c) 1982, 1983, 1984.
* An unpublished work by Mark Williams Company, Chicago.
* All rights reserved.
-lgl) */
/*
* Coherent - event/error logging facility.
*/
#include <coherent.h>
#define NEVENT 256
typedef struct {
char *e_event; /* Function pointer or whatever */
int e_time; /* Timer tick of event */
} EVENT;
EVENT events[NEVENT];
unsigned curevent = 0;
unsigned totevent = 0;
elog(eventp)
char *eventp;
{
register EVENT *ep;
totevent += 1;
ep = &events[curevent++];
curevent %= NEVENT;
ep->e_event = eventp;
ep->e_time = timer.t_time;
}