mirror of
https://github.com/open-simh/simtools.git
synced 2026-01-26 20:21:45 +00:00
Expand some tabs that crept in over time.
This commit is contained in:
@@ -469,17 +469,17 @@ void mode_extension(
|
|||||||
|
|
||||||
if (value->type == EX_LIT) {
|
if (value->type == EX_LIT) {
|
||||||
if (mode->rel) { /* PC-relative? */
|
if (mode->rel) { /* PC-relative? */
|
||||||
if (current_pc->section->flags & PSECT_REL) {
|
if (current_pc->section->flags & PSECT_REL) {
|
||||||
store_displaced_word(str, tr, 2, value->data.lit);
|
store_displaced_word(str, tr, 2, value->data.lit);
|
||||||
} else {
|
} else {
|
||||||
/* I can compute this myself. */
|
/* I can compute this myself. */
|
||||||
store_word(str, tr, 2, value->data.lit - DOT - 2);
|
store_word(str, tr, 2, value->data.lit - DOT - 2);
|
||||||
}
|
}
|
||||||
} else {
|
} else {
|
||||||
store_word(str, tr, 2, value->data.lit); /* Just a
|
store_word(str, tr, 2, value->data.lit); /* Just a
|
||||||
known
|
known
|
||||||
value. */
|
value. */
|
||||||
}
|
}
|
||||||
} else if (express_sym_offset(value, &sym, &offset)) {
|
} else if (express_sym_offset(value, &sym, &offset)) {
|
||||||
if ((sym->flags & (SYMBOLFLAG_GLOBAL | SYMBOLFLAG_DEFINITION)) == SYMBOLFLAG_GLOBAL) {
|
if ((sym->flags & (SYMBOLFLAG_GLOBAL | SYMBOLFLAG_DEFINITION)) == SYMBOLFLAG_GLOBAL) {
|
||||||
/* Reference to a global symbol. */
|
/* Reference to a global symbol. */
|
||||||
|
|||||||
@@ -24,7 +24,7 @@ int last_locsym = 32768; /* The last local symbol number generate
|
|||||||
|
|
||||||
int enabl_debug = 0; /* Whether assembler debugging is enabled */
|
int enabl_debug = 0; /* Whether assembler debugging is enabled */
|
||||||
|
|
||||||
int opt_enabl_ama = 0; /* May be changed by command line */
|
int opt_enabl_ama = 0; /* May be changed by command line */
|
||||||
int enabl_ama; /* When set, chooses absolute (037) versus
|
int enabl_ama; /* When set, chooses absolute (037) versus
|
||||||
PC-relative */
|
PC-relative */
|
||||||
/* (067) addressing mode */
|
/* (067) addressing mode */
|
||||||
|
|||||||
@@ -35,7 +35,7 @@ extern int last_locsym; /* The last local symbol number generated */
|
|||||||
|
|
||||||
extern int enabl_debug; /* Whether assembler debugging is enabled */
|
extern int enabl_debug; /* Whether assembler debugging is enabled */
|
||||||
|
|
||||||
extern int opt_enabl_ama; /* May be changed by command line */
|
extern int opt_enabl_ama; /* May be changed by command line */
|
||||||
|
|
||||||
extern int enabl_ama; /* When set, chooses absolute (037) versus
|
extern int enabl_ama; /* When set, chooses absolute (037) versus
|
||||||
PC-relative */
|
PC-relative */
|
||||||
|
|||||||
4
extree.h
4
extree.h
@@ -32,9 +32,9 @@ typedef struct ex_tree {
|
|||||||
EX_AND = 12,
|
EX_AND = 12,
|
||||||
/* bitwise and */
|
/* bitwise and */
|
||||||
EX_OR = 13,
|
EX_OR = 13,
|
||||||
/* bitwise or */
|
/* bitwise or */
|
||||||
EX_LSH = 14
|
EX_LSH = 14
|
||||||
/* left shift */
|
/* left shift */
|
||||||
} type;
|
} type;
|
||||||
|
|
||||||
char *cp; /* points to end of parsed expression */
|
char *cp; /* points to end of parsed expression */
|
||||||
|
|||||||
@@ -63,7 +63,7 @@ static void enable_tf(
|
|||||||
if (strcmp(opt, "AMA") == 0)
|
if (strcmp(opt, "AMA") == 0)
|
||||||
opt_enabl_ama = tf;
|
opt_enabl_ama = tf;
|
||||||
else if (strcmp(opt, "GBL") == 0)
|
else if (strcmp(opt, "GBL") == 0)
|
||||||
enabl_gbl = tf; /* Unused in pass 2 */
|
enabl_gbl = tf; /* Unused in pass 2 */
|
||||||
else if (strcmp(opt, "ME") == 0)
|
else if (strcmp(opt, "ME") == 0)
|
||||||
list_me = tf;
|
list_me = tf;
|
||||||
else if (strcmp(opt, "BEX") == 0)
|
else if (strcmp(opt, "BEX") == 0)
|
||||||
|
|||||||
4
parse.h
4
parse.h
@@ -8,8 +8,8 @@
|
|||||||
|
|
||||||
// is char 'c' part of a symbol?
|
// is char 'c' part of a symbol?
|
||||||
#define issym(c) (isalpha(c) || isdigit(c) \
|
#define issym(c) (isalpha(c) || isdigit(c) \
|
||||||
|| (c) == '.' || (c) == '$' \
|
|| (c) == '.' || (c) == '$' \
|
||||||
|| (symbol_allow_underscores && (c) == '_'))
|
|| (symbol_allow_underscores && (c) == '_'))
|
||||||
|
|
||||||
|
|
||||||
char *skipwhite(
|
char *skipwhite(
|
||||||
|
|||||||
Reference in New Issue
Block a user