Fix handling of single-line strings starts with #"""

Multiline strings are valid only if a line break follows the opening delimiter.

#200

Author: taku0

swift-mode-beginning-of-defun.el

@@ -1225,7 +1225,7 @@ of lines.  Empty lines split blocks.  Example:
         (progn
           (goto-char string-beginning-position)
           (cond
-           ((and (looking-at "\"\"\"")
+           ((and (looking-at "\"\"\"$")
                  (save-excursion
                    (skip-chars-forward "\"")
                    (skip-syntax-forward " >")

swift-mode-fill.el

@@ -206,7 +206,7 @@ comment particularly well)."
     (save-match-data
       (skip-syntax-backward " ")
       (let ((chunk (or (swift-mode:chunk-after)
-                       (and (looking-at "\\s *\\(/[/*]\\|#*\"\"\"\\)")
+                       (and (looking-at "\\s *\\(/[/*]\\|#*\"\"\"$\\)")
                             (swift-mode:chunk-after (match-end 0)))
                        (save-excursion
                          (skip-chars-backward "#")
@@ -292,7 +292,7 @@ Fix up multiline comments.
                       (save-match-data
                         (goto-char from)
                         (or (swift-mode:chunk-after)
-                            (and (looking-at "\\s *\\(/[/*]\\|#*\"\"\"\\)")
+                            (and (looking-at "\\s *\\(/[/*]\\|#*\"\"\"$\\)")
                                  (swift-mode:chunk-after (match-end 0)))))))
              comment-start-pos
              comment-end-pos
@@ -408,7 +408,7 @@ Use `comment-fill-column' as `fill-column' when filling inside a comment."
       (let* ((chunk (save-excursion
                       (save-match-data
                         (or (swift-mode:chunk-after)
-                            (and (looking-at "\\s *\\(/[/*]\\|#*\"\"\"\\)")
+                            (and (looking-at "\\s *\\(/[/*]\\|#*\"\"\"$\\)")
                                  (swift-mode:chunk-after (match-end 0)))))))
              (fill-column
               (if (swift-mode:chunk:comment-p chunk)
@@ -461,7 +461,7 @@ Return non-nil if skipped a paragraph.  Return nil otherwise."
         (skip-syntax-backward " >")
       (skip-syntax-forward " >"))
     (let ((chunk (or (swift-mode:chunk-after)
-                     (and (looking-at "/[/*]\\|#*\"\"\"")
+                     (and (looking-at "/[/*]\\|#*\"\"\"$")
                           (swift-mode:chunk-after (match-end 0))))))
       (cond
        ((swift-mode:chunk:single-line-comment-p chunk)
@@ -637,7 +637,7 @@ Return non-nil if skipped a paragraph.  Return nil otherwise."
             (when (eq direction 'backward)
               (goto-char pos)))
         (back-to-indentation)
-        (when (or (looking-at "/[/*]\\|#*\"\"\"")
+        (when (or (looking-at "/[/*]\\|#*\"\"\"$")
                   (swift-mode:chunk-after))
           (setq done t)
           (when (eq direction 'backward)

swift-mode-lexer.el

@@ -305,9 +305,11 @@ stops where the level becomes zero.
 
 Return non-nil if the matching parenthesis found, or return nil otherwise."
   (let ((found-matching-parenthesis nil)
-        (pattern (mapconcat #'regexp-quote
-                            '("\"\"\"" "\"" "`" "/" "(" ")")
-                            "\\|")))
+        (pattern (concat
+                  "\"\"\"$\\|"
+                  (mapconcat #'regexp-quote
+                             '("\"" "`" "/" "(" ")")
+                             "\\|"))))
     (while (and (not found-matching-parenthesis)
                 (< (point) end)
                 (search-forward-regexp pattern end t))
@@ -579,6 +581,7 @@ pound signs."
                 (setq chunk-start (1- (point))))
             ;; Incomplete interpolated expression.
             (setq done t)
+            (swift-mode:put-syntax-multiline-property start end)
             (goto-char end))))
 
        ;; Other escape sequences
@@ -1912,7 +1915,7 @@ If PARSER-STATE is given, it is used instead of (syntax-ppss)."
       ;; single-line string delimiters.
       (cond
        ((save-excursion (goto-char (nth 8 parser-state))
-                        (looking-at "#*\"\"\""))
+                        (looking-at "#*\"\"\"$"))
         (swift-mode:chunk 'multiline-string (nth 8 parser-state)))
        ((save-excursion (goto-char (nth 8 parser-state))
                         (looking-at "#*/"))

test/swift-files/indent/strings.swift

@@ -160,6 +160,8 @@ func f() {
     let x = "abc\( 1 + (2 + 3) ) \" a "
     let x = #"abc\( 1 + (2 + 3) ) \#( 1 + (2 + 3) ) \" \#"# " a \"#
     let x = ##"abc\( 1 + (2 + 3) ) \#( 1 + (2 + 3) ) \" \#"# " a \"##
+    let x = ##"""##
+    let x = ##"""abc"##
     let x = 1