|
|
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 - metrics - download
Length: 1486 (0x5ce)
Types: TextFile
Notes: UNIX file
Names: »main.c«
└─⟦f27320a65⟧ Bits:30001972 Commodore 900 hard disk image with partial source code
└─⟦2d53db1df⟧ UNIX Filesystem
└─⟦this⟧ »sys/coh/main.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.
*/
#include <coherent.h>
#include <proc.h>
#include <seg.h>
#include <uproc.h>
#ifndef VERSION /* This should be specified at compile time */
#define VERSION "..."
#endif
/*
* Initialise various things. When we return we will return to user mode.
*/
char version[] = VERSION;
char copyright[] = "(c) 1982 - 1985 Mark Williams Company, Chicago\n";
main()
{
register SEG *sp;
u.u_error = 0;
bufinit();
cltinit();
pcsinit();
seginit();
devinit();
printf("\rCoherent (%uK, %u) Version %s\n", msize, asize, version);
/*
* Turn on clock, start off processes, mount root device
* and return.
*/
batflag = 1;
if ((sp=salloc((size_t)UPASIZE, SFSYST|SFNCLR|SFNSWP)) == NULL)
panic("Cannot allocate user area");
if ((iprocp=process(idle))==NULL || (eprocp=process(NULL))==NULL)
panic("Cannot create process");
eveinit(sp);
fsminit();
printf(copyright);
}