| // Copyright 2009 the Sputnik authors. All rights reserved. |
| // This code is governed by the BSD license found in the LICENSE file. |
| |
| /*--- |
| info: Operator remove leading StrWhiteSpaceChar |
| esid: sec-parseint-string-radix |
| description: "StrWhiteSpaceChar :: CR (U+000D)" |
| ---*/ |
| |
| //CHECK#1 |
| if (parseInt("\u000D1") !== parseInt("1")) { |
| $ERROR('#1: parseInt("\\u000D1") === parseInt("1"). Actual: ' + (parseInt("\u000D1"))); |
| } |
| |
| //CHECK#2 |
| if (parseInt("\u000D\u000D-1") !== parseInt("-1")) { |
| $ERROR('#2: parseInt("\\u000D\\u000D-1") === parseInt("-1"). Actual: ' + (parseInt("\u000D\u000D-1"))); |
| } |
| |
| //CHECK#3 |
| assert.sameValue(parseInt("\u000D"), NaN); |
