sources/a68k/Symtab.c

128     char *x;  in LineParts()  local
212 		x = (char *) SkipLim + sizeof (struct SkipEnt);  in LineParts()
213 		if (x > (char *) SetFixLim) {  in LineParts()
354     register char *s, *t, *x;  local
366 	x = s--;
368 	if (*x == '@') {	/* \@ - substitute macro number. */
369 	    x = t;
387 	if ((*x < '0') || (*x > '9')) {
403 	    x = InF->NPtr;
405 		x += strlen (x) + 1;
408 	    strcpy (t, x);		/* Insert it. */
428     register char *s, *x;  local
433 	x = Label;
435 	    *x++ = *s++;		/* Get the label. */
436 	*x-- = '\0';
437 	while (*x == ':') {
438 	    *x-- = '\0';		/* Strip trailing colon(s). */
439 	    if (x < Label)
449 	x = OpCode;
451 	    *x++ = *s++;		/* Get the opcode. */
452 	*x-- = '\0';
453 	if (*x == ':') {		/* It's actually a label. */
457 		while ((x >= OpCode) && (*x == ':'))
458 		    *x-- = '\0';
466     for (x = OpCode; *x; x++)		/* Convert OpCode  */
467 	*x = toupper(*x);		/*  to upper case. */
468     x -= 2;
470     x = OpCode + strlen(OpCode) - 2;
471     if ((x < OpCode) || (*x != '.'))	/* If no explicit size is given */
483 	*x++ = '\0';			/* Chop off size extension. */
484 	switch (toupper(*x)) {
496 	    Error (OpLoc+x-OpCode, SizeErr);	/* Invalid size */
635     Ops = (struct OpStack *) InF;		/* Operator stack */
636     Ops--;
638     Ops->chr = ' ';		/* Prime the operator stack. */
639     Ops->prec = -1;
640     if ((char *) Ops < Low2)
641 	Low2 = (char *) Ops;
661 	    Ops--;
663 	    Ops->chr  = '(';
664 	    Ops->prec = 1;
665 	    if ((char *) Ops < Low2)
666 		Low2 = (char *) Ops;
672 		Ops--;
682 		Ops->chr  = *o;		/* Now get the operator itself. */
683 		Ops->prec = 9;		/* Do it ASAP. */
684 		if ((char *) Ops < Low2)
685 		    Low2 = (char *) Ops;
732 	    if (Ops->chr == '(')
733 		Ops++;			/* Drop paired parentheses. */
735 		Ops--;
737 		Ops->chr  = ')';	/* Stack parenthesis for now. */
738 		Ops->prec = 2;
739 		if ((char *) Ops < Low2)
740 		    Low2 = (char *) Ops;
752 	    Ops--;
754 	    Ops->chr  = *o;		/* Stack the next operator. */
755 	    Ops->prec = nextprec;
756 	    if ((char *) Ops < Low2)
757 		Low2 = (char *) Ops;
785     while (Ops->prec >= newprec) {	/* Unstack an operator. */
787 	if (Ops->chr == '+') {		/* Relocatable addition */
794 	} else if (Ops->chr == '-') {		/* Subtraction */
812 	switch (Ops->chr) {		/* Perform the operation. */
865 	Ops++;
1357     if (((char *) Term + n) > (char *) Ops) {