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 ;;; Callers of `js2-valid-prop-name-token'
 130
 131 (js2-deftest-parse parse-property-access-when-not-keyword
 132   "A.foo = 3;")
 133
 134 (js2-deftest-parse parse-property-access-when-keyword
 135   "A.in = 3;"
 136   :bind ((js2-allow-keywords-as-property-names t)))
 137
 138 (js2-deftest-parse parse-property-access-when-keyword-no-xml
 139   "A.in = 3;"
 140   :bind ((js2-allow-keywords-as-property-names t)
 141          (js2-compiler-xml-available nil)))
 142
 143 (js2-deftest-parse parse-object-literal-when-not-keyword
 144   "a = {b: 1};")
 145
 146 (js2-deftest-parse parse-object-literal-when-keyword
 147   "a = {in: 1};"
 148   :bind ((js2-allow-keywords-as-property-names t)))
 149
 150 ;;; 'of' contextual keyword
 151
 152 (js2-deftest-parse parse-legacy-array-comp-loop-with-of
 153   "[a for (a of [])];")
 154
 155 (js2-deftest-parse parse-array-comp-loop
 156   "[for (a of []) a];")
 157
 158 (js2-deftest-parse parse-for-of
 159   "for (var a of []) {\n}")
 160
 161 (js2-deftest-parse of-can-be-var-name
 162   "var of = 3;")
 163
 164 (js2-deftest-parse of-can-be-function-name
 165   "function of() {\n}")
 166
 167 ;;; Destructuring binding
 168
 169 (js2-deftest-parse destruct-in-declaration
 170   "var {a, b} = {a: 1, b: 2};")
 171
 172 (js2-deftest-parse destruct-in-arguments
 173   "function f({a: aa, b: bb}) {\n}")
 174
 175 (js2-deftest-parse destruct-in-array-comp-loop
 176   "[a + b for ([a, b] in [[0, 1], [1, 2]])];")
 177
 178 (js2-deftest-parse destruct-in-catch-clause
 179   "try {\n} catch ({a, b}) {\n  a + b;\n}")
 180
 181 ;;; Object literals
 182
 183 (js2-deftest-parse object-literal-shorthand
 184   "var x = {a: 1, b, c: 1, d};")
 185
 186 (js2-deftest-parse object-literal-shorthard-with-number
 187   "var a = {1};" :syntax-error "}" :errors-count 2)
 188
 189 (js2-deftest-parse object-literal-method
 190   "var x = {f(y) {  return y;\n}};")
 191
 192 (js2-deftest-parse object-literal-getter-method
 193   "var x = {get f() {  return 42;\n}};")
 194
 195 (js2-deftest-parse object-literal-setter-method
 196   "var x = {set f(y) {  x = y;\n}};")
 197
 198 (js2-deftest-parse object-literal-computed-keys
 199   "var x = {[Symbol.iterator]: function() {}};")
 200
 201 (js2-deftest-parse object-literal-computed-function-keys
 202   "var x = {[foo + bar](y) {  return y;\n}};")
 203
 204 (js2-deftest-parse object-literal-computed-getter-key
 205   "var x = {get [foo + bar]() {  return 42;\n}};")
 206
 207 (js2-deftest-parse object-literal-generator
 208   "var x = {*foo() {  yield 42;\n}};")
 209
 210 (js2-deftest-parse object-literal-computed-generator-key
 211   "var x = {*[foo + bar]() {  yield 42;\n}};")
 212
 213 ;;; Function definition
 214
 215 (js2-deftest function-redeclaring-var "var gen = 3; function gen() {};"
 216   (js2-mode)
 217   (should (= (length (js2-ast-root-warnings js2-mode-ast)) 1)))
 218
 219 (js2-deftest function-expression-var-same-name "var gen = function gen() {};"
 220   (js2-mode)
 221   (should (null (js2-ast-root-warnings js2-mode-ast))))
 222
 223 ;;; Function parameters
 224
 225 (js2-deftest-parse function-with-default-parameters
 226   "function foo(a = 1, b = a + 1) {\n}")
 227
 228 (js2-deftest-parse function-with-no-default-after-default
 229   "function foo(a = 1, b) {\n}"
 230   :syntax-error "b")
 231
 232 (js2-deftest-parse function-with-destruct-after-default
 233   "function foo(a = 1, {b, c}) {\n}"
 234   :syntax-error "{")
 235
 236 (js2-deftest-parse function-with-rest-parameter
 237   "function foo(a, b, ...rest) {\n}")
 238
 239 (js2-deftest-parse function-with-param-after-rest-parameter
 240   "function foo(a, ...b, rest) {\n}"
 241   :syntax-error "rest")
 242
 243 (js2-deftest-parse function-with-destruct-after-rest-parameter
 244   "function foo(a, ...b, {}) {\n}"
 245   :syntax-error "{}")
 246
 247 (js2-deftest-parse function-with-rest-after-default-parameter
 248   "function foo(a = 1, ...rest) {\n}")
 249
 250 ;;; Strict identifiers
 251
 252 (js2-deftest-parse function-bad-strict-parameters
 253   "'use strict';\nfunction foo(eval, {arguments}, bar) {\n}"
 254   :syntax-error "eval" :errors-count 2)
 255
 256 (js2-deftest-parse function-retroactive-bad-strict-parameters
 257   "function foo(arguments) {'use strict';}"
 258   :syntax-error "arguments" :errors-count 1)
 259
 260 (js2-deftest-parse function-duplicate-strict-parameters
 261   "'use strict';\nfunction foo(a, a) {\n}"
 262   :syntax-error "a" :errors-count 1)
 263
 264 (js2-deftest-parse function-bad-strict-function-name
 265   "'use strict';\nfunction eval() {\n}"
 266   :syntax-error "eval" :errors-count 1)
 267
 268 (js2-deftest-parse function-bad-retroactive-strict-function-name
 269   "function arguments() {'use strict';}"
 270   :syntax-error "arguments" :errors-count 1)
 271
 272 (js2-deftest-parse function-bad-strict-catch-name
 273   "'use strict';\ntry {} catch (eval) {}"
 274   :syntax-error "eval" :errors-count 1)
 275
 276 (js2-deftest-parse function-bad-strict-variable-name
 277   "'use strict';\nvar eval = 'kekeke';"
 278   :syntax-error "eval" :errors-count 1)
 279
 280 (js2-deftest-parse function-bad-strict-assignment
 281   "'use strict';\narguments = 'fufufu';"
 282   :syntax-error "arguments" :errors-count 1)
 283
 284 ;;; Strict syntax errors
 285
 286 (js2-deftest-parse function-strict-with
 287   "'use strict';\nwith ({}) {}"
 288   :syntax-error "with" :errors-count 1)
 289
 290 ;;; Spread operator
 291
 292 (js2-deftest-parse spread-in-array-literal
 293   "[1, ...[2, 3], 4, ...[5, 6]];")
 294
 295 (js2-deftest-parse spread-in-function-call
 296   "f(3, ...[t(2), t(3)], 42, ...[t(4)]);")
 297
 298 ;;; Arrow functions
 299
 300 (js2-deftest-parse arrow-function-with-empty-args-and-no-curlies
 301   "() => false;" :reference "() => {false};")
 302
 303 (js2-deftest-parse arrow-function-with-args-and-curlies
 304   "(a, b = 1, ...c) => {  c;\n};")
 305
 306 (js2-deftest-parse arrow-function-with-destructuring
 307   "([{a}, b]) => {  a + b;\n};")
 308
 309 (js2-deftest-parse parenless-arrow-function-prohibits-rest
 310   "...b => {b + 1;};" :syntax-error "=>")
 311
 312 (js2-deftest-parse parenless-arrow-function-prohibits-destructuring
 313   "[a, b] => {a + b;};" :syntax-error "]" :errors-count 4)
 314
 315 (js2-deftest-parse arrow-function-recovers-from-error
 316   "[(,foo) => 1];" :syntax-error "," :errors-count 6)
 317
 318 ;;; Automatic semicolon insertion
 319
 320 (js2-deftest-parse no-auto-semi-insertion-after-if
 321   "if (true) {\n}")
 322
 323 (js2-deftest-parse auto-semi-insertion-after-function
 324   "a = function() {}" :reference "a = function() {};")
 325
 326 (js2-deftest-parse auto-semi-one-variable-per-line
 327   "x\ny" :reference "x;\ny;")
 328
 329 ;;; Labels
 330
 331 (js2-deftest-parse labeled-stmt-node
 332   "foo:\nbar:\nx = y + 1;")
 333
 334 (js2-deftest no-label-node-inside-expr "x = y:"
 335   (let (js2-parse-interruptable-p)
 336     (js2-mode))
 337   (let ((assignment (js2-expr-stmt-node-expr (car (js2-scope-kids js2-mode-ast)))))
 338     (should (js2-name-node-p (js2-assign-node-right assignment)))))
 339
 340 (js2-deftest-parse label-and-loops "for (; ; ) {
 341   loop:
 342   for (; ; ) {
 343     continue loop;
 344   }
 345 }")
 346
 347 ;;; Generators
 348
 349 (js2-deftest-parse legacy-generator "function foo() {\n  yield 1;\n}")
 350
 351 (js2-deftest-parse legacy-generator-cannot-return
 352   "function foo() {\n  yield 1;\n return 2;\n}" :syntax-error "return 2")
 353
 354 (js2-deftest-parse harmony-generator "function* bar() {\n  yield 2;\n  return 3;\n}")
 355
 356 (js2-deftest-parse harmony-generator-yield-star "(function*(a) {  yield* a;\n});")
 357
 358 ;;; Comprehensions
 359
 360 (js2-deftest-parse parse-legacy-array-comp-loop-with-filter
 361   "[a for (a in b) if (a == 2)];")
 362
 363 (js2-deftest-parse parse-array-comp-loop-with-filters
 364   "[for (a in b) if (a == 2) if (b != 10) a];")
 365
 366 (js2-deftest-parse parse-generator-comp-loop-with-filters
 367   "(for (x of y) if (x != 4) x);")
 368
 369 (js2-deftest-parse parse-array-comp-with-yield-is-ok
 370   "(function() {  return [for (x of []) yield x];\n});")
 371
 372 (js2-deftest-parse parse-generator-comp-with-yield-is-not-ok
 373   "(function() {  return (for (x of []) yield x);\n});"
 374   :syntax-error "yield")
 375
 376 (js2-deftest-parse parse-generator-comp-with-yield-inside-function-is-ok
 377   "(for (x of []) function*() {  yield x;\n});")
 378
 379 ;;; Numbers
 380
 381 (js2-deftest-parse decimal-starting-with-zero "081;" :reference "81;")
 382
 383 (js2-deftest-parse huge-hex "0x0123456789abcdefABCDEF;" :reference "-1;")
 384
 385 (js2-deftest-parse octal-without-o "071;" :reference "57;")
 386
 387 (js2-deftest-parse hex-number-okay "0x123;" :reference "291;")
 388
 389 (js2-deftest-parse hex-number-broken "0xz23;"
 390   :syntax-error "0xz" :errors-count 2)
 391
 392 (js2-deftest-parse binary-number-okay "0b101;" :reference "5;")
 393
 394 (js2-deftest-parse binary-number-broken "0b210;"
 395   :syntax-error "0b2" :errors-count 2)
 396
 397 (js2-deftest-parse octal-number-okay "0o765;" :reference "501;")
 398
 399 (js2-deftest-parse octal-number-broken "0o812;"
 400   :syntax-error "0o8" :errors-count 2)
 401
 402 ;;; Modules
 403
 404 (js2-deftest parse-export-bindings "{one, two as dos}"
 405   (js2-init-scanner)
 406   (should (js2-match-token js2-LC))
 407   (let ((imports (js2-parse-export-bindings)))
 408     (should (not (equal nil imports)))
 409     (should (= 2 (length imports)))
 410     (let ((first (nth 0 imports))
 411           (second (nth 1 imports)))
 412       (should (equal "one" (js2-name-node-name (js2-export-binding-node-extern-name first))))
 413       (should (equal "two" (js2-name-node-name (js2-export-binding-node-extern-name second))))
 414       (let ((first-name (js2-export-binding-node-local-name first))
 415             (second-name (js2-export-binding-node-local-name second)))
 416         (should (equal first (js2-node-parent first-name)))
 417         (should (equal 3 (js2-node-len first-name)))
 418         (should (equal "one" (js2-name-node-name first-name)))
 419         (should (equal second (js2-node-parent second-name)))
 420         (should (equal 3 (js2-node-len second-name)))
 421         (should (equal "dos" (js2-name-node-name second-name)))))))
 422
 423 (js2-deftest parse-export-binding-as-default "one as default"
 424   (js2-init-scanner)
 425   (let ((binding (js2-maybe-parse-export-binding)))
 426     (should binding)
 427     (should (js2-export-binding-node-p binding))
 428     (let ((name (js2-export-binding-node-local-name binding)))
 429       (should name)
 430       (should (equal "default" (js2-name-node-name name))))))
 431
 432 (js2-deftest parse-namepsace-import "* as lib;"
 433   (js2-init-scanner)
 434   (should (js2-match-token js2-MUL))
 435   (let ((namespace-import (js2-parse-namespace-import)))
 436     (should (not (equal nil namespace-import)))
 437     (should (js2-namespace-import-node-p namespace-import))
 438     (should (= 1 (js2-node-pos namespace-import)))
 439     (should (equal 8 (js2-node-len namespace-import)))
 440     (let ((name-node (js2-namespace-import-node-name namespace-import)))
 441       (should (equal "lib" (js2-name-node-name name-node)))
 442       (should (= 5 (js2-node-pos name-node))))))
 443
 444 (js2-deftest parse-from-clause "from 'foo/bar';"
 445   (js2-init-scanner)
 446   (let ((from (js2-parse-from-clause)))
 447     (should (not (equal nil from)))
 448     (should (= 1 (js2-node-pos from)))
 449     (should (= 14 (js2-node-len from)))
 450     (should (equal "foo/bar" (js2-from-clause-node-module-id from)))))
 451
 452 (js2-deftest parse-import-module-id-only "import 'src/lib'"
 453   (js2-init-scanner)
 454   (should (js2-match-token js2-IMPORT))
 455   (let ((import (js2-parse-import)))
 456     (should (not (equal nil import)))
 457     (should (= 1 (js2-node-pos import)))
 458     (should (= 16 (js2-node-len import)))
 459     (should (equal nil (js2-import-node-import import)))
 460     (should (equal nil (js2-import-node-from import)))))
 461
 462 (js2-deftest parse-imported-default-binding "import theDefault from 'src/lib'"
 463   (js2-push-scope (make-js2-scope :pos 0))
 464   (js2-init-scanner)
 465   (should (js2-match-token js2-IMPORT))
 466   (let ((import-node (js2-parse-import)))
 467     (should (not (equal nil import-node)))
 468     (should (equal "src/lib" (js2-import-node-module-id import-node)))
 469     (let ((import (js2-import-node-import import-node)))
 470       (should (not (equal nil import)))
 471       (should (equal nil (js2-import-clause-node-namespace-import import)))
 472       (should (equal nil (js2-import-clause-node-named-imports import)))
 473       (let ((default (js2-import-clause-node-default-binding import)))
 474         (should (not (equal nil default)))
 475         (should (js2-export-binding-node-p default))
 476         (should (equal "theDefault" (js2-name-node-name (js2-export-binding-node-extern-name default)))))))
 477   (should (js2-scope-get-symbol js2-current-scope "theDefault")))
 478
 479 (js2-deftest parse-import-namespace-binding "import * as lib from 'src/lib'"
 480   (js2-push-scope (make-js2-scope :pos 0))
 481   (js2-init-scanner)
 482   (should (js2-match-token js2-IMPORT))
 483   (let ((import-node (js2-parse-import)))
 484     (should (not (equal nil import-node)))
 485     (should (equal "src/lib" (js2-import-node-module-id import-node)))
 486     (let ((import (js2-import-node-import import-node)))
 487       (should (not (equal nil import)))
 488       (should (equal nil (js2-import-clause-node-default-binding import)))
 489       (should (equal nil (js2-import-clause-node-named-imports import)))
 490       (let ((ns-import (js2-import-clause-node-namespace-import import)))
 491         (should (not (equal nil ns-import)))
 492         (should (js2-namespace-import-node-p ns-import))
 493         (should (equal "lib" (js2-name-node-name (js2-namespace-import-node-name ns-import)))))))
 494   (should (js2-scope-get-symbol js2-current-scope "lib")))
 495
 496 (js2-deftest parse-import-named-imports "import {foo as bar, baz} from 'src/lib'"
 497   (js2-push-scope (make-js2-scope :pos 0))
 498   (js2-init-scanner)
 499   (should (js2-match-token js2-IMPORT))
 500   (let ((import-node (js2-parse-import)))
 501     (should (not (equal nil import-node)))
 502     (should (equal "src/lib" (js2-import-node-module-id import-node)))
 503     (let ((import (js2-import-node-import import-node)))
 504       (should (not (equal nil import)))
 505       (should (equal nil (js2-import-clause-node-default-binding import)))
 506       (should (equal nil (js2-import-clause-node-namespace-import import)))
 507       (let ((named-imports (js2-import-clause-node-named-imports import)))
 508         (should (not (equal nil named-imports)))
 509         (should (listp named-imports))
 510         (should (= 2 (length named-imports)))
 511         (let ((first (nth 0 named-imports))
 512               (second (nth 1 named-imports)))
 513           (should (equal "bar" (js2-name-node-name (js2-export-binding-node-local-name first))))
 514           (should (equal "baz" (js2-name-node-name (js2-export-binding-node-local-name second))))))))
 515   (should (js2-scope-get-symbol js2-current-scope "bar"))
 516   (should (js2-scope-get-symbol js2-current-scope "baz")))
 517
 518 (js2-deftest parse-import-default-and-namespace "import stuff, * as lib from 'src/lib'"
 519   (js2-push-scope (make-js2-scope :pos 0))
 520   (js2-init-scanner)
 521   (should (js2-match-token js2-IMPORT))
 522   (let ((import-node (js2-parse-import)))
 523     (should (not (equal nil import-node)))
 524     (should (equal "src/lib" (js2-import-node-module-id import-node)))
 525     (let ((import (js2-import-node-import import-node)))
 526       (should (not (equal nil import)))
 527       (should (equal nil (js2-import-clause-node-named-imports import)))
 528       (let ((default (js2-import-clause-node-default-binding import))
 529             (ns-import (js2-import-clause-node-namespace-import import)))
 530         (should (not (equal nil default)))
 531         (should (equal "stuff" (js2-name-node-name (js2-export-binding-node-local-name default))))
 532         (should (not (equal nil ns-import)))
 533         (should (js2-namespace-import-node-p ns-import))
 534         (should (equal "lib" (js2-name-node-name (js2-namespace-import-node-name ns-import)))))))
 535   (should (js2-scope-get-symbol js2-current-scope "stuff"))
 536   (should (js2-scope-get-symbol js2-current-scope "lib")))
 537
 538 (js2-deftest parse-import-default-and-named-imports
 539   "import robert as bob, {cookies, pi as PIE} from 'src/lib'"
 540   (js2-push-scope (make-js2-scope :pos 0))
 541   (js2-init-scanner)
 542   (should (js2-match-token js2-IMPORT))
 543   (let ((import-node (js2-parse-import)))
 544     (should (not (equal nil import-node)))
 545     (should (equal "src/lib" (js2-import-node-module-id import-node)))
 546     (let ((import (js2-import-node-import import-node)))
 547       (should (not (equal nil import)))
 548       (should (not (equal nil (js2-import-clause-node-named-imports import))))
 549       (let ((default (js2-import-clause-node-default-binding import))
 550             (named-imports (js2-import-clause-node-named-imports import)))
 551         (should (not (equal nil default)))
 552         (should (equal "bob" (js2-name-node-name (js2-export-binding-node-local-name default))))
 553         (should (not (equal nil named-imports)))
 554         (should (= 2 (length named-imports))))))
 555   (should (js2-scope-get-symbol js2-current-scope "bob"))
 556   (should (js2-scope-get-symbol js2-current-scope "cookies"))
 557   (should (js2-scope-get-symbol js2-current-scope "PIE")))
 558
 559 (js2-deftest parse-this-module-in-from-clause "import {url} from this module;"
 560   (js2-push-scope (make-js2-scope :pos 0))
 561   (js2-init-scanner)
 562   (should (js2-match-token js2-IMPORT))
 563   (let ((import-node (js2-parse-import)))
 564     (should import-node)
 565     (let ((from-clause (js2-import-node-from import-node)))
 566       (should from-clause)
 567       (should (equal "this" (js2-from-clause-node-module-id from-clause)))
 568       (should (js2-from-clause-node-metadata-p from-clause)))))
 569
 570 (js2-deftest-parse import-only-for-side-effects "import 'src/lib';")
 571 (js2-deftest-parse import-default-only "import theDefault from 'src/lib';")
 572 (js2-deftest-parse import-named-only "import {one, two} from 'src/lib';")
 573 (js2-deftest-parse import-default-and-named "import theDefault, {one, two} from 'src/lib';")
 574 (js2-deftest-parse import-renaming-default "import * as lib from 'src/mylib';")
 575 (js2-deftest-parse import-renaming-named "import {one as uno, two as dos} from 'src/lib';")
 576 (js2-deftest-parse import-default-and-namespace "import robert as bob, * as lib from 'src/lib';")
 577 (js2-deftest-parse import-from-this-module "import {url} from this module;")
 578
 579 ;; Module Exports
 580
 581 (js2-deftest export-rexport "export * from 'other/lib'"
 582   (js2-init-scanner)
 583   (should (js2-match-token js2-EXPORT))
 584   (let ((export-node (js2-parse-export)))
 585     (should export-node)
 586     (should (js2-export-node-from-clause export-node))))
 587
 588 (js2-deftest export-export-named-list "export {foo, bar as bang};"
 589   (js2-init-scanner)
 590   (should (js2-match-token js2-EXPORT))
 591   (let ((export-node (js2-parse-export)))
 592     (should export-node)
 593     (let ((exports (js2-export-node-exports-list export-node)))
 594       (should exports)
 595       (should (= 2 (length exports))))))
 596
 597 (js2-deftest re-export-named-list "export {foo, bar as bang} from 'other/lib'"
 598   (js2-init-scanner)
 599   (should (js2-match-token js2-EXPORT))
 600   (let ((export-node (js2-parse-export)))
 601     (should export-node)
 602     (should (js2-export-node-from-clause export-node))
 603     (let ((exports (js2-export-node-exports-list export-node)))
 604       (should exports)
 605       (should (= 2 (length exports))))))
 606
 607 (js2-deftest export-variable-statement "export var foo = 'bar', baz = 'bang';"
 608   (js2-init-scanner)
 609   (js2-push-scope (make-js2-scope :pos 0))
 610   (should (js2-match-token js2-EXPORT))
 611   (let ((export-node (js2-parse-export)))
 612     (should export-node)
 613     (should (js2-export-node-declaration export-node))))
 614
 615 (js2-deftest export-const-declaration "export const PI = Math.PI;"
 616   (js2-init-scanner)
 617   (js2-push-scope (make-js2-scope :pos 0))
 618   (should (js2-match-token js2-EXPORT))
 619   (let ((export-node (js2-parse-export)))
 620     (should export-node)
 621     (should (js2-export-node-declaration export-node))))
 622
 623 (js2-deftest export-let-declaration "export let foo = [1];"
 624   (js2-init-scanner)
 625   (js2-push-scope (make-js2-scope :pos 0))
 626   (should (js2-match-token js2-EXPORT))
 627   (let ((export-node (js2-parse-export)))
 628     (should export-node)
 629     (should (js2-var-decl-node-p (js2-export-node-declaration export-node)))))
 630
 631 (js2-deftest export-class-declaration "export class Foo {};"
 632   (js2-init-scanner)
 633   (js2-push-scope (make-js2-scope :pos 0))
 634   (should (js2-match-token js2-EXPORT))
 635   (let ((export-node (js2-parse-export)))
 636     (should export-node)
 637     (should (js2-class-node-p (js2-export-node-declaration export-node)))))
 638
 639 (js2-deftest export-function-declaration "export default function doStuff() {};"
 640   (js2-init-scanner)
 641   (js2-push-scope (make-js2-scope :pos 0))
 642   (should (js2-match-token js2-EXPORT))
 643   (let ((export-node (js2-parse-export)))
 644     (should export-node)
 645     (should (js2-export-node-default export-node))))
 646
 647 (js2-deftest export-generator-declaration "export default function* one() {};"
 648   (js2-init-scanner)
 649   (js2-push-scope (make-js2-scope :pos 0))
 650   (should (js2-match-token js2-EXPORT))
 651   (let ((export-node (js2-parse-export)))
 652     (should export-node)
 653     (should (js2-export-node-default export-node))))
 654
 655 (js2-deftest export-assignment-expression "export default a = b;"
 656   (js2-init-scanner)
 657   (js2-push-scope (make-js2-scope :pos 0))
 658   (should (js2-match-token js2-EXPORT))
 659   (let ((export-node (js2-parse-export)))
 660     (should export-node)
 661     (should (js2-export-node-default export-node))))
 662
 663 (js2-deftest export-function-no-semicolon "export default function foo() {}"
 664   (js2-mode)
 665   (should (equal nil js2-parsed-warnings)))
 666 (js2-deftest export-default-function-no-semicolon "export function foo() {}"
 667   (js2-mode)
 668   (should (equal nil js2-parsed-warnings)))
 669 (js2-deftest export-anything-else-does-require-a-semicolon "export var obj = {}"
 670   (js2-mode)
 671   (should (not (equal nil js2-parsed-warnings))))
 672
 673 (js2-deftest-parse parse-export-rexport "export * from 'other/lib';")
 674 (js2-deftest-parse parse-export-export-named-list "export {foo, bar as bang};")
 675 (js2-deftest-parse parse-re-export-named-list "export {foo, bar as bang} from 'other/lib';")
 676 (js2-deftest-parse parse-export-const-declaration "export const PI = Math.PI;")
 677 (js2-deftest-parse parse-export-let-declaration "export let foo = [1];")
 678 (js2-deftest-parse parse-export-function-declaration "export default function doStuff() {};")
 679 (js2-deftest-parse parse-export-generator-declaration "export default function* one() {};")
 680 (js2-deftest-parse parse-export-assignment-expression "export default a = b;")
 681
 682 ;;; Strings
 683
 684 (js2-deftest-parse string-literal
 685   "var x = 'y';")
 686
 687 (js2-deftest-parse object-get-string-literal
 688   "var x = {y: 5};\nvar z = x[\"y\"];")
 689
 690 (js2-deftest-parse template-no-substritutions
 691   "var x = `abc
 692             def`, y = `\\u0000`;")
 693
 694 (js2-deftest-parse template-with-substitutions
 695   "var y = `${a + b} ${d + e + f}`;")
 696
 697 (js2-deftest-parse tagged-template
 698   "foo.args`${++x, \"o\"}k`;")
 699
 700 ;;; Classes
 701
 702 (js2-deftest-parse parse-harmony-class-statement
 703   "class Foo {\n  get bar() {  return 42;\n}\n  set bar(x) {  y = x;\n}\n}")
 704
 705 (js2-deftest-parse parse-harmony-class-statement-without-name-is-not-ok
 706   "class {\n  get bar() {  return 42;\n}\n}"
 707   :syntax-error "{")
 708
 709 (js2-deftest-parse parse-harmony-class-expression
 710   "var Foo1 = class Foo {\n  bar() {  return 42;\n}\n};")
 711
 712 (js2-deftest-parse parse-harmony-anonymous-class-expression
 713   "var Foo = class {\n  set bar(x) {  bar = x;\n}\n};")
 714
 715 (js2-deftest-parse parse-harmony-class-with-extends
 716   "class Foo extends Bar {\n}")
 717
 718 (js2-deftest-parse parse-harmony-anonymous-class-with-extends
 719   "foo.Foo = class extends Bar {\n  set bar(x) {  bar = x;\n}\n};")
 720
 721 (js2-deftest-parse parse-harmony-class-with-complex-extends
 722   "class Foo extends foo[BAR][2].Baz {\n}")
 723
 724 (js2-deftest-parse parse-harmony-class-missing-extended-class-is-not-ok
 725   "class Foo extends {\n}"
 726   :syntax-error "extends")
 727
 728 (js2-deftest-parse parse-harmony-class-static-method
 729   "class Foo extends Bar {\n  static bar() {  return 42;\n}\n}")
 730
 731 (js2-deftest-parse parse-unterminated-class-is-not-okay
 732   "class Foo {\n  get bar() {  return 42;\n}"
 733   :syntax-error "}")
 734
 735 (js2-deftest-parse parse-super-keyword
 736   "class Foo {\n  constructor() {  super(42);\n}\n  foo() {  super.foo();\n}\n}")
 737
 738 (js2-deftest-parse parse-class-keywordlike-method
 739   "class C {\n  delete() {}\n  if() {}\n}")
 740
 741 ;;; Scopes
 742
 743 (js2-deftest ast-symbol-table-includes-fn-node "function foo() {}"
 744   (js2-mode)
 745   (let ((entry (js2-scope-get-symbol js2-mode-ast 'foo)))
 746     (should (= (js2-symbol-decl-type entry) js2-FUNCTION))
 747     (should (equal (js2-symbol-name entry) "foo"))
 748     (should (js2-function-node-p (js2-symbol-ast-node entry)))))
 749
 750 (js2-deftest fn-symbol-table-includes-nested-fn "function foo() {
 751   function bar() {}
 752   var x;
 753 }"
 754   (js2-mode)
 755   (let* ((scope (js2-node-at-point (point-min)))
 756          (fn-entry (js2-scope-get-symbol scope 'bar))
 757          (var-entry (js2-scope-get-symbol scope 'x)))
 758     (should (string= (js2-name-node-name (js2-function-node-name scope)) "foo"))
 759     (should (= (js2-symbol-decl-type fn-entry) js2-FUNCTION))
 760     (should (js2-function-node-p (js2-symbol-ast-node fn-entry)))
 761     (should (= (js2-symbol-decl-type var-entry) js2-VAR))
 762     (should (js2-name-node-p (js2-symbol-ast-node var-entry)))))
 763
 764 (defun js2-test-scope-of-nth-variable-satisifies-predicate (variable nth predicate)
 765   (goto-char (point-min))
 766   (dotimes (n (1+ nth)) (search-forward variable))
 767   (forward-char -1)
 768   (let ((scope (js2-node-get-enclosing-scope (js2-node-at-point))))
 769     (should (funcall predicate (js2-get-defining-scope scope variable)))))
 770
 771 (js2-deftest for-node-is-declaration-scope "for (let i = 0; i; ++i) {};"
 772   (js2-mode)
 773   (js2-test-scope-of-nth-variable-satisifies-predicate "i" 0 #'js2-for-node-p))
 774
 775 (js2-deftest const-scope-sloppy-script "{const a;} a;"
 776   (js2-mode)
 777   (js2-test-scope-of-nth-variable-satisifies-predicate "a" 0 #'js2-script-node-p)
 778   (js2-test-scope-of-nth-variable-satisifies-predicate "a" 1 #'js2-script-node-p))
 779
 780 (js2-deftest const-scope-strict-script "'use strict'; { const a; } a;"
 781   (js2-mode)
 782   (js2-test-scope-of-nth-variable-satisifies-predicate "a" 0 #'js2-block-node-p)
 783   (js2-test-scope-of-nth-variable-satisifies-predicate "a" 1 #'null))
 784
 785 (js2-deftest const-scope-sloppy-function "function f() { { const a; } a; }"
 786   (js2-mode)
 787   (js2-test-scope-of-nth-variable-satisifies-predicate "a" 0 #'js2-function-node-p)
 788   (js2-test-scope-of-nth-variable-satisifies-predicate "a" 1 #'js2-function-node-p))
 789
 790 (js2-deftest const-scope-strict-function "function f() { 'use strict'; { const a; } a; }"
 791   (js2-mode)
 792   (js2-test-scope-of-nth-variable-satisifies-predicate "a" 0 #'js2-block-node-p)
 793   (js2-test-scope-of-nth-variable-satisifies-predicate "a" 1 #'null))
 794
 795 (js2-deftest array-comp-is-result-scope "[x * 2 for (x in y)];"
 796   (js2-mode)
 797   (js2-test-scope-of-nth-variable-satisifies-predicate "x" 0 #'js2-comp-loop-node-p))
 798
 799 (js2-deftest array-comp-has-parent-scope
 800              "var a,b=[for (i of [[1,2]]) for (j of i) j * a];"
 801   (js2-mode)
 802   (search-forward "for")
 803   (forward-char -3)
 804   (let ((node (js2-node-at-point)))
 805     (should (js2-scope-parent-scope node))
 806     (should (js2-get-defining-scope node "j"))))
 807
 808 ;;; Tokenizer
 809
 810 (js2-deftest get-token "(1+1)"
 811   (js2-init-scanner)
 812   (should (eq js2-LP (js2-next-token)))
 813   (should (eq js2-NUMBER (js2-next-token)))
 814   (should (eq js2-ADD (js2-next-token)))
 815   (should (eq js2-NUMBER (js2-next-token)))
 816   (should (eq js2-RP (js2-next-token))))
 817
 818 (js2-deftest unget-token "()"
 819   (js2-init-scanner)
 820   (should (eq js2-LP (js2-next-token)))
 821   (js2-unget-token)
 822   (should (eq js2-LP (js2-next-token)))
 823   (should (eq js2-RP (js2-next-token))))
 824
 825 (js2-deftest get-token-or-eol "x\n++;"
 826   (js2-init-scanner)
 827   (should (eq js2-NAME (js2-next-token)))
 828   (should (eq js2-EOL (js2-peek-token-or-eol)))
 829   (should (eq js2-INC (js2-next-token)))
 830   (should (eq js2-SEMI (js2-peek-token-or-eol))))
 831
 832 (js2-deftest unget-token-over-eol-and-comment "x\n//abc\ny"
 833   (js2-init-scanner)
 834   (should (eq js2-NAME (js2-next-token)))
 835   (should (eq js2-NAME (js2-next-token)))
 836   (should (equal "y" (js2-current-token-string)))
 837   (js2-unget-token)
 838   (should (eq js2-NAME (js2-current-token-type)))
 839   (should (equal "x" (js2-current-token-string))))
 840
 841 (js2-deftest ts-seek "(1+2)"
 842   (js2-init-scanner)
 843   (should (eq js2-LP (js2-next-token)))
 844   (should (eq js2-NUMBER (js2-next-token)))
 845   (js2-unget-token)
 846   (let ((state (make-js2-ts-state)))
 847     (should (eq js2-NUMBER (js2-next-token)))
 848     (should (eq js2-ADD (js2-next-token)))
 849     (js2-ts-seek state)
 850     (should (eq 1 js2-ti-lookahead))
 851     (should (eq js2-NUMBER (js2-next-token)))
 852     (should (eq 1 (js2-token-number
 853                    (js2-current-token))))))
 854
 855 (js2-deftest get-token-template-literal "`abc ${i} z ${j} def`"
 856   (js2-init-scanner)
 857   (should (eq js2-TEMPLATE_HEAD (js2-next-token)))
 858   (should (equal "abc " (js2-current-token-string)))
 859   (should (eq js2-NAME (js2-next-token)))
 860   (should (eq js2-RC (js2-next-token)))
 861   (should (eq js2-TEMPLATE_HEAD (js2-next-token 'TEMPLATE_TAIL)))
 862   (should (equal " z " (js2-current-token-string)))
 863   (should (eq js2-NAME (js2-next-token)))
 864   (should (eq js2-RC (js2-next-token)))
 865   (should (eq js2-NO_SUBS_TEMPLATE (js2-next-token 'TEMPLATE_TAIL)))
 866   (should (equal " def" (js2-current-token-string))))
 867
 868 ;;; Error handling
 869
 870 (js2-deftest for-node-with-error-len "for "
 871   (js2-mode)
 872   (let ((node (js2-node-at-point (point-min))))
 873     (should (= (js2-node-len (js2-node-parent node)) 4))))
 874
 875 (js2-deftest function-without-parens-error "function b {}"
 876   ;; Should finish the parse.
 877   (js2-mode))
 878
 879 ;;; Comments
 880
 881 (js2-deftest comment-node-length "//"
 882   (js2-mode)
 883   (let ((node (js2-node-at-point (point-min))))
 884     (should (= (js2-node-len node) 2))))
 885
 886 (js2-deftest comment-node-length-newline "//\n"
 887   (js2-mode)
 888   (let ((node (js2-node-at-point (point-min))))
 889     (should (= (js2-node-len node) 3))))
 890
 891 ;;; Variables classification
 892
 893 (defun js2--variables-summary (vars)
 894   (let (r)
 895     (setq vars (let (aslist)
 896                  (maphash (lambda (k v) (push (cons k v) aslist)) vars)
 897                  aslist))
 898     (dolist (v (sort vars (lambda (a b) (< (js2-node-abs-pos (js2-symbol-ast-node (car a)))
 899                                       (js2-node-abs-pos (js2-symbol-ast-node (car b)))))))
 900       (let* ((symbol (car v))
 901              (inition (cadr v))
 902              (uses (cddr v))
 903              (symn (js2-symbol-ast-node symbol))
 904              (namen (js2--get-name-node symn)))
 905         (push (format "%s@%s:%s"
 906                       (js2-symbol-name symbol)
 907                       (js2-node-abs-pos namen)
 908                       (if (eq inition ?P)
 909                           "P"
 910                         (if uses
 911                             (if inition "I" "N")
 912                           "U"))) r)
 913         (dolist (u (sort (cddr v) (lambda (a b) (< (js2-node-abs-pos a)
 914                                               (js2-node-abs-pos b)))))
 915           (push (js2-node-abs-pos u) r))))
 916     (reverse r)))
 917
 918 (defmacro js2-deftest-classify-variables (name buffer-contents summary)
 919  (declare (indent defun))
 920   `(ert-deftest ,(intern (format "js2-classify-variables-%s" name)) ()
 921      (with-temp-buffer
 922        (save-excursion
 923          (insert ,buffer-contents))
 924        (unwind-protect
 925            (progn
 926              (js2-mode)
 927              (should (equal ,summary (js2--variables-summary
 928                                       (js2--classify-variables)))))
 929          (fundamental-mode)))))
 930
 931 (js2-deftest-classify-variables incomplete-var-statement
 932   "var"
 933   '())
 934
 935 (js2-deftest-classify-variables unused-variable
 936   "function foo () { var x; return 42; }"
 937   '("foo@10:U" "x@23:U"))
 938
 939 (js2-deftest-classify-variables unused-variable-declared-twice
 940   "function foo (a) { var x; function bar () { var x; x=42; }; return a;}"
 941   '("foo@10:U" "a@15:P" 68 "x@24:U" "bar@36:U" "x@49:U"))
 942
 943 (js2-deftest-classify-variables assigned-variable
 944   "function foo () { var x; x=42; return x; }"
 945   '("foo@10:U" "x@23:I" 39))
 946
 947 (js2-deftest-classify-variables assignment-in-nested-function
 948   "function foo () { var x; function bar () { x=42; }; }"
 949   '("foo@10:U" "x@23:U" "bar@35:U"))
 950
 951 (js2-deftest-classify-variables unused-nested-function
 952   "function foo() { var i, j=1; function bar() { var x, y=42, z=i; return y; } return i; }"
 953   '("foo@10:U" "i@22:N" 62 84 "j@25:U" "bar@39:U" "x@51:U" "y@54:I" 72 "z@60:U"))
 954
 955 (js2-deftest-classify-variables prop-get-initialized
 956   "function foo () { var x, y={}; y.a=x; }"
 957   '("foo@10:U" "x@23:N" 36 "y@26:I" 32))
 958
 959 (js2-deftest-classify-variables prop-get-uninitialized
 960   "function foo () { var x; if(x.foo) alert('boom'); }"
 961   '("foo@10:U" "x@23:N" 29))
 962
 963 (js2-deftest-classify-variables prop-get-function-assignment
 964   "(function(w) { w.f = function() { var a=42, m; return a; }; })(window);"
 965   '("w@11:P" 11 16 "a@39:I" 55 "m@45:U"))
 966
 967 (js2-deftest-classify-variables let-declaration
 968   "function foo () { let x,y=1; return x; }"
 969   '("foo@10:U" "x@23:N" 37 "y@25:U"))
 970
 971 (js2-deftest-classify-variables external-function-call
 972   "function foo (m) { console.log(m, arguments); }"
 973   '("foo@10:U" "m@15:P" 32))
 974
 975 (js2-deftest-classify-variables global-function-call
 976   "function bar () { return 42; } function foo (a) { return bar(); }"
 977   '("bar@10:I" 58 "foo@41:U" "a@46:P"))
 978
 979 (js2-deftest-classify-variables let-declaration-for-scope
 980   "function foo () { for(let x=1,y; x<y; y++) {} }"
 981   '("foo@10:U" "x@27:I" 34 "y@31:N" 36 39))
 982
 983 (js2-deftest-classify-variables arguments-implicit-var
 984   "function foo () { var p; for(p in arguments) { return p; } }"
 985   '("foo@10:U" "p@23:I" 55))
 986
 987 (js2-deftest-classify-variables catch-error-variable
 988   "function foo () { try { throw 'Foo'; } catch (e) { console.log(e); }"
 989   '("foo@10:U" "e@47:I" 64))
 990
 991 (js2-deftest-classify-variables prop-get-assignment
 992   "function foo () { var x={y:{z:{}}}; x.y.z=42; }"
 993   '("foo@10:U" "x@23:I" 37))
 994
 995 (js2-deftest-classify-variables unused-function-argument
 996   "function foo (a) { return 42; }"
 997   '("foo@10:U" "a@15:P"))
 998
 999 (js2-deftest-classify-variables used-function-argument
1000   "function foo (a) { a=42; return a; }"
1001   '("foo@10:U" "a@15:P" 33))
1002
1003 (js2-deftest-classify-variables prop-get
1004   "function foo (a) { a=navigator.x||navigator.y; return a; }"
1005   '("foo@10:U" "a@15:P" 55))
1006
1007 (js2-deftest-classify-variables for-in-loop
1008   "function foo () { var d={}; for(var k in d) {var v=d[k]; } }"
1009   '("foo@10:U" "d@23:I" 42 52 "k@37:I" 54 "v@50:U"))
1010
1011 (js2-deftest-classify-variables array-comprehension-legacy
1012   "function foo() { var j,a=[for (i of [1,2,3]) i*j]; }"
1013   '("foo@10:U" "j@22:N" 48 "a@24:U" "i@32:I" 46))
1014
1015 (js2-deftest-classify-variables array-comprehension
1016   "function foo() { var j,a=[[i,j] for (i of [1,2,3])]; }"
1017   '("foo@10:U" "j@22:N" 30 "a@24:U" "i@38:I" 28))
1018
1019 (js2-deftest-classify-variables return-named-function
1020   "function foo() { var a=42; return function bar() { return a; } }"
1021   '("foo@10:U" "a@22:I" 59 "bar@44:I" 44))
1022
1023 (js2-deftest-classify-variables named-wrapper-function
1024   "function foo() { var a; (function bar() { a=42; })(); return a; }"
1025   '("foo@10:U" "a@22:I" 62 "bar@35:I" 35))