|
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: 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); }