  '("^\\(?:@@\\)?\\(include\\|sourceFiles\\|scriptfile\\)\\s-*=\\s-*\\(.*\\)"
    lambda nil (buffer-substring (match-beginning 2) (match-end 2))) t)
 
+(defun mock-goto-line (n)
+  "Go to a line in a mock script, exclusive of continuation lines."
+  (interactive "nGoto line: ")
+  (goto-char (point-min))
+  (while (> n 1)
+    (unless (search-forward-regexp "\\\\$" (line-end-position) t)
+      (setq n (- n 1)))
+    (forward-line)))
+
 (provide 'xr-mock)
 
 ;; xr-mock-mode.el ends here

;; xr-mock.el --- major mode to view mock scripts
;; Author: Dan Harms <dan.harms@xrtrading.com>
;; Created: Wednesday, June 10, 2015
;; Version: 1.1
;; Modified Time-stamp: <2016-02-15 08:45:33 dan.harms>
;; Keywords: mock script

;; Code:

(defgroup mock-mode nil "*mock script mode" :group 'mock)

(defun mock-mode()
  "Major mode for browsing mock scripts."

        ("=\\<en\\(d\\)\\_>" (1 "> b"))
        ("\\_<end_commen\\(t\\)\\_>" (1 "> b"))
        ))
  (use-local-map mock-mode-map)
  (define-key mock-mode-map "\M-sg" 'mock-goto-line)
  (setq comment-start "#" comment-end "")
  (subword-mode 1)
  (run-hooks 'mock-mode-hook)
