    "'\"';\n\"r\";\n\"oops\";"
    '("'\"'" font-lock-string-face
      "\"r\"" font-lock-string-face
-     "\"oops\"" font-lock-string-face
-     )))
-
-(ert-deftest char-literal-after-quote-in-raw-string ()
-  (reason-test-font-lock
-   "r#\"\"\"#;\n'q'"
-   '("r#\"\"\"#" font-lock-string-face
-     "'q'" font-lock-string-face)))
+     "\"oops\"" font-lock-string-face)))

     "let" font-lock-keyword-face
     "'\\\\'" font-lock-string-face)))

(ert-deftest font-lock-raw-strings-no-hashes ()
  (reason-test-font-lock
   "r\"No hashes\";"
   '("r\"No hashes\"" font-lock-string-face)))

(ert-deftest font-lock-raw-strings-double-quote ()
  (reason-test-font-lock
   "fun main() => {
    r#\"With a double quote (\")\"#;
}
"
   '("fun" font-lock-keyword-face
     "r#\"With a double quote (\")\"#" font-lock-string-face)))

(ert-deftest font-lock-raw-strings-two-hashes ()
  (reason-test-font-lock
   "r##\"With two hashes\"##;"
   '("r##\"With two hashes\"##" font-lock-string-face)))

(ert-deftest font-lock-raw-strings-backslash-at-end ()
  (reason-test-font-lock
   "r\"With a backslash at the end\\\";"
   '("r\"With a backslash at the end\\\"" font-lock-string-face)))

(ert-deftest font-lock-two-raw-strings ()
  (reason-test-font-lock
   "fun main() => {
    r\"With a backslash at the end\\\";
    r##\"With two hashes\"##;
}"
   '("fun" font-lock-keyword-face
     "r\"With a backslash at the end\\\"" font-lock-string-face
     "r##\"With two hashes\"##" font-lock-string-face)))

(ert-deftest font-lock-raw-string-with-inner-hash ()
  (reason-test-font-lock
   "r##\"I've got an octothorpe (#)\"##; foo()"
   '("r##\"I've got an octothorpe (#)\"##" font-lock-string-face)))

(ert-deftest font-lock-raw-string-with-inner-quote-and-hash ()
  (reason-test-font-lock
   "not_the_string(); r##\"string \"# still same string\"##; not_the_string()"
   '("r##\"string \"# still same string\"##" font-lock-string-face)))

(ert-deftest font-lock-string-ending-with-r-not-raw-string ()
  (reason-test-font-lock
   "fun f() => {

   "
fun foo() => {
  switch blah {
  | Pattern => stuff()
  | _ => whatever
  }
};
"
