diff options
author | Timothy Wall <twall@alum.mit.edu> | 2000-02-08 14:13:57 +0000 |
---|---|---|
committer | Timothy Wall <twall@alum.mit.edu> | 2000-02-08 14:13:57 +0000 |
commit | 3fd9f0476f43c574b3525132a372f4960efc0a1b (patch) | |
tree | 2ecdff1ca8f91ba0d9ecd4def96bbe9d926ad4da /gas/cond.c | |
parent | 08ccce320647e30448a6b94e87ef89a977fc84dc (diff) | |
download | fsf-binutils-gdb-3fd9f0476f43c574b3525132a372f4960efc0a1b.zip fsf-binutils-gdb-3fd9f0476f43c574b3525132a372f4960efc0a1b.tar.gz fsf-binutils-gdb-3fd9f0476f43c574b3525132a372f4960efc0a1b.tar.bz2 |
New elseif directive has been added.
Diffstat (limited to 'gas/cond.c')
-rw-r--r-- | gas/cond.c | 80 |
1 files changed, 80 insertions, 0 deletions
@@ -247,6 +247,86 @@ s_ifc (arg) } void +s_elseif (arg) + int arg; +{ + expressionS operand; + int t; + + if (current_cframe == NULL) + { + as_bad (_("\".elseif\" without matching \".if\" - ignored")); + + } + else if (current_cframe->else_seen) + { + as_bad (_("\".elseif\" after \".else\" - ignored")); + as_bad_where (current_cframe->else_file_line.file, + current_cframe->else_file_line.line, + _("here is the previous \"else\"")); + as_bad_where (current_cframe->if_file_line.file, + current_cframe->if_file_line.line, + _("here is the previous \"if\"")); + } + else + { + as_where (¤t_cframe->else_file_line.file, + ¤t_cframe->else_file_line.line); + + if (!current_cframe->dead_tree) + { + current_cframe->ignoring = !current_cframe->ignoring; + if (LISTING_SKIP_COND ()) + { + if (! current_cframe->ignoring) + listing_list (1); + else + listing_list (2); + } + } /* if not a dead tree */ + } /* if error else do it */ + + + SKIP_WHITESPACE (); /* Leading whitespace is part of operand. */ + + if (current_cframe != NULL && current_cframe->ignoring) + { + operand.X_add_number = 0; + while (! is_end_of_line[(unsigned char) *input_line_pointer]) + ++input_line_pointer; + } + else + { + expression (&operand); + if (operand.X_op != O_constant) + as_bad (_("non-constant expression in \".elseif\" statement")); + } + + switch ((operatorT) arg) + { + case O_eq: t = operand.X_add_number == 0; break; + case O_ne: t = operand.X_add_number != 0; break; + case O_lt: t = operand.X_add_number < 0; break; + case O_le: t = operand.X_add_number <= 0; break; + case O_ge: t = operand.X_add_number >= 0; break; + case O_gt: t = operand.X_add_number > 0; break; + default: + abort (); + return; + } + + current_cframe->ignoring = current_cframe->dead_tree || ! t; + + if (LISTING_SKIP_COND () + && current_cframe->ignoring + && (current_cframe->previous_cframe == NULL + || ! current_cframe->previous_cframe->ignoring)) + listing_list (2); + + demand_empty_rest_of_line (); +} + +void s_endif (arg) int arg ATTRIBUTE_UNUSED; { |