code.delx.au - gnu-emacs-elpa/blob - tests/parser.el

   1 ;;; tests/parser.el --- Some tests for js2-mode.
   2
   3 ;; Copyright (C) 2009, 2011-2013  Free Software Foundation, Inc.
   4
   5 ;; This file is part of GNU Emacs.
   6
   7 ;; GNU Emacs is free software: you can redistribute it and/or modify
   8 ;; it under the terms of the GNU General Public License as published by
   9 ;; the Free Software Foundation, either version 3 of the License, or
  10 ;; (at your option) any later version.
  11
  12 ;; GNU Emacs is distributed in the hope that it will be useful,
  13 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
  14 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15 ;; GNU General Public License for more details.
  16
  17 ;; You should have received a copy of the GNU General Public License
  18 ;; along with GNU Emacs.  If not, see <http://www.gnu.org/licenses/>.
  19
  20 ;;; Code:
  21
  22 (require 'ert)
  23 (require 'ert-x)
  24 (require 'js2-mode)
  25 (require 'cl-lib)
  26
  27 (defmacro js2-deftest (name buffer-contents &rest body)
  28   (declare (indent defun))
  29   `(ert-deftest ,(intern (format "js2-%s" name)) ()
  30      (with-temp-buffer
  31        (save-excursion
  32          (insert ,buffer-contents))
  33        (unwind-protect
  34            (progn
  35              ,@body)
  36          (fundamental-mode)))))
  37
  38 (defun js2-test-string-to-ast (s)
  39   (insert s)
  40   (js2-mode)
  41   (should (null js2-mode-buffer-dirty-p))
  42   js2-mode-ast)
  43
  44 (cl-defun js2-test-parse-string (code-string &key syntax-error errors-count
  45                                              reference)
  46   (ert-with-test-buffer (:name 'origin)
  47     (let ((ast (js2-test-string-to-ast code-string)))
  48       (if syntax-error
  49           (let ((errors (js2-ast-root-errors ast)))
  50             (should (= (or errors-count 1) (length errors)))
  51             (cl-destructuring-bind (_ pos len) (car (last errors))
  52               (should (string= syntax-error (substring code-string
  53                                                        (1- pos) (+ pos len -1))))))
  54         (should (= 0 (length (js2-ast-root-errors ast))))
  55         (ert-with-test-buffer (:name 'copy)
  56           (js2-print-tree ast)
  57           (skip-chars-backward " \t\n")
  58           (should (string= (or reference code-string)
  59                            (buffer-substring-no-properties
  60                             (point-min) (point)))))))))
  61
  62 (cl-defmacro js2-deftest-parse (name code-string &key bind syntax-error errors-count
  63                                      reference)
  64   "Parse CODE-STRING.  If SYNTAX-ERROR is nil, print syntax tree
  65 with `js2-print-tree' and assert the result to be equal to
  66 REFERENCE, if present, or the original string.  If SYNTAX-ERROR
  67 is passed, expect syntax error highlighting substring equal to
  68 SYNTAX-ERROR value.  BIND defines bindings to apply them around
  69 the test."
  70   (declare (indent defun))
  71   `(ert-deftest ,(intern (format "js2-%s" name)) ()
  72      (let ,(append bind '((js2-basic-offset 2)))
  73        (js2-test-parse-string ,code-string
  74                               :syntax-error ,syntax-error
  75                               :errors-count ,errors-count
  76                               :reference ,reference))))
  77
  78 ;;; Basics
  79
  80 (js2-deftest-parse variable-assignment
  81   "a = 1;")
  82
  83 (js2-deftest-parse empty-object-literal
  84   "b = {};")
  85
  86 (js2-deftest-parse empty-array-literal
  87   "c = [];")
  88
  89 (js2-deftest-parse array-with-missing-elements
  90   "var a = [1, 2, ,];")
  91
  92 (js2-deftest-parse comma-after-regexp
  93   "d = /eee/, 42;")
  94
  95 (js2-deftest-parse return-statement
  96   "function foo() {\n  return 2;\n}")
  97
  98 (js2-deftest-parse function-statement
  99   "function foo() {\n}")
 100
 101 (js2-deftest-parse function-statement-inside-block
 102   "if (true) {\n  function foo() {\n  }\n}")
 103
 104 (js2-deftest-parse function-expression-statements-are-verboten
 105   "function() {}" :syntax-error "(")
 106
 107 (js2-deftest-parse member-expr-as-function-name
 108   "function a.b.c[2](x, y) {\n}"
 109   :bind ((js2-allow-member-expr-as-function-name t)))
 110
 111 (js2-deftest-parse named-function-expression
 112   "a = function b() {};")
 113
 114 (js2-deftest-parse parenthesized-expression
 115   "(1 + 2);")
 116
 117 (js2-deftest-parse for-with-in-operator-in-parens
 118   "for (var y = (0 in []) in {}) {\n}")
 119
 120 (js2-deftest-parse for-with-in-operator-in-cond
 121   "for (var y = 1 ? 0 in [] : false in {}) {\n}")
 122
 123 (js2-deftest-parse let-expression
 124   "(let (x = 42) x);")
 125
 126 (js2-deftest-parse let-expression-statement
 127   "let (x = 42) x;")
 128
 129 (js2-deftest-parse void
 130   "void 0;")
 131
 132 ;;; Callers of `js2-valid-prop-name-token'
 133
 134 (js2-deftest-parse parse-property-access-when-not-keyword
 135   "A.foo = 3;")
 136
 137 (js2-deftest-parse parse-property-access-when-keyword
 138   "A.in = 3;"
 139   :bind ((js2-allow-keywords-as-property-names t)))
 140
 141 (js2-deftest-parse parse-property-access-when-keyword-no-xml
 142   "A.in = 3;"
 143   :bind ((js2-allow-keywords-as-property-names t)
 144          (js2-compiler-xml-available nil)))
 145
 146 (js2-deftest-parse parse-object-literal-when-not-keyword
 147   "a = {b: 1};")
 148
 149 (js2-deftest-parse parse-object-literal-when-keyword
 150   "a = {in: 1};"
 151   :bind ((js2-allow-keywords-as-property-names t)))
 152
 153 ;;; 'of' contextual keyword
 154
 155 (js2-deftest-parse parse-legacy-array-comp-loop-with-of
 156   "[a for (a of [])];")
 157
 158 (js2-deftest-parse parse-array-comp-loop
 159   "[for (a of []) a];")
 160
 161 (js2-deftest-parse parse-for-of
 162   "for (var a of []) {\n}")
 163
 164 (js2-deftest-parse of-can-be-var-name
 165   "var of = 3;")
 166
 167 (js2-deftest-parse of-can-be-function-name
 168   "function of() {\n}")
 169
 170 ;;; Destructuring binding
 171
 172 (js2-deftest-parse destruct-in-declaration
 173   "var {a, b} = {a: 1, b: 2};")
 174
 175 (js2-deftest-parse destruct-in-arguments
 176   "function f({a: aa, b: bb}) {\n}")
 177
 178 (js2-deftest-parse destruct-in-array-comp-loop
 179   "[a + b for ([a, b] in [[0, 1], [1, 2]])];")
 180
 181 (js2-deftest-parse destruct-in-catch-clause
 182   "try {\n} catch ({a, b}) {\n  a + b;\n}")
 183
 184 (js2-deftest-parse destruct-with-initializer-in-object
 185   "var {a, b = 2, c} = {};")
 186
 187 (js2-deftest-parse destruct-with-initializer-in-array
 188   "var [a, b = 2, c] = [];")
 189
 190 (js2-deftest-parse destruct-non-name-target-is-error
 191   "var {1=1} = {};" :syntax-error "1" :errors-count 1)
 192
 193 (js2-deftest-parse destruct-with-initializer-in-function-params
 194   "function f({a, b = 1, c}, [d, e = 1, f]) {\n}")
 195
 196 (js2-deftest-parse destruct-with-default-in-function-params
 197   "function f({x = 1, y = 2} = {}, [x, y] = [1, 2]) {\n}")
 198
 199 (js2-deftest-parse destruct-name-conflict-is-error-in-object
 200   "\"use strict\";\nvar {a=1,a=2} = {};" :syntax-error "a" :errors-count 1)
 201
 202 (js2-deftest destruct-name-conflict-is-warning-in-array "\"use strict\";\nvar [a=1,a=2] = [];"
 203   (js2-mode)
 204   (should (equal '("msg.var.redecl" "a")
 205                  (caar js2-parsed-warnings))))
 206
 207 (js2-deftest initializer-outside-destruct-is-error "({a=1});"
 208   (js2-mode)
 209   (should (equal "msg.init.no.destruct"
 210                  (car (caar js2-parsed-errors)))))
 211
 212 ;;; Object literals
 213
 214 (js2-deftest-parse object-literal-shorthand
 215   "var x = {a: 1, b, c: 1, d};")
 216
 217 (js2-deftest-parse object-literal-shorthard-with-number
 218   "var a = {1};" :syntax-error "}" :errors-count 2)
 219
 220 (js2-deftest-parse object-literal-method
 221   "var x = {f(y) {  return y;\n}};")
 222
 223 (js2-deftest object-literal-method-own-name-in-scope "({f(){f();}});"
 224   (js2-mode)
 225   (should (equal '("msg.undeclared.variable" "f")
 226                  (caar js2-parsed-warnings))))
 227
 228 (js2-deftest-parse object-literal-getter-method
 229   "var x = {get f() {  return 42;\n}};")
 230
 231 (js2-deftest-parse object-literal-setter-method
 232   "var x = {set f(y) {  x = y;\n}};")
 233
 234 (js2-deftest-parse object-literal-computed-keys
 235   "var x = {[Symbol.iterator]: function() {}};")
 236
 237 (js2-deftest-parse object-literal-computed-function-keys
 238   "var x = {[foo + bar](y) {  return y;\n}};")
 239
 240 (js2-deftest-parse object-literal-computed-getter-key
 241   "var x = {get [foo + bar]() {  return 42;\n}};")
 242
 243 (js2-deftest-parse object-literal-generator
 244   "var x = {*foo() {  yield 42;\n}};")
 245
 246 (js2-deftest-parse object-literal-computed-generator-key
 247   "var x = {*[foo + bar]() {  yield 42;\n}};")
 248
 249 ;;; Function definition
 250
 251 (js2-deftest function-redeclaring-var "var gen = 3; function gen() {};"
 252   (js2-mode)
 253   (should (= (length (js2-ast-root-warnings js2-mode-ast)) 1)))
 254
 255 (js2-deftest function-expression-var-same-name "var gen = function gen() {};"
 256   (js2-mode)
 257   (should (null (js2-ast-root-warnings js2-mode-ast))))
 258
 259 ;;; Function parameters
 260
 261 (js2-deftest-parse function-with-default-parameters
 262   "function foo(a = 1, b = a + 1) {\n}")
 263
 264 (js2-deftest-parse function-with-no-default-after-default
 265   "function foo(a = 1, b) {\n}")
 266
 267 (js2-deftest-parse function-with-destruct-after-default
 268   "function foo(a = 1, {b, c}) {\n}")
 269
 270 (js2-deftest-parse function-with-rest-parameter
 271   "function foo(a, b, ...rest) {\n}")
 272
 273 (js2-deftest-parse function-with-param-after-rest-parameter
 274   "function foo(a, ...b, rest) {\n}"
 275   :syntax-error "rest")
 276
 277 (js2-deftest-parse function-with-destruct-after-rest-parameter
 278   "function foo(a, ...b, {}) {\n}"
 279   :syntax-error "{}")
 280
 281 (js2-deftest-parse function-with-rest-after-default-parameter
 282   "function foo(a = 1, ...rest) {\n}")
 283
 284 ;;; Strict mode errors
 285
 286 (js2-deftest-parse function-bad-strict-parameters
 287   "'use strict';\nfunction foo(eval, {arguments}, bar) {\n}"
 288   :syntax-error "eval" :errors-count 2)
 289
 290 (js2-deftest-parse function-retroactive-bad-strict-parameters
 291   "function foo(arguments) {'use strict';}"
 292   :syntax-error "arguments" :errors-count 1)
 293
 294 (js2-deftest-parse function-duplicate-strict-parameters
 295   "'use strict';\nfunction foo(a, a) {\n}"
 296   :syntax-error "a" :errors-count 1)
 297
 298 (js2-deftest-parse function-bad-strict-function-name
 299   "'use strict';\nfunction eval() {\n}"
 300   :syntax-error "eval" :errors-count 1)
 301
 302 (js2-deftest-parse function-bad-retroactive-strict-function-name
 303   "function arguments() {'use strict';}"
 304   :syntax-error "arguments" :errors-count 1)
 305
 306 (js2-deftest-parse function-bad-strict-catch-name
 307   "'use strict';\ntry {} catch (eval) {}"
 308   :syntax-error "eval" :errors-count 1)
 309
 310 (js2-deftest-parse function-bad-strict-variable-name
 311   "'use strict';\nvar eval = 'kekeke';"
 312   :syntax-error "eval" :errors-count 1)
 313
 314 (js2-deftest-parse function-bad-strict-assignment
 315   "'use strict';\narguments = 'fufufu';"
 316   :syntax-error "arguments" :errors-count 1)
 317
 318 (js2-deftest-parse function-property-strict-assignment
 319   "'use strict';\narguments.okay = 'alright';")
 320
 321 (js2-deftest-parse function-strict-with
 322   "'use strict';\nwith ({}) {}"
 323   :syntax-error "with" :errors-count 1)
 324
 325 (js2-deftest-parse function-strict-octal
 326   "'use strict';\nvar number = 0644;"
 327   :syntax-error "0644" :errors-count 1)
 328
 329 (js2-deftest-parse function-strict-octal-allow-0o
 330   "'use strict';\n0o644;" :reference "'use strict';\n420;")
 331
 332 (js2-deftest-parse function-strict-duplicate-keys
 333   "'use strict';\nvar object = {a: 1, a: 2, 'a': 3, ['a']: 4, 1: 5, '1': 6, [1 + 1]: 7};"
 334   :syntax-error "a" :errors-count 4) ; "a" has 3 dupes, "1" has 1 dupe.
 335
 336 (js2-deftest-parse function-strict-duplicate-getter
 337   "'use strict';\nvar a = {get x() {}, get x() {}};"
 338   :syntax-error "x" :errors-count 1)
 339
 340 (js2-deftest-parse function-strict-duplicate-setter
 341   "'use strict';\nvar a = {set x() {}, set x() {}};"
 342   :syntax-error "x" :errors-count 1)
 343
 344 ;;; Lack of errors in strict mode
 345
 346 (js2-deftest-parse function-strict-const-scope
 347   "'use strict';\nconst a;\nif (1) {\n  const a;\n}")
 348
 349 (js2-deftest-parse function-strict-no-getter-setter-duplicate
 350   "'use strict';\nvar a = {get x() {}, set x() {}};")
 351
 352 ;;; Spread operator
 353
 354 (js2-deftest-parse spread-in-array-literal
 355   "[1, ...[2, 3], 4, ...[5, 6]];")
 356
 357 (js2-deftest-parse spread-in-function-call
 358   "f(3, ...[t(2), t(3)], 42, ...[t(4)]);")
 359
 360 ;;; Arrow functions
 361
 362 (js2-deftest-parse arrow-function-with-empty-args-and-no-curlies
 363   "() => false;" :reference "() => {false};")
 364
 365 (js2-deftest-parse arrow-function-with-args-and-curlies
 366   "(a, b = 1, ...c) => {  c;\n};")
 367
 368 (js2-deftest-parse arrow-function-with-destructuring
 369   "([{a}, b]) => {  a + b;\n};")
 370
 371 (js2-deftest-parse parenless-arrow-function-prohibits-rest
 372   "...b => {b + 1;};" :syntax-error "=>")
 373
 374 (js2-deftest-parse parenless-arrow-function-prohibits-destructuring
 375   "[a, b] => {a + b;};" :syntax-error "]" :errors-count 4)
 376
 377 (js2-deftest-parse arrow-function-recovers-from-error
 378   "[(,foo) => 1];" :syntax-error "," :errors-count 6)
 379
 380 ;;; Automatic semicolon insertion
 381
 382 (js2-deftest-parse no-auto-semi-insertion-after-if
 383   "if (true) {\n}")
 384
 385 (js2-deftest-parse auto-semi-insertion-after-function
 386   "a = function() {}" :reference "a = function() {};")
 387
 388 (js2-deftest-parse auto-semi-one-variable-per-line
 389   "x\ny" :reference "x;\ny;")
 390
 391 ;;; Labels
 392
 393 (js2-deftest-parse labeled-stmt-node
 394   "foo:\nbar:\nx = y + 1;")
 395
 396 (js2-deftest no-label-node-inside-expr "x = y:"
 397   (let (js2-parse-interruptable-p)
 398     (js2-mode))
 399   (let ((assignment (js2-expr-stmt-node-expr (car (js2-scope-kids js2-mode-ast)))))
 400     (should (js2-name-node-p (js2-assign-node-right assignment)))))
 401
 402 (js2-deftest-parse label-and-loops "for (; ; ) {
 403   loop:
 404   for (; ; ) {
 405     continue loop;
 406   }
 407 }")
 408
 409 ;;; Generators
 410
 411 (js2-deftest-parse legacy-generator "function foo() {\n  yield 1;\n}")
 412
 413 (js2-deftest-parse legacy-generator-cannot-return
 414   "function foo() {\n  yield 1;\n return 2;\n}" :syntax-error "return 2")
 415
 416 (js2-deftest-parse harmony-generator "function* bar() {\n  yield 2;\n  return 3;\n}")
 417
 418 (js2-deftest-parse harmony-generator-yield-star "(function*(a) {  yield* a;\n});")
 419
 420 ;;; Comprehensions
 421
 422 (js2-deftest-parse parse-legacy-array-comp-loop-with-filter
 423   "[a for (a in b) if (a == 2)];")
 424
 425 (js2-deftest-parse parse-array-comp-loop-with-filters
 426   "[for (a in b) if (a == 2) if (b != 10) a];")
 427
 428 (js2-deftest-parse parse-generator-comp-loop-with-filters
 429   "(for (x of y) if (x != 4) x);")
 430
 431 (js2-deftest-parse parse-array-comp-with-yield-is-ok
 432   "(function() {  return [for (x of []) yield x];\n});")
 433
 434 (js2-deftest-parse parse-generator-comp-with-yield-is-not-ok
 435   "(function() {  return (for (x of []) yield x);\n});"
 436   :syntax-error "yield")
 437
 438 (js2-deftest-parse parse-generator-comp-with-yield-inside-function-is-ok
 439   "(for (x of []) function*() {  yield x;\n});")
 440
 441 ;;; Async
 442
 443 (js2-deftest-parse async-function-statement
 444   "async function foo() {\n}")
 445
 446 (js2-deftest-parse async-function-statement-inside-block
 447   "if (true) {\n  async function foo() {\n  }\n}")
 448
 449 (js2-deftest-parse async-function-expression-statements-are-verboten
 450   "async function() {}" :syntax-error "(")
 451
 452 (js2-deftest-parse async-named-function-expression
 453   "a = async function b() {};")
 454
 455 (js2-deftest-parse async-arrow-function-expression
 456   "a = async (b) => {  b;\n};")
 457
 458 (js2-deftest-parse async-method-in-object-literal
 459   "({async f() {}});")
 460
 461 (js2-deftest-parse async-method-in-class-body
 462   "class C {\n  async foo() {}\n}")
 463
 464 (js2-deftest-parse static-async-method-in-class-body
 465   "class C {\n  static async foo() {}\n}")
 466
 467 (js2-deftest-parse async-method-allow-await
 468   "({async f() {  await x;\n}});")
 469
 470 ;;; Await
 471
 472 (js2-deftest-parse await-is-ok "async function foo() {\n  await bar();\n}")
 473
 474 (js2-deftest-parse await-inside-assignment-is-ok
 475                    "async function foo() {\n  var result = await bar();\n}")
 476
 477 (js2-deftest-parse await-inside-array-is-ok
 478                    "async function foo() {\n  var results = [await bar(), await baz()];\n}")
 479
 480 (js2-deftest-parse await-inside-non-async-function-is-not-ok
 481                    "function foo() {\n  await bar();\n}"
 482                    :syntax-error "await")
 483
 484 (js2-deftest-parse await-inside-non-async-arrow-function-is-not-ok
 485                    "a = () => {  await bar();\n}"
 486                    :syntax-error "await")
 487
 488 ;;; 'async' and 'await' are contextual keywords
 489
 490 (js2-deftest-parse async-can-be-name
 491   "void async;")
 492
 493 (js2-deftest-parse async-can-be-object-name
 494   "async.z;")
 495
 496 (js2-deftest-parse async-can-be-var-name
 497   "var async = 3;")
 498
 499 (js2-deftest-parse async-can-be-function-name
 500   "function async() {\n}")
 501
 502 (js2-deftest-parse await-can-be-name
 503   "void await;")
 504
 505 (js2-deftest-parse await-can-be-object-name
 506   "await.z;")
 507
 508 (js2-deftest-parse await-can-be-var-name
 509   "var await = 3;")
 510
 511 (js2-deftest-parse await-can-be-function-name
 512   "function await() {\n}")
 513
 514 ;;; Numbers
 515
 516 (js2-deftest-parse decimal-starting-with-zero "081;" :reference "81;")
 517
 518 (js2-deftest-parse huge-hex "0x0123456789abcdefABCDEF;" :reference "-1;")
 519
 520 (js2-deftest-parse octal-without-o "071;" :reference "57;")
 521
 522 (js2-deftest-parse hex-number-okay "0x123;" :reference "291;")
 523
 524 (js2-deftest-parse hex-number-broken "0xz23;"
 525   :syntax-error "0xz" :errors-count 2)
 526
 527 (js2-deftest-parse binary-number-okay "0b101;" :reference "5;")
 528
 529 (js2-deftest-parse binary-number-broken "0b210;"
 530   :syntax-error "0b2" :errors-count 2)
 531
 532 (js2-deftest-parse octal-number-okay "0o765;" :reference "501;")
 533
 534 (js2-deftest-parse octal-number-broken "0o812;"
 535   :syntax-error "0o8" :errors-count 2)
 536
 537 ;;; Modules
 538
 539 (js2-deftest parse-export-bindings "{one, two as dos}"
 540   (js2-init-scanner)
 541   (should (js2-match-token js2-LC))
 542   (let ((imports (js2-parse-export-bindings)))
 543     (should (not (equal nil imports)))
 544     (should (= 2 (length imports)))
 545     (let ((first (nth 0 imports))
 546           (second (nth 1 imports)))
 547       (should (equal "one" (js2-name-node-name (js2-export-binding-node-extern-name first))))
 548       (should (equal "two" (js2-name-node-name (js2-export-binding-node-extern-name second))))
 549       (let ((first-name (js2-export-binding-node-local-name first))
 550             (second-name (js2-export-binding-node-local-name second)))
 551         (should (equal first (js2-node-parent first-name)))
 552         (should (equal 3 (js2-node-len first-name)))
 553         (should (equal "one" (js2-name-node-name first-name)))
 554         (should (equal second (js2-node-parent second-name)))
 555         (should (equal 3 (js2-node-len second-name)))
 556         (should (equal "dos" (js2-name-node-name second-name)))))))
 557
 558 (js2-deftest parse-export-binding-as-default "one as default"
 559   (js2-init-scanner)
 560   (let ((binding (js2-maybe-parse-export-binding)))
 561     (should binding)
 562     (should (js2-export-binding-node-p binding))
 563     (let ((name (js2-export-binding-node-local-name binding)))
 564       (should name)
 565       (should (equal "default" (js2-name-node-name name))))))
 566
 567 (js2-deftest parse-namepsace-import "* as lib;"
 568   (js2-init-scanner)
 569   (should (js2-match-token js2-MUL))
 570   (let ((namespace-import (js2-parse-namespace-import)))
 571     (should (not (equal nil namespace-import)))
 572     (should (js2-namespace-import-node-p namespace-import))
 573     (should (= 1 (js2-node-pos namespace-import)))
 574     (should (equal 8 (js2-node-len namespace-import)))
 575     (let ((name-node (js2-namespace-import-node-name namespace-import)))
 576       (should (equal "lib" (js2-name-node-name name-node)))
 577       (should (= 5 (js2-node-pos name-node))))))
 578
 579 (js2-deftest parse-from-clause "from 'foo/bar';"
 580   (js2-init-scanner)
 581   (let ((from (js2-parse-from-clause)))
 582     (should (not (equal nil from)))
 583     (should (= 1 (js2-node-pos from)))
 584     (should (= 14 (js2-node-len from)))
 585     (should (equal "foo/bar" (js2-from-clause-node-module-id from)))))
 586
 587 (js2-deftest parse-import-module-id-only "import 'src/lib'"
 588   (js2-init-scanner)
 589   (should (js2-match-token js2-IMPORT))
 590   (let ((import (js2-parse-import)))
 591     (should (not (equal nil import)))
 592     (should (= 1 (js2-node-pos import)))
 593     (should (= 16 (js2-node-len import)))
 594     (should (equal nil (js2-import-node-import import)))
 595     (should (equal nil (js2-import-node-from import)))))
 596
 597 (js2-deftest parse-imported-default-binding "import theDefault from 'src/lib'"
 598   (js2-push-scope (make-js2-scope :pos 0))
 599   (js2-init-scanner)
 600   (should (js2-match-token js2-IMPORT))
 601   (let ((import-node (js2-parse-import)))
 602     (should (not (equal nil import-node)))
 603     (should (equal "src/lib" (js2-import-node-module-id import-node)))
 604     (let ((import (js2-import-node-import import-node)))
 605       (should (not (equal nil import)))
 606       (should (equal nil (js2-import-clause-node-namespace-import import)))
 607       (should (equal nil (js2-import-clause-node-named-imports import)))
 608       (let ((default (js2-import-clause-node-default-binding import)))
 609         (should (not (equal nil default)))
 610         (should (js2-export-binding-node-p default))
 611         (should (equal "theDefault" (js2-name-node-name (js2-export-binding-node-extern-name default)))))))
 612   (should (js2-scope-get-symbol js2-current-scope "theDefault")))
 613
 614 (js2-deftest parse-import-namespace-binding "import * as lib from 'src/lib'"
 615   (js2-push-scope (make-js2-scope :pos 0))
 616   (js2-init-scanner)
 617   (should (js2-match-token js2-IMPORT))
 618   (let ((import-node (js2-parse-import)))
 619     (should (not (equal nil import-node)))
 620     (should (equal "src/lib" (js2-import-node-module-id import-node)))
 621     (let ((import (js2-import-node-import import-node)))
 622       (should (not (equal nil import)))
 623       (should (equal nil (js2-import-clause-node-default-binding import)))
 624       (should (equal nil (js2-import-clause-node-named-imports import)))
 625       (let ((ns-import (js2-import-clause-node-namespace-import import)))
 626         (should (not (equal nil ns-import)))
 627         (should (js2-namespace-import-node-p ns-import))
 628         (should (equal "lib" (js2-name-node-name (js2-namespace-import-node-name ns-import)))))))
 629   (should (js2-scope-get-symbol js2-current-scope "lib")))
 630
 631 (js2-deftest parse-import-named-imports "import {foo as bar, baz} from 'src/lib'"
 632   (js2-push-scope (make-js2-scope :pos 0))
 633   (js2-init-scanner)
 634   (should (js2-match-token js2-IMPORT))
 635   (let ((import-node (js2-parse-import)))
 636     (should (not (equal nil import-node)))
 637     (should (equal "src/lib" (js2-import-node-module-id import-node)))
 638     (let ((import (js2-import-node-import import-node)))
 639       (should (not (equal nil import)))
 640       (should (equal nil (js2-import-clause-node-default-binding import)))
 641       (should (equal nil (js2-import-clause-node-namespace-import import)))
 642       (let ((named-imports (js2-import-clause-node-named-imports import)))
 643         (should (not (equal nil named-imports)))
 644         (should (listp named-imports))
 645         (should (= 2 (length named-imports)))
 646         (let ((first (nth 0 named-imports))
 647               (second (nth 1 named-imports)))
 648           (should (equal "bar" (js2-name-node-name (js2-export-binding-node-local-name first))))
 649           (should (equal "baz" (js2-name-node-name (js2-export-binding-node-local-name second))))))))
 650   (should (js2-scope-get-symbol js2-current-scope "bar"))
 651   (should (js2-scope-get-symbol js2-current-scope "baz")))
 652
 653 (js2-deftest parse-import-default-and-namespace "import stuff, * as lib from 'src/lib'"
 654   (js2-push-scope (make-js2-scope :pos 0))
 655   (js2-init-scanner)
 656   (should (js2-match-token js2-IMPORT))
 657   (let ((import-node (js2-parse-import)))
 658     (should (not (equal nil import-node)))
 659     (should (equal "src/lib" (js2-import-node-module-id import-node)))
 660     (let ((import (js2-import-node-import import-node)))
 661       (should (not (equal nil import)))
 662       (should (equal nil (js2-import-clause-node-named-imports import)))
 663       (let ((default (js2-import-clause-node-default-binding import))
 664             (ns-import (js2-import-clause-node-namespace-import import)))
 665         (should (not (equal nil default)))
 666         (should (equal "stuff" (js2-name-node-name (js2-export-binding-node-local-name default))))
 667         (should (not (equal nil ns-import)))
 668         (should (js2-namespace-import-node-p ns-import))
 669         (should (equal "lib" (js2-name-node-name (js2-namespace-import-node-name ns-import)))))))
 670   (should (js2-scope-get-symbol js2-current-scope "stuff"))
 671   (should (js2-scope-get-symbol js2-current-scope "lib")))
 672
 673 (js2-deftest parse-import-default-and-named-imports
 674   "import robert as bob, {cookies, pi as PIE} from 'src/lib'"
 675   (js2-push-scope (make-js2-scope :pos 0))
 676   (js2-init-scanner)
 677   (should (js2-match-token js2-IMPORT))
 678   (let ((import-node (js2-parse-import)))
 679     (should (not (equal nil import-node)))
 680     (should (equal "src/lib" (js2-import-node-module-id import-node)))
 681     (let ((import (js2-import-node-import import-node)))
 682       (should (not (equal nil import)))
 683       (should (not (equal nil (js2-import-clause-node-named-imports import))))
 684       (let ((default (js2-import-clause-node-default-binding import))
 685             (named-imports (js2-import-clause-node-named-imports import)))
 686         (should (not (equal nil default)))
 687         (should (equal "bob" (js2-name-node-name (js2-export-binding-node-local-name default))))
 688         (should (not (equal nil named-imports)))
 689         (should (= 2 (length named-imports))))))
 690   (should (js2-scope-get-symbol js2-current-scope "bob"))
 691   (should (js2-scope-get-symbol js2-current-scope "cookies"))
 692   (should (js2-scope-get-symbol js2-current-scope "PIE")))
 693
 694 (js2-deftest parse-this-module-in-from-clause "import {url} from this module;"
 695   (js2-push-scope (make-js2-scope :pos 0))
 696   (js2-init-scanner)
 697   (should (js2-match-token js2-IMPORT))
 698   (let ((import-node (js2-parse-import)))
 699     (should import-node)
 700     (let ((from-clause (js2-import-node-from import-node)))
 701       (should from-clause)
 702       (should (equal "this" (js2-from-clause-node-module-id from-clause)))
 703       (should (js2-from-clause-node-metadata-p from-clause)))))
 704
 705 (js2-deftest-parse import-only-for-side-effects "import 'src/lib';")
 706 (js2-deftest-parse import-default-only "import theDefault from 'src/lib';")
 707 (js2-deftest-parse import-named-only "import {one, two} from 'src/lib';")
 708 (js2-deftest-parse import-default-and-named "import theDefault, {one, two} from 'src/lib';")
 709 (js2-deftest-parse import-renaming-default "import * as lib from 'src/mylib';")
 710 (js2-deftest-parse import-renaming-named "import {one as uno, two as dos} from 'src/lib';")
 711 (js2-deftest-parse import-default-and-namespace "import robert as bob, * as lib from 'src/lib';")
 712 (js2-deftest-parse import-from-this-module "import {url} from this module;")
 713
 714 ;; Module Exports
 715
 716 (js2-deftest export-rexport "export * from 'other/lib'"
 717   (js2-init-scanner)
 718   (should (js2-match-token js2-EXPORT))
 719   (let ((export-node (js2-parse-export)))
 720     (should export-node)
 721     (should (js2-export-node-from-clause export-node))))
 722
 723 (js2-deftest export-export-named-list "export {foo, bar as bang};"
 724   (js2-init-scanner)
 725   (should (js2-match-token js2-EXPORT))
 726   (let ((export-node (js2-parse-export)))
 727     (should export-node)
 728     (let ((exports (js2-export-node-exports-list export-node)))
 729       (should exports)
 730       (should (= 2 (length exports))))))
 731
 732 (js2-deftest re-export-named-list "export {foo, bar as bang} from 'other/lib'"
 733   (js2-init-scanner)
 734   (should (js2-match-token js2-EXPORT))
 735   (let ((export-node (js2-parse-export)))
 736     (should export-node)
 737     (should (js2-export-node-from-clause export-node))
 738     (let ((exports (js2-export-node-exports-list export-node)))
 739       (should exports)
 740       (should (= 2 (length exports))))))
 741
 742 (js2-deftest export-variable-statement "export var foo = 'bar', baz = 'bang';"
 743   (js2-init-scanner)
 744   (js2-push-scope (make-js2-scope :pos 0))
 745   (should (js2-match-token js2-EXPORT))
 746   (let ((export-node (js2-parse-export)))
 747     (should export-node)
 748     (should (js2-export-node-declaration export-node))))
 749
 750 (js2-deftest export-const-declaration "export const PI = Math.PI;"
 751   (js2-init-scanner)
 752   (js2-push-scope (make-js2-scope :pos 0))
 753   (should (js2-match-token js2-EXPORT))
 754   (let ((export-node (js2-parse-export)))
 755     (should export-node)
 756     (should (js2-export-node-declaration export-node))))
 757
 758 (js2-deftest export-let-declaration "export let foo = [1];"
 759   (js2-init-scanner)
 760   (js2-push-scope (make-js2-scope :pos 0))
 761   (should (js2-match-token js2-EXPORT))
 762   (let ((export-node (js2-parse-export)))
 763     (should export-node)
 764     (should (js2-var-decl-node-p (js2-export-node-declaration export-node)))))
 765
 766 (js2-deftest export-class-declaration "export class Foo {}"
 767   (js2-init-scanner)
 768   (js2-push-scope (make-js2-scope :pos 0))
 769   (should (js2-match-token js2-EXPORT))
 770   (let ((export-node (js2-parse-export)))
 771     (should export-node)
 772     (should (js2-class-node-p (js2-export-node-declaration export-node)))))
 773
 774 (js2-deftest export-function-declaration "export default function doStuff() {}"
 775   (js2-init-scanner)
 776   (js2-push-scope (make-js2-scope :pos 0))
 777   (should (js2-match-token js2-EXPORT))
 778   (let ((export-node (js2-parse-export)))
 779     (should export-node)
 780     (should (js2-export-node-default export-node))))
 781
 782 (js2-deftest export-generator-declaration "export default function* one() {}"
 783   (js2-init-scanner)
 784   (js2-push-scope (make-js2-scope :pos 0))
 785   (should (js2-match-token js2-EXPORT))
 786   (let ((export-node (js2-parse-export)))
 787     (should export-node)
 788     (should (js2-export-node-default export-node))))
 789
 790 (js2-deftest export-assignment-expression "export default a = b;"
 791   (js2-init-scanner)
 792   (js2-push-scope (make-js2-scope :pos 0))
 793   (should (js2-match-token js2-EXPORT))
 794   (let ((export-node (js2-parse-export)))
 795     (should export-node)
 796     (should (js2-export-node-default export-node))))
 797
 798 (js2-deftest export-function-no-semicolon "export default function foo() {}"
 799   (js2-mode)
 800   (should (equal nil js2-parsed-warnings)))
 801 (js2-deftest export-default-function-no-semicolon "export function foo() {}"
 802   (js2-mode)
 803   (should (equal nil js2-parsed-warnings)))
 804 (js2-deftest export-anything-else-does-require-a-semicolon "export var obj = {}"
 805   (js2-mode)
 806   (should (not (equal nil js2-parsed-warnings))))
 807
 808 (js2-deftest export-default-async-function-no-semicolon "export default async function foo() {}"
 809   (js2-mode)
 810   (should (equal nil js2-parsed-warnings)))
 811 (js2-deftest export-async-function-no-semicolon "export async function foo() {}"
 812   (js2-mode)
 813   (should (equal nil js2-parsed-warnings)))
 814
 815 (js2-deftest-parse parse-export-rexport "export * from 'other/lib';")
 816 (js2-deftest-parse parse-export-export-named-list "export {foo, bar as bang};")
 817 (js2-deftest-parse parse-re-export-named-list "export {foo, bar as bang} from 'other/lib';")
 818 (js2-deftest-parse parse-export-const-declaration "export const PI = Math.PI;")
 819 (js2-deftest-parse parse-export-let-declaration "export let foo = [1];")
 820 (js2-deftest-parse parse-export-function-declaration "export default function doStuff() {\n}")
 821 (js2-deftest-parse parse-export-generator-declaration "export default function* one() {\n}")
 822 (js2-deftest-parse parse-export-assignment-expression "export default a = b;")
 823
 824 (js2-deftest-parse parse-export-function-declaration-no-semi
 825   "export function f() {\n}")
 826
 827 (js2-deftest-parse parse-export-class-declaration-no-semi
 828   "export class C {\n}")
 829
 830 (js2-deftest-parse parse-export-async-function-allow-await
 831   "export async function f() {\n  await f();\n}")
 832
 833 (js2-deftest-parse parse-export-default-async-function-allow-await
 834   "export default async function f() {\n  await f();\n}")
 835
 836 ;;; Strings
 837
 838 (js2-deftest-parse string-literal
 839   "var x = 'y';")
 840
 841 (js2-deftest-parse object-get-string-literal
 842   "var x = {y: 5};\nvar z = x[\"y\"];")
 843
 844 (js2-deftest-parse template-no-substritutions
 845   "var x = `abc
 846             def`, y = `\\u0000`;")
 847
 848 (js2-deftest-parse template-with-substitutions
 849   "var y = `${a + b} ${d + e + f}`;")
 850
 851 (js2-deftest-parse tagged-template
 852   "foo.args`${++x, \"o\"}k`;")
 853
 854 ;;; Classes
 855
 856 (js2-deftest-parse parse-harmony-class-statement
 857   "class Foo {\n  get bar() {  return 42;\n}\n  set bar(x) {  y = x;\n}\n}")
 858
 859 (js2-deftest-parse parse-harmony-class-statement-without-name-is-not-ok
 860   "class {\n  get bar() {  return 42;\n}\n}"
 861   :syntax-error "{")
 862
 863 (js2-deftest-parse parse-harmony-class-expression
 864   "var Foo1 = class Foo {\n  bar() {  return 42;\n}\n};")
 865
 866 (js2-deftest-parse parse-harmony-anonymous-class-expression
 867   "var Foo = class {\n  set bar(x) {  bar = x;\n}\n};")
 868
 869 (js2-deftest-parse parse-harmony-class-with-extends
 870   "class Foo extends Bar {\n}")
 871
 872 (js2-deftest-parse parse-harmony-anonymous-class-with-extends
 873   "foo.Foo = class extends Bar {\n  set bar(x) {  bar = x;\n}\n};")
 874
 875 (js2-deftest-parse parse-harmony-class-with-complex-extends
 876   "class Foo extends foo[BAR][2].Baz {\n}")
 877
 878 (js2-deftest-parse parse-harmony-class-missing-extended-class-is-not-ok
 879   "class Foo extends {\n}"
 880   :syntax-error "extends")
 881
 882 (js2-deftest-parse parse-harmony-class-static-method
 883   "class Foo extends Bar {\n  static bar() {  return 42;\n}\n}")
 884
 885 (js2-deftest-parse parse-unterminated-class-is-not-okay
 886   "class Foo {\n  get bar() {  return 42;\n}"
 887   :syntax-error "}")
 888
 889 (js2-deftest-parse parse-super-keyword
 890   "class Foo {\n  constructor() {  super(42);\n}\n  foo() {  super.foo();\n}\n}")
 891
 892 (js2-deftest-parse parse-class-keywordlike-method
 893   "class C {\n  delete() {}\n  if() {}\n}")
 894
 895 (js2-deftest-parse parse-harmony-class-allow-semicolon-element
 896   "class Foo {;}" :reference "class Foo {\n}")
 897
 898 ;;; Scopes
 899
 900 (js2-deftest ast-symbol-table-includes-fn-node "function foo() {}"
 901   (js2-mode)
 902   (let ((entry (js2-scope-get-symbol js2-mode-ast 'foo)))
 903     (should (= (js2-symbol-decl-type entry) js2-FUNCTION))
 904     (should (equal (js2-symbol-name entry) "foo"))
 905     (should (js2-function-node-p (js2-symbol-ast-node entry)))))
 906
 907 (js2-deftest fn-symbol-table-includes-nested-fn "function foo() {
 908   function bar() {}
 909   var x;
 910 }"
 911   (js2-mode)
 912   (let* ((scope (js2-node-at-point (point-min)))
 913          (fn-entry (js2-scope-get-symbol scope 'bar))
 914          (var-entry (js2-scope-get-symbol scope 'x)))
 915     (should (string= (js2-name-node-name (js2-function-node-name scope)) "foo"))
 916     (should (= (js2-symbol-decl-type fn-entry) js2-FUNCTION))
 917     (should (js2-function-node-p (js2-symbol-ast-node fn-entry)))
 918     (should (= (js2-symbol-decl-type var-entry) js2-VAR))
 919     (should (js2-name-node-p (js2-symbol-ast-node var-entry)))))
 920
 921 (defun js2-test-scope-of-nth-variable-satisifies-predicate (variable nth predicate)
 922   (goto-char (point-min))
 923   (dotimes (n (1+ nth)) (search-forward variable))
 924   (forward-char -1)
 925   (let ((scope (js2-node-get-enclosing-scope (js2-node-at-point))))
 926     (should (funcall predicate (js2-get-defining-scope scope variable)))))
 927
 928 (js2-deftest for-node-is-declaration-scope "for (let i = 0; i; ++i) {};"
 929   (js2-mode)
 930   (js2-test-scope-of-nth-variable-satisifies-predicate "i" 0 #'js2-for-node-p))
 931
 932 (js2-deftest const-scope-sloppy-script "{const a;} a;"
 933   (js2-mode)
 934   (js2-test-scope-of-nth-variable-satisifies-predicate "a" 0 #'js2-script-node-p)
 935   (js2-test-scope-of-nth-variable-satisifies-predicate "a" 1 #'js2-script-node-p))
 936
 937 (js2-deftest const-scope-strict-script "'use strict'; { const a; } a;"
 938   (js2-mode)
 939   (js2-test-scope-of-nth-variable-satisifies-predicate "a" 0 #'js2-block-node-p)
 940   (js2-test-scope-of-nth-variable-satisifies-predicate "a" 1 #'null))
 941
 942 (js2-deftest const-scope-sloppy-function "function f() { { const a; } a; }"
 943   (js2-mode)
 944   (js2-test-scope-of-nth-variable-satisifies-predicate "a" 0 #'js2-function-node-p)
 945   (js2-test-scope-of-nth-variable-satisifies-predicate "a" 1 #'js2-function-node-p))
 946
 947 (js2-deftest const-scope-strict-function "function f() { 'use strict'; { const a; } a; }"
 948   (js2-mode)
 949   (js2-test-scope-of-nth-variable-satisifies-predicate "a" 0 #'js2-block-node-p)
 950   (js2-test-scope-of-nth-variable-satisifies-predicate "a" 1 #'null))
 951
 952 (js2-deftest array-comp-is-result-scope "[x * 2 for (x in y)];"
 953   (js2-mode)
 954   (js2-test-scope-of-nth-variable-satisifies-predicate "x" 0 #'js2-comp-loop-node-p))
 955
 956 (js2-deftest array-comp-has-parent-scope
 957              "var a,b=[for (i of [[1,2]]) for (j of i) j * a];"
 958   (js2-mode)
 959   (search-forward "for")
 960   (forward-char -3)
 961   (let ((node (js2-node-at-point)))
 962     (should (js2-scope-parent-scope node))
 963     (should (js2-get-defining-scope node "j"))))
 964
 965 ;;; Tokenizer
 966
 967 (js2-deftest get-token "(1+1)"
 968   (js2-init-scanner)
 969   (should (eq js2-LP (js2-next-token)))
 970   (should (eq js2-NUMBER (js2-next-token)))
 971   (should (eq js2-ADD (js2-next-token)))
 972   (should (eq js2-NUMBER (js2-next-token)))
 973   (should (eq js2-RP (js2-next-token))))
 974
 975 (js2-deftest unget-token "()"
 976   (js2-init-scanner)
 977   (should (eq js2-LP (js2-next-token)))
 978   (js2-unget-token)
 979   (should (eq js2-LP (js2-next-token)))
 980   (should (eq js2-RP (js2-next-token))))
 981
 982 (js2-deftest get-token-or-eol "x\n++;"
 983   (js2-init-scanner)
 984   (should (eq js2-NAME (js2-next-token)))
 985   (should (eq js2-EOL (js2-peek-token-or-eol)))
 986   (should (eq js2-INC (js2-next-token)))
 987   (should (eq js2-SEMI (js2-peek-token-or-eol))))
 988
 989 (js2-deftest unget-token-over-eol-and-comment "x\n//abc\ny"
 990   (js2-init-scanner)
 991   (should (eq js2-NAME (js2-next-token)))
 992   (should (eq js2-NAME (js2-next-token)))
 993   (should (equal "y" (js2-current-token-string)))
 994   (js2-unget-token)
 995   (should (eq js2-NAME (js2-current-token-type)))
 996   (should (equal "x" (js2-current-token-string))))
 997
 998 (js2-deftest ts-seek "(1+2)"
 999   (js2-init-scanner)
1000   (should (eq js2-LP (js2-next-token)))
1001   (should (eq js2-NUMBER (js2-next-token)))
1002   (js2-unget-token)
1003   (let ((state (make-js2-ts-state)))
1004     (should (eq js2-NUMBER (js2-next-token)))
1005     (should (eq js2-ADD (js2-next-token)))
1006     (js2-ts-seek state)
1007     (should (eq 1 js2-ti-lookahead))
1008     (should (eq js2-NUMBER (js2-next-token)))
1009     (should (eq 1 (js2-token-number
1010                    (js2-current-token))))))
1011
1012 (js2-deftest get-token-template-literal "`abc ${i} z ${j} def`"
1013   (js2-init-scanner)
1014   (should (eq js2-TEMPLATE_HEAD (js2-next-token)))
1015   (should (equal "abc " (js2-current-token-string)))
1016   (should (eq js2-NAME (js2-next-token)))
1017   (should (eq js2-RC (js2-next-token)))
1018   (should (eq js2-TEMPLATE_HEAD (js2-next-token 'TEMPLATE_TAIL)))
1019   (should (equal " z " (js2-current-token-string)))
1020   (should (eq js2-NAME (js2-next-token)))
1021   (should (eq js2-RC (js2-next-token)))
1022   (should (eq js2-NO_SUBS_TEMPLATE (js2-next-token 'TEMPLATE_TAIL)))
1023   (should (equal " def" (js2-current-token-string))))
1024
1025 ;;; Error handling
1026
1027 (js2-deftest for-node-with-error-len "for "
1028   (js2-mode)
1029   (let ((node (js2-node-at-point (point-min))))
1030     (should (= (js2-node-len (js2-node-parent node)) 4))))
1031
1032 (js2-deftest function-without-parens-error "function b {}"
1033   ;; Should finish the parse.
1034   (js2-mode))
1035
1036 ;;; Comments
1037
1038 (js2-deftest comment-node-length "//"
1039   (js2-mode)
1040   (let ((node (js2-node-at-point (point-min))))
1041     (should (= (js2-node-len node) 2))))
1042
1043 (js2-deftest comment-node-length-newline "//\n"
1044   (js2-mode)
1045   (let ((node (js2-node-at-point (point-min))))
1046     (should (= (js2-node-len node) 3))))
1047
1048 ;;; Variables classification
1049
1050 (defun js2--variables-summary (vars)
1051   (let (r)
1052     (setq vars (let (aslist)
1053                  (maphash (lambda (k v) (push (cons k v) aslist)) vars)
1054                  aslist))
1055     (dolist (v (sort vars (lambda (a b) (< (js2-node-abs-pos (js2-symbol-ast-node (car a)))
1056                                       (js2-node-abs-pos (js2-symbol-ast-node (car b)))))))
1057       (let* ((symbol (car v))
1058              (inition (cadr v))
1059              (uses (cddr v))
1060              (symn (js2-symbol-ast-node symbol))
1061              (namen (js2--get-name-node symn)))
1062         (push (format "%s@%s:%s"
1063                       (js2-symbol-name symbol)
1064                       (js2-node-abs-pos namen)
1065                       (if (eq inition ?P)
1066                           "P"
1067                         (if uses
1068                             (if inition "I" "N")
1069                           "U"))) r)
1070         (dolist (u (sort (cddr v) (lambda (a b) (< (js2-node-abs-pos a)
1071                                               (js2-node-abs-pos b)))))
1072           (push (js2-node-abs-pos u) r))))
1073     (reverse r)))
1074
1075 (defmacro js2-deftest-classify-variables (name buffer-contents summary)
1076  (declare (indent defun))
1077   `(ert-deftest ,(intern (format "js2-classify-variables-%s" name)) ()
1078      (with-temp-buffer
1079        (save-excursion
1080          (insert ,buffer-contents))
1081        (unwind-protect
1082            (progn
1083              (js2-mode)
1084              (should (equal ,summary (js2--variables-summary
1085                                       (js2--classify-variables)))))
1086          (fundamental-mode)))))
1087
1088 (js2-deftest-classify-variables incomplete-var-statement
1089   "var"
1090   '())
1091
1092 (js2-deftest-classify-variables unused-variable
1093   "function foo () { var x; return 42; }"
1094   '("foo@10:U" "x@23:U"))
1095
1096 (js2-deftest-classify-variables unused-variable-declared-twice
1097   "function foo (a) { var x; function bar () { var x; x=42; }; return a;}"
1098   '("foo@10:U" "a@15:P" 68 "x@24:U" "bar@36:U" "x@49:U"))
1099
1100 (js2-deftest-classify-variables assigned-variable
1101   "function foo () { var x; x=42; return x; }"
1102   '("foo@10:U" "x@23:I" 39))
1103
1104 (js2-deftest-classify-variables assignment-in-nested-function
1105   "function foo () { var x; function bar () { x=42; }; }"
1106   '("foo@10:U" "x@23:U" "bar@35:U"))
1107
1108 (js2-deftest-classify-variables unused-nested-function
1109   "function foo() { var i, j=1; function bar() { var x, y=42, z=i; return y; } return i; }"
1110   '("foo@10:U" "i@22:N" 62 84 "j@25:U" "bar@39:U" "x@51:U" "y@54:I" 72 "z@60:U"))
1111
1112 (js2-deftest-classify-variables prop-get-initialized
1113   "function foo () { var x, y={}; y.a=x; }"
1114   '("foo@10:U" "x@23:N" 36 "y@26:I" 32))
1115
1116 (js2-deftest-classify-variables prop-get-uninitialized
1117   "function foo () { var x; if(x.foo) alert('boom'); }"
1118   '("foo@10:U" "x@23:N" 29))
1119
1120 (js2-deftest-classify-variables prop-get-function-assignment
1121   "(function(w) { w.f = function() { var a=42, m; return a; }; })(window);"
1122   '("w@11:P" 11 16 "a@39:I" 55 "m@45:U"))
1123
1124 (js2-deftest-classify-variables let-declaration
1125   "function foo () { let x,y=1; return x; }"
1126   '("foo@10:U" "x@23:N" 37 "y@25:U"))
1127
1128 (js2-deftest-classify-variables external-function-call
1129   "function foo (m) { console.log(m, arguments); }"
1130   '("foo@10:U" "m@15:P" 32))
1131
1132 (js2-deftest-classify-variables global-function-call
1133   "function bar () { return 42; } function foo (a) { return bar(); }"
1134   '("bar@10:I" 58 "foo@41:U" "a@46:P"))
1135
1136 (js2-deftest-classify-variables let-declaration-for-scope
1137   "function foo () { for(let x=1,y; x<y; y++) {} }"
1138   '("foo@10:U" "x@27:I" 34 "y@31:N" 36 39))
1139
1140 (js2-deftest-classify-variables arguments-implicit-var
1141   "function foo () { var p; for(p in arguments) { return p; } }"
1142   '("foo@10:U" "p@23:I" 55))
1143
1144 (js2-deftest-classify-variables catch-error-variable
1145   "function foo () { try { throw 'Foo'; } catch (e) { console.log(e); }"
1146   '("foo@10:U" "e@47:I" 64))
1147
1148 (js2-deftest-classify-variables prop-get-assignment
1149   "function foo () { var x={y:{z:{}}}; x.y.z=42; }"
1150   '("foo@10:U" "x@23:I" 37))
1151
1152 (js2-deftest-classify-variables unused-function-argument
1153   "function foo (a) { return 42; }"
1154   '("foo@10:U" "a@15:P"))
1155
1156 (js2-deftest-classify-variables used-function-argument
1157   "function foo (a) { a=42; return a; }"
1158   '("foo@10:U" "a@15:P" 33))
1159
1160 (js2-deftest-classify-variables prop-get
1161   "function foo (a) { a=navigator.x||navigator.y; return a; }"
1162   '("foo@10:U" "a@15:P" 55))
1163
1164 (js2-deftest-classify-variables for-in-loop
1165   "function foo () { var d={}; for(var k in d) {var v=d[k]; } }"
1166   '("foo@10:U" "d@23:I" 42 52 "k@37:I" 54 "v@50:U"))
1167
1168 (js2-deftest-classify-variables array-comprehension-legacy
1169   "function foo() { var j,a=[for (i of [1,2,3]) i*j]; }"
1170   '("foo@10:U" "j@22:N" 48 "a@24:U" "i@32:I" 46))
1171
1172 (js2-deftest-classify-variables array-comprehension
1173   "function foo() { var j,a=[[i,j] for (i of [1,2,3])]; }"
1174   '("foo@10:U" "j@22:N" 30 "a@24:U" "i@38:I" 28))
1175
1176 (js2-deftest-classify-variables return-named-function
1177   "function foo() { var a=42; return function bar() { return a; } }"
1178   '("foo@10:U" "a@22:I" 59 "bar@44:I" 44))
1179
1180 (js2-deftest-classify-variables named-wrapper-function
1181   "function foo() { var a; (function bar() { a=42; })(); return a; }"
1182   '("foo@10:U" "a@22:I" 62 "bar@35:I" 35))