Skip to content

Commit fc3908f

Browse files
waywardmonkeyswaywardmonkeys
authored
Fix typos. (#157)
1 parent b31ac48 commit fc3908f

14 files changed

+25
-25
lines changed

‎inc/inlnPS2.h

+1-1
Original file line numberDiff line numberDiff line change
@@ -47,7 +47,7 @@
4747
/* ebx tscache - the top-of-stack item. */
4848
/* */
4949
/* */
50-
/* Rgister conventions within arithmetic functions in the files */
50+
/* Register conventions within arithmetic functions in the files */
5151
/* arith2.c - arith4.c, etc.: */
5252
/* */
5353
/* esi first argument to the function */

‎inc/inlndos.h

+1-1
Original file line numberDiff line numberDiff line change
@@ -47,7 +47,7 @@
4747
/* ebx tscache - the top-of-stack item. */
4848
/* */
4949
/* */
50-
/* Rgister conventions within arithmetic functions in the files */
50+
/* Register conventions within arithmetic functions in the files */
5151
/* arith2.c - arith4.c, etc.: */
5252
/* */
5353
/* esi first argument to the function */

‎inc/lsptypes.h

+3-3
Original file line numberDiff line numberDiff line change
@@ -369,7 +369,7 @@ typedef struct{
369369
/****************************************************************/
370370

371371
#define GETBYTE(base) (* (base))
372-
/* GETBASEWORD only works if base points to a 32-bit bounday */
372+
/* GETBASEWORD only works if base points to a 32-bit boundary */
373373
#define GETBASEWORD(base, offset) (* ((base)+(offset)))
374374
/* GETWORDBASEWORD works right with base on a 16-bit boundary. */
375375
#define GETWORDBASEWORD(base, offset) (* (((DLword *)(base))+(offset)))
@@ -572,7 +572,7 @@ typedef struct
572572
/****************************************************************/
573573

574574
#define GETBYTE(base) (* (unsigned char *) (3^(UNSIGNED)(base)))
575-
/* GETBASEWORD only works if base points to a 32-bit bounday */
575+
/* GETBASEWORD only works if base points to a 32-bit boundary */
576576
#define GETBASEWORD(base, offset) GETWORDBASEWORD((base),(offset))
577577
#define GETWORDBASEWORD(base, offset) (* (DLword *) (2^(UNSIGNED)((base)+(offset))))
578578
#define GETWORD(base) (* (DLword *) (2^(UNSIGNED)(base)))
@@ -625,7 +625,7 @@ typedef struct
625625
#define GetTypeEntry(address) ( GETWORD(MDStypetbl+((address)>>9)) )
626626

627627
#else
628-
/* Because the 386i's code generator does bettter with them */
628+
/* Because the 386i's code generator does better with them */
629629
/* in this order (does an add, rather than mov-add) */
630630
/* JDS 22-mar-90 */
631631

‎src/dir.c

+2-2
Original file line numberDiff line numberDiff line change
@@ -343,7 +343,7 @@ void print_finfo(FINFO *fp)
343343
*
344344
* Argument: None.
345345
*
346-
* Value: If suceed, returns 1, otherwise 0.
346+
* Value: If succeed, returns 1, otherwise 0.
347347
*
348348
* Side Effect: FreeFinfoList will point to the alloced area. MAXFINFO will hold
349349
* the total number of allocated instances of FINFO structure.
@@ -386,7 +386,7 @@ int init_finfo() {
386386
*
387387
* Argument: None.
388388
*
389-
* Value: If suceed, returns the id of linked list of FINFO structures,
389+
* Value: If succeed, returns the id of linked list of FINFO structures,
390390
* otherwise -1.
391391
*
392392
* Side Effect: If needed, FinfoArray will be extended according to the value of

‎src/dsk.c

+1-1
Original file line numberDiff line numberDiff line change
@@ -3366,7 +3366,7 @@ static int get_versionless(FileName *varray, char *file, char *dir)
33663366
* to which the versionless file is hard linked will
33673367
* be stored.
33683368
* int *highest_p
3369-
* If to_file is the highest versioned file in varrray,
3369+
* If to_file is the highest versioned file in varray,
33703370
* highest_p will point to 1, otherwise, 0.
33713371
*
33723372
* Value: If succeed, returns 1, otherwise, 0.

‎src/gcmain3.c

+1-1
Original file line numberDiff line numberDiff line change
@@ -27,7 +27,7 @@
2727
/* */
2828
/* */
2929
/*************************************************************************/
30-
/* Descreption : */
30+
/* Description : */
3131
/* */
3232
/*************************************************************************/
3333
/* \Tomtom */

‎src/gcoflow.c

+1-1
Original file line numberDiff line numberDiff line change
@@ -21,7 +21,7 @@
2121
/* gcmaptable(arg); */
2222
/* */
2323
/*************************************************************************/
24-
/* Descreption : */
24+
/* Description : */
2525
/* */
2626
/*************************************************************************/
2727
/* \Tomtom */

‎src/gcr.c

+3-3
Original file line numberDiff line numberDiff line change
@@ -27,8 +27,8 @@
2727
/* This function's role is narrowing the gap between the */
2828
/* contextswitch and the subrcall. */
2929
/* In the original Lisp Source, as the contextswitch process may */
30-
/* clear the remain area to FSB,there is no problem in scannig stack*/
31-
/* .But in the subrcall,there isn't such process. */
30+
/* clear the remain area to FSB, there is no problem in scanning */
31+
/* stack. But in the subrcall,there isn't such process. */
3232
/* Therefore, the function is required to set the remain stack area */
3333
/* to FSB. And this function does so. */
3434
/* dogc01() */
@@ -112,7 +112,7 @@ void gcarrangementstack(void) {
112112
/****************************************************************/
113113
/* The following function is the caller that is the reclaimer. */
114114
/* And, this function is same as \DOGC1 in Lisp because in the */
115-
/* C's implimentation the contextswitch is not required for the */
115+
/* C's implementation the contextswitch is not required for the */
116116
/* remaining the system status. */
117117
/****************************************************************/
118118

‎src/gcrcell.c

+1-1
Original file line numberDiff line numberDiff line change
@@ -27,7 +27,7 @@
2727
/* */
2828
/* */
2929
/*************************************************************************/
30-
/* Descreption : */
30+
/* Description : */
3131
/* */
3232
/* The functions "gcreccell" and "freelistcell" are the translated */
3333
/* functions from the Lisp functions "\GCRECLAIMCELL" that is the UFN */

‎src/gcscan.c

+2-2
Original file line numberDiff line numberDiff line change
@@ -26,7 +26,7 @@
2626
/* gcscan2(probe) */
2727
/* */
2828
/*************************************************************************/
29-
/* Descreption : */
29+
/* Description : */
3030
/* */
3131
/* The functions "gcscan1" and "gcscan2" are the translated functions */
3232
/* from the Lisp Functions "\GCSCAN1" & "\GCSCAN2". */
@@ -36,7 +36,7 @@
3636
/* by OPCODES "GCSCAN1" & "GCSCAN2". */
3737
/* */
3838
/* gcscan1 */
39-
/* INPUT : probe (the startng offset in the HTmain table) */
39+
/* INPUT : probe (the starting offset in the HTmain table) */
4040
/* OUTPUT : the entry's offset or NIL (no more entry existing) */
4141
/* */
4242
/* gcscan2 */

‎src/loopsops.c

+1-1
Original file line numberDiff line numberDiff line change
@@ -352,7 +352,7 @@ LispPTR lcfuncall(register unsigned int atom_index, register int argnum, registe
352352
int rest; /* use for arignments */
353353
register CClosure *closure68k;
354354

355-
if (atom_index == 0xffffffff) error("Loops punt to nonexistant fn");
355+
if (atom_index == 0xffffffff) error("Loops punt to nonexistent fn");
356356

357357
/* Get Next Block offset from argnum */
358358
CURRENTFX->nextblock = (LADDR_from_68k(CurrentStackPTR) & 0x0ffff) - (argnum << 1) + 4 /* +3 */;

‎src/ocr.c

+6-6
Original file line numberDiff line numberDiff line change
@@ -292,7 +292,7 @@ int ocr_comm(LispPTR *args)
292292
/*
293293
* Subr OCR_COMM: comm = OCR_OPEN
294294
*
295-
* Fork OCR process and isssue 'O' command to open OCR device.
295+
* Fork OCR process and issue 'O' command to open OCR device.
296296
*/
297297

298298
static int ocr_open() {
@@ -485,7 +485,7 @@ static void ocr_close() {
485485
/*
486486
* Subr OCR_COMM: comm = OCR_SCAN
487487
*
488-
* Issue 'S' command to start scanning. 'S' commmand returns immediatedly
488+
* Issue 'S' command to start scanning. 'S' command returns immediately
489489
* without waiting device to finish scanning.
490490
*/
491491

@@ -525,7 +525,7 @@ static int ocr_scan(sp) struct ocr_scan_para *sp;
525525
* Subr OCR_COMM: comm = OCR_IMG_INFO
526526
*
527527
* Issue 'I' command to get an information about the image being uploaded.
528-
* 'I' commmand returns immediatedly without waiting OCR process to
528+
* 'I' command returns immediately without waiting OCR process to
529529
* finish its work.
530530
*/
531531

@@ -642,7 +642,7 @@ static int ocr_clr_rpara() {
642642
* Subr OCR_COMM: comm = OCR_READ
643643
*
644644
* Issue 'R' command to start reading.
645-
* 'R' commmand returns immediatedly without waiting OCR process to
645+
* 'R' command returns immediately without waiting OCR process to
646646
* finish its work.
647647
*/
648648

@@ -677,7 +677,7 @@ static int ocr_read() {
677677
* SIGUSR1 handler.
678678
*
679679
* If one of time consuming work is finished by OCR process, SIGUSR1 is signalled.
680-
* Accoding to the waiting reason, do appropriate work, then to notify Lisp.
680+
* According to the waiting reason, do appropriate work, then to notify Lisp.
681681
*/
682682

683683
static void ocr_sig_handler(sig, code, scp) int sig, code;
@@ -811,7 +811,7 @@ static void ocr_read_finish() {
811811
}
812812

813813
/*
814-
* Set up the interrupt stuff and issue a requst.
814+
* Set up the interrupt stuff and issue a request.
815815
*/
816816

817817
static void ocr_irq() {

‎src/unixcomm.c

+1-1
Original file line numberDiff line numberDiff line change
@@ -321,7 +321,7 @@ int FindAvailablePty(char *Master, char *Slave) {
321321
grantpt(res);
322322
unlockpt(res);
323323
strcpy(Slave, ptsname(res));
324-
DBPRINT(("slave pyt name is %s.\n", Slave));
324+
DBPRINT(("slave pty name is %s.\n", Slave));
325325
#else
326326

327327
/* From p to r */

‎src/uutils.c

+1-1
Original file line numberDiff line numberDiff line change
@@ -214,7 +214,7 @@ LispPTR unix_username(LispPTR *args) {
214214
* and so did PowerBook Macintosh systems.
215215
* "MACH" and "ARCH" both seem to be a mix of instruction set architecture and
216216
* system types (rs/6000 used PowerPC).
217-
* The only usage seems to be checking "ARCH" == "dos" and for the existance
217+
* The only usage seems to be checking "ARCH" == "dos" and for the existence
218218
* of *any* result from the call, which indicates it's an emulated system.
219219
*/
220220
LispPTR unix_getparm(LispPTR *args) {

0 commit comments

Comments
 (0)