Add test for lang/errorcontrol.php

Author: zonuexe

php-mode-test.el

@@ -984,4 +984,8 @@ Meant for `php-mode-test-issue-503'."
   "Test highlighting arrow funcsion (short closure syntax) added in PHP 7.4."
   (with-php-mode-test ("7.4/arrow-function.php" :faces t)))
 
+(ert-deftest php-mode-test-lang ()
+  "Test highlighting for language constructs."
+  (with-php-mode-test ("lang/errorcontrol.php" :faces t)))
+
 ;;; php-mode-test.el ends here

tests/lang/errorcontrol.php

@@ -0,0 +1,9 @@
+<?php
+
+new stdClass;
+@new stdClass;
+echo @a.@b;
+echo @a;
+echo @$a;
+
+@fopen('php://memory', 'rw');

tests/lang/errorcontrol.php.faces

@@ -0,0 +1,33 @@
+;; -*- mode: emacs-lisp -*-
+(("<?php" . php-php-tag)
+ ("\n\n")
+ ("new" . php-keyword)
+ (" ")
+ ("stdClass" . font-lock-type-face)
+ (";\n")
+ ("@new" . php-keyword)
+ (" ")
+ ("stdClass" . font-lock-type-face)
+ (";\n")
+ ("echo" . php-keyword)
+ (" ")
+ ("@" . php-errorcontrol-op)
+ ("a.")
+ ("@" . php-errorcontrol-op)
+ ("b;\n")
+ ("echo" . php-keyword)
+ (" ")
+ ("@" . php-errorcontrol-op)
+ ("a;\n")
+ ("echo" . php-keyword)
+ (" ")
+ ("@" . php-errorcontrol-op)
+ ("$" . php-variable-sigil)
+ ("a" . php-variable-name)
+ (";\n\n")
+ ("@" . php-errorcontrol-op)
+ ("fopen(")
+ ("'php://memory'" . php-string)
+ (", ")
+ ("'rw'" . php-string)
+ (");\n"))