js/src/tests/ecma/Expressions/11.13.2-3.js

   1 /* -*- Mode: C++; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
   2 /* ***** BEGIN LICENSE BLOCK *****
   3  * Version: MPL 1.1/GPL 2.0/LGPL 2.1
   4  *
   5  * The contents of this file are subject to the Mozilla Public License Version
   6  * 1.1 (the "License"); you may not use this file except in compliance with
   7  * the License. You may obtain a copy of the License at
   8  * http://www.mozilla.org/MPL/
   9  *
  10  * Software distributed under the License is distributed on an "AS IS" basis,
  11  * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
  12  * for the specific language governing rights and limitations under the
  13  * License.
  14  *
  15  * The Original Code is Mozilla Communicator client code, released
  16  * March 31, 1998.
  17  *
  18  * The Initial Developer of the Original Code is
  19  * Netscape Communications Corporation.
  20  * Portions created by the Initial Developer are Copyright (C) 1998
  21  * the Initial Developer. All Rights Reserved.
  22  *
  23  * Contributor(s):
  24  *
  25  * Alternatively, the contents of this file may be used under the terms of
  26  * either the GNU General Public License Version 2 or later (the "GPL"), or
  27  * the GNU Lesser General Public License Version 2.1 or later (the "LGPL"),
  28  * in which case the provisions of the GPL or the LGPL are applicable instead
  29  * of those above. If you wish to allow use of your version of this file only
  30  * under the terms of either the GPL or the LGPL, and not to allow others to
  31  * use your version of this file under the terms of the MPL, indicate your
  32  * decision by deleting the provisions above and replace them with the notice
  33  * and other provisions required by the GPL or the LGPL. If you do not delete
  34  * the provisions above, a recipient may use your version of this file under
  35  * the terms of any one of the MPL, the GPL or the LGPL.
  36  *
  37  * ***** END LICENSE BLOCK ***** */
  38
  39
  40 /**
  41    File Name:          11.13.2-4.js
  42    ECMA Section:       11.13.2 Compound Assignment: %=
  43    Description:
  44
  45    *= /= %= += -= <<= >>= >>>= &= ^= |=
  46
  47    11.13.2 Compound assignment ( op= )
  48
  49    The production AssignmentExpression :
  50    LeftHandSideExpression @ = AssignmentExpression, where @ represents one of
  51    the operators indicated above, is evaluated as follows:
  52
  53    1.  Evaluate LeftHandSideExpression.
  54    2.  Call GetValue(Result(1)).
  55    3.  Evaluate AssignmentExpression.
  56    4.  Call GetValue(Result(3)).
  57    5.  Apply operator @ to Result(2) and Result(4).
  58    6.  Call PutValue(Result(1), Result(5)).
  59    7.  Return Result(5).
  60
  61    Author:             christine@netscape.com
  62    Date:               12 november 1997
  63 */
  64 var SECTION = "11.13.2-3";
  65 var VERSION = "ECMA_1";
  66 startTest();
  67
  68 writeHeaderToLog( SECTION + " Compound Assignment: +=");
  69
  70 // If either operand is NaN,  result is NaN
  71
  72 new TestCase( SECTION,
  73               "VAR1 = NaN; VAR2=1; VAR1 %= VAR2",
  74               Number.NaN,
  75               eval("VAR1 = Number.NaN; VAR2=1; VAR1 %= VAR2") );
  76
  77 new TestCase( SECTION,
  78               "VAR1 = NaN; VAR2=1; VAR1 %= VAR2; VAR1",
  79               Number.NaN,
  80               eval("VAR1 = Number.NaN; VAR2=1; VAR1 %= VAR2; VAR1") );
  81
  82 new TestCase( SECTION,
  83               "VAR1 = NaN; VAR2=0; VAR1 %= VAR2",
  84               Number.NaN,
  85               eval("VAR1 = Number.NaN; VAR2=0; VAR1 %= VAR2") );
  86
  87 new TestCase( SECTION,
  88               "VAR1 = NaN; VAR2=0; VAR1 %= VAR2; VAR1",
  89               Number.NaN,
  90               eval("VAR1 = Number.NaN; VAR2=0; VAR1 %= VAR2; VAR1") );
  91
  92 new TestCase( SECTION,
  93               "VAR1 = 0; VAR2=NaN; VAR1 %= VAR2",
  94               Number.NaN,
  95               eval("VAR1 = 0; VAR2=Number.NaN; VAR1 %= VAR2") );
  96
  97 new TestCase( SECTION,
  98               "VAR1 = 0; VAR2=NaN; VAR1 %= VAR2; VAR1",
  99               Number.NaN,
 100               eval("VAR1 = 0; VAR2=Number.NaN; VAR1 %= VAR2; VAR1") );
 101
 102 // if the dividend is infinity or the divisor is zero or both, the result is NaN
 103
 104 new TestCase( SECTION,
 105               "VAR1 = Infinity; VAR2= Infinity; VAR1 %= VAR2; VAR1",
 106               Number.NaN,
 107               eval("VAR1 = Number.POSITIVE_INFINITY; VAR2 = Number.POSITIVE_INFINITY; VAR1 %= VAR2; VAR1") );
 108
 109 new TestCase( SECTION,
 110               "VAR1 = Infinity; VAR2= -Infinity; VAR1 %= VAR2; VAR1",
 111               Number.NaN,
 112               eval("VAR1 = Number.POSITIVE_INFINITY; VAR2 = Number.NEGATIVE_INFINITY; VAR1 %= VAR2; VAR1") );
 113
 114 new TestCase( SECTION,
 115               "VAR1 =-Infinity; VAR2= Infinity; VAR1 %= VAR2; VAR1",
 116               Number.NaN,
 117               eval("VAR1 = Number.NEGATIVE_INFINITY; VAR2 = Number.POSITIVE_INFINITY; VAR1 %= VAR2; VAR1") );
 118
 119 new TestCase( SECTION,
 120               "VAR1 =-Infinity; VAR2=-Infinity; VAR1 %= VAR2; VAR1",
 121               Number.NaN,
 122               eval("VAR1 = Number.NEGATIVE_INFINITY; VAR2 = Number.NEGATIVE_INFINITY; VAR1 %= VAR2; VAR1") );
 123
 124 new TestCase( SECTION,
 125               "VAR1 = 0; VAR2= Infinity; VAR2 %= VAR1",
 126               Number.NaN,
 127               eval("VAR1 = 0; VAR2 = Number.POSITIVE_INFINITY; VAR2 %= VAR1; VAR2") );
 128
 129 new TestCase( SECTION,
 130               "VAR1 = -0; VAR2= Infinity; VAR2 %= VAR1",
 131               Number.NaN,
 132               eval("VAR1 = -0; VAR2 = Number.POSITIVE_INFINITY; VAR2 %= VAR1; VAR2") );
 133
 134 new TestCase( SECTION,
 135               "VAR1 = -0; VAR2= -Infinity; VAR2 %= VAR1",
 136               Number.NaN,
 137               eval("VAR1 = -0; VAR2 = Number.NEGATIVE_INFINITY; VAR2 %= VAR1; VAR2") );
 138
 139 new TestCase( SECTION,
 140               "VAR1 = 0; VAR2= -Infinity; VAR2 %= VAR1",
 141               Number.NaN,
 142               eval("VAR1 = 0; VAR2 = Number.NEGATIVE_INFINITY; VAR2 %= VAR1; VAR2") );
 143
 144 new TestCase( SECTION,
 145               "VAR1 = 1; VAR2= Infinity; VAR2 %= VAR1",
 146               Number.NaN,
 147               eval("VAR1 = 1; VAR2 = Number.POSITIVE_INFINITY; VAR2 %= VAR1; VAR2") );
 148
 149 new TestCase( SECTION,
 150               "VAR1 = -1; VAR2= Infinity; VAR2 %= VAR1",
 151               Number.NaN,
 152               eval("VAR1 = -1; VAR2 = Number.POSITIVE_INFINITY; VAR2 %= VAR1; VAR2") );
 153
 154 new TestCase( SECTION,
 155               "VAR1 = -1; VAR2= -Infinity; VAR2 %= VAR1",
 156               Number.NaN,
 157               eval("VAR1 = -1; VAR2 = Number.NEGATIVE_INFINITY; VAR2 %= VAR1; VAR2") );
 158
 159 new TestCase( SECTION,
 160               "VAR1 = 1; VAR2= -Infinity; VAR2 %= VAR1",
 161               Number.NaN,
 162               eval("VAR1 = 1; VAR2 = Number.NEGATIVE_INFINITY; VAR2 %= VAR1; VAR2") );
 163
 164 new TestCase( SECTION,
 165               "VAR1 = 0; VAR2= 0; VAR1 %= VAR2",
 166               Number.NaN,
 167               eval("VAR1 = 0; VAR2 = 0; VAR1 %= VAR2; VAR1") );
 168
 169 new TestCase( SECTION,
 170               "VAR1 = 0; VAR2= -0; VAR1 %= VAR2",
 171               Number.NaN,
 172               eval("VAR1 = 0; VAR2 = -0; VAR1 %= VAR2; VAR1") );
 173
 174 new TestCase( SECTION,
 175               "VAR1 = -0; VAR2= 0; VAR1 %= VAR2",
 176               Number.NaN,
 177               eval("VAR1 = -0; VAR2 = 0; VAR1 %= VAR2; VAR1") );
 178
 179 new TestCase( SECTION,
 180               "VAR1 = -0; VAR2= -0; VAR1 %= VAR2",
 181               Number.NaN,
 182               eval("VAR1 = -0; VAR2 = -0; VAR1 %= VAR2; VAR1") );
 183
 184 new TestCase( SECTION,
 185               "VAR1 = 1; VAR2= 0; VAR1 %= VAR2",
 186               Number.NaN,
 187               eval("VAR1 = 1; VAR2 = 0; VAR1 %= VAR2; VAR1") );
 188
 189 new TestCase( SECTION,
 190               "VAR1 = 1; VAR2= -0; VAR1 %= VAR2",
 191               Number.NaN,
 192               eval("VAR1 = 1; VAR2 = -0; VAR1 %= VAR2; VAR1") );
 193
 194 new TestCase( SECTION,
 195               "VAR1 = -1; VAR2= 0; VAR1 %= VAR2",
 196               Number.NaN,
 197               eval("VAR1 = -1; VAR2 = 0; VAR1 %= VAR2; VAR1") );
 198
 199 new TestCase( SECTION,
 200               "VAR1 = -1; VAR2= -0; VAR1 %= VAR2",
 201               Number.NaN,
 202               eval("VAR1 = -1; VAR2 = -0; VAR1 %= VAR2; VAR1") );
 203
 204 // if the dividend is finite and the divisor is an infinity, the result equals the dividend.
 205
 206 new TestCase( SECTION,
 207               "VAR1 = 0; VAR2= Infinity; VAR1 %= VAR2;VAR1",
 208               0,
 209               eval("VAR1 = 0; VAR2 = Number.POSITIVE_INFINITY; VAR1 %= VAR2; VAR1") );
 210
 211 new TestCase( SECTION,
 212               "VAR1 = -0; VAR2= Infinity; VAR1 %= VAR2;VAR1",
 213               -0,
 214               eval("VAR1 = -0; VAR2 = Number.POSITIVE_INFINITY; VAR1 %= VAR2; VAR1") );
 215
 216 new TestCase( SECTION,
 217               "VAR1 = -0; VAR2= -Infinity; VAR1 %= VAR2;VAR1",
 218               -0,
 219               eval("VAR1 = -0; VAR2 = Number.NEGATIVE_INFINITY; VAR1 %= VAR2; VAR1") );
 220
 221 new TestCase( SECTION,
 222               "VAR1 = 0; VAR2= -Infinity; VAR1 %= VAR2;VAR1",
 223               0,
 224               eval("VAR1 = 0; VAR2 = Number.NEGATIVE_INFINITY; VAR1 %= VAR2; VAR1") );
 225
 226 new TestCase( SECTION,
 227               "VAR1 = 1; VAR2= Infinity; VAR1 %= VAR2;VAR1",
 228               1,
 229               eval("VAR1 = 1; VAR2 = Number.POSITIVE_INFINITY; VAR1 %= VAR2; VAR1") );
 230
 231 new TestCase( SECTION,
 232               "VAR1 = -1; VAR2= Infinity; VAR1 %= VAR2;VAR1",
 233               -1,
 234               eval("VAR1 = -1; VAR2 = Number.POSITIVE_INFINITY; VAR1 %= VAR2; VAR1") );
 235
 236 new TestCase( SECTION,
 237               "VAR1 = -1; VAR2= -Infinity; VAR1 %= VAR2;VAR1",
 238               -1,
 239               eval("VAR1 = -1; VAR2 = Number.NEGATIVE_INFINITY; VAR1 %= VAR2; VAR1") );
 240
 241 new TestCase( SECTION,
 242               "VAR1 = 1; VAR2= -Infinity; VAR1 %= VAR2;VAR1",
 243               1,
 244               eval("VAR1 = 1; VAR2 = Number.NEGATIVE_INFINITY; VAR1 %= VAR2; VAR1") );
 245
 246 // if the dividend is a zero and the divisor is finite, the result is the same as the dividend
 247
 248 new TestCase( SECTION,
 249               "VAR1 = 0; VAR2= 1; VAR1 %= VAR2; VAR1",
 250               0,
 251               eval("VAR1 = 0; VAR2 = 1; VAR1 %= VAR2; VAR1") );
 252
 253 new TestCase( SECTION,
 254               "VAR1 = -0; VAR2= 1; VAR1 %= VAR2; VAR1",
 255               -0,
 256               eval("VAR1 = -0; VAR2 = 1; VAR1 %= VAR2; VAR1") );
 257
 258 new TestCase( SECTION,
 259               "VAR1 = -0; VAR2= -1; VAR1 %= VAR2; VAR1",
 260               -0,
 261               eval("VAR1 = -0; VAR2 = -1; VAR1 %= VAR2; VAR1") );
 262
 263 new TestCase( SECTION,
 264               "VAR1 = 0; VAR2= -1; VAR1 %= VAR2; VAR1",
 265               0,
 266               eval("VAR1 = 0; VAR2 = -1; VAR1 %= VAR2; VAR1") );
 267
 268 // string cases
 269 new TestCase( SECTION,
 270               "VAR1 = 1000; VAR2 = '10', VAR1 %= VAR2; VAR1",
 271               0,
 272               eval("VAR1 = 1000; VAR2 = '10', VAR1 %= VAR2; VAR1") );
 273
 274 new TestCase( SECTION,
 275               "VAR1 = '1000'; VAR2 = 10, VAR1 %= VAR2; VAR1",
 276               0,
 277               eval("VAR1 = '1000'; VAR2 = 10, VAR1 %= VAR2; VAR1") );
 278 /*
 279   new TestCase( SECTION,    "VAR1 = 10; VAR2 = '0XFF', VAR1 %= VAR2", 2550,       eval("VAR1 = 10; VAR2 = '0XFF', VAR1 %= VAR2") );
 280   new TestCase( SECTION,    "VAR1 = '0xFF'; VAR2 = 0xA, VAR1 %= VAR2", 2550,      eval("VAR1 = '0XFF'; VAR2 = 0XA, VAR1 %= VAR2") );
 281
 282   new TestCase( SECTION,    "VAR1 = '10'; VAR2 = '255', VAR1 %= VAR2", 2550,      eval("VAR1 = '10'; VAR2 = '255', VAR1 %= VAR2") );
 283   new TestCase( SECTION,    "VAR1 = '10'; VAR2 = '0XFF', VAR1 %= VAR2", 2550,     eval("VAR1 = '10'; VAR2 = '0XFF', VAR1 %= VAR2") );
 284   new TestCase( SECTION,    "VAR1 = '0xFF'; VAR2 = 0xA, VAR1 %= VAR2", 2550,      eval("VAR1 = '0XFF'; VAR2 = 0XA, VAR1 %= VAR2") );
 285
 286   // boolean cases
 287   new TestCase( SECTION,    "VAR1 = true; VAR2 = false; VAR1 %= VAR2",    0,      eval("VAR1 = true; VAR2 = false; VAR1 %= VAR2") );
 288   new TestCase( SECTION,    "VAR1 = true; VAR2 = true; VAR1 %= VAR2",    1,      eval("VAR1 = true; VAR2 = true; VAR1 %= VAR2") );
 289
 290   // object cases
 291   new TestCase( SECTION,    "VAR1 = new Boolean(true); VAR2 = 10; VAR1 %= VAR2;VAR1",    10,      eval("VAR1 = new Boolean(true); VAR2 = 10; VAR1 %= VAR2; VAR1") );
 292   new TestCase( SECTION,    "VAR1 = new Number(11); VAR2 = 10; VAR1 %= VAR2; VAR1",    110,      eval("VAR1 = new Number(11); VAR2 = 10; VAR1 %= VAR2; VAR1") );
 293   new TestCase( SECTION,    "VAR1 = new Number(11); VAR2 = new Number(10); VAR1 %= VAR2",    110,      eval("VAR1 = new Number(11); VAR2 = new Number(10); VAR1 %= VAR2") );
 294   new TestCase( SECTION,    "VAR1 = new String('15'); VAR2 = new String('0xF'); VAR1 %= VAR2",    255,      eval("VAR1 = String('15'); VAR2 = new String('0xF'); VAR1 %= VAR2") );
 295
 296 */
 297
 298 test();
 299