From b2221023d38c7988aa0c6db830062b96f84354b2 Mon Sep 17 00:00:00 2001 From: Mark Mitchell Date: Wed, 11 Aug 2004 02:11:58 +0000 Subject: [PATCH] * expr.c (operand): Handle the "~", "-", and "!" operators applied to bignums. * gas/arm/bignum1.s: New test. * gas/arm/arm.exp: Run it. --- gas/ChangeLog | 5 +++++ gas/expr.c | 29 +++++++++++++++++++++++++++++ gas/testsuite/ChangeLog | 5 +++++ gas/testsuite/gas/arm/arm.exp | 1 + gas/testsuite/gas/arm/bignum1.s | 1 + 5 files changed, 41 insertions(+) create mode 100644 gas/testsuite/gas/arm/bignum1.s diff --git a/gas/ChangeLog b/gas/ChangeLog index 4361aa3a16b..bbd1ec23060 100644 --- a/gas/ChangeLog +++ b/gas/ChangeLog @@ -1,3 +1,8 @@ +2004-08-10 Mark Mitchell + + * expr.c (operand): Handle the "~", "-", and "!" operators applied + to bignums. + 2004-08-06 Paul Brook * config/tc-arm.c (md_apply_fix3, tc_gen_reloc, arm_parse_reloc): diff --git a/gas/expr.c b/gas/expr.c index d520a04bcd3..460a8372dd2 100644 --- a/gas/expr.c +++ b/gas/expr.c @@ -1076,6 +1076,35 @@ operand (expressionS *expressionP) else generic_floating_point_number.sign = 'N'; } + else if (expressionP->X_op == O_big + && expressionP->X_add_number > 0) + { + int i; + + if (c == '~' || c == '-') + { + for (i = 0; i < expressionP->X_add_number; ++i) + generic_bignum[i] = ~generic_bignum[i]; + if (c == '-') + for (i = 0; i < expressionP->X_add_number; ++i) + { + generic_bignum[i] += 1; + if (generic_bignum[i]) + break; + } + } + else if (c == '!') + { + int nonzero = 0; + for (i = 0; i < expressionP->X_add_number; ++i) + { + if (generic_bignum[i]) + nonzero = 1; + generic_bignum[i] = 0; + } + generic_bignum[0] = nonzero; + } + } else if (expressionP->X_op != O_illegal && expressionP->X_op != O_absent) { diff --git a/gas/testsuite/ChangeLog b/gas/testsuite/ChangeLog index f91cf6d1b16..e61fd49f047 100644 --- a/gas/testsuite/ChangeLog +++ b/gas/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2004-08-10 Mark Mitchell + + * gas/arm/bignum1.s: New test. + * gas/arm/arm.exp: Run it. + 2004-08-06 Paul Brook * gas/arm/pic.s,d: Test RELABS and SBREL relocations. diff --git a/gas/testsuite/gas/arm/arm.exp b/gas/testsuite/gas/arm/arm.exp index 36045e6c1ef..1681ab984c2 100644 --- a/gas/testsuite/gas/arm/arm.exp +++ b/gas/testsuite/gas/arm/arm.exp @@ -35,6 +35,7 @@ if {[istarget *arm*-*-*] || [istarget "xscale-*-*"]} then { gas_test "immed.s" "" $stdoptlist "immediate expressions" gas_test "float.s" "-mcpu=arm7tdmi -mfpu=fpa" $stdoptlist "Core floating point instructions" gas_test "offset.s" "" $stdoptlist "OFFSET_IMM regression" + gas_test "bignum1.s" "" $stdoptlist "bignums" run_dump_test "armv1" run_dump_test "arch5tej" diff --git a/gas/testsuite/gas/arm/bignum1.s b/gas/testsuite/gas/arm/bignum1.s new file mode 100644 index 00000000000..3c45d23ff51 --- /dev/null +++ b/gas/testsuite/gas/arm/bignum1.s @@ -0,0 +1 @@ + .8byte -9223372036854775808 -- 2.30.2