|
38 | 38 | (require 'subr-x) |
39 | 39 | (require 'wid-edit) |
40 | 40 |
|
| 41 | +;;;###autoload |
| 42 | +(defgroup swift-mode:repl nil |
| 43 | + "REPL." |
| 44 | + :group 'swift) |
| 45 | + |
41 | 46 | (defcustom swift-mode:repl-executable |
42 | 47 | "xcrun swift" |
43 | 48 | "Path to the Swift CLI. The string is splitted by spaces, then unquoted." |
44 | 49 | :type '(choice string (list string)) |
45 | | - :group 'swift |
| 50 | + :group 'swift-mode:repl |
46 | 51 | :safe 'stringp) |
47 | 52 |
|
48 | 53 | (defcustom swift-mode:swift-package-executable |
49 | 54 | "xcrun swift package" |
50 | 55 | "Path to the Swift command for package manipulation. |
51 | 56 | The string is splitted by spaces, then unquoted." |
52 | 57 | :type '(choice string (list string)) |
53 | | - :group 'swift |
| 58 | + :group 'swift-mode:repl |
54 | 59 | :safe 'stringp) |
55 | 60 |
|
56 | 61 | (defcustom swift-mode:swift-build-executable |
57 | 62 | "xcrun swift build" |
58 | 63 | "Path to the Swift command for building. |
59 | 64 | The string is splitted by spaces, then unquoted." |
60 | 65 | :type '(choice string (list string)) |
61 | | - :group 'swift |
| 66 | + :group 'swift-mode:repl |
62 | 67 | :safe 'stringp) |
63 | 68 |
|
64 | 69 | (defcustom swift-mode:debugger-executable |
65 | 70 | "xcrun lldb" |
66 | 71 | "Path to the debugger command. |
67 | 72 | The string is splitted by spaces, then unquoted." |
68 | 73 | :type '(choice string (list string)) |
69 | | - :group 'swift |
| 74 | + :group 'swift-mode:repl |
70 | 75 | :safe 'stringp) |
71 | 76 |
|
72 | 77 | (defcustom swift-mode:simulator-controller-executable |
73 | 78 | "xcrun simctl" |
74 | 79 | "Path to the simulator controller command. |
75 | 80 | The string is splitted by spaces, then unquoted." |
76 | 81 | :type '(choice string (list string)) |
77 | | - :group 'swift |
| 82 | + :group 'swift-mode:repl |
78 | 83 | :safe 'stringp) |
79 | 84 |
|
80 | 85 | (defcustom swift-mode:xcodebuild-executable |
81 | 86 | "xcrun xcodebuild" |
82 | 87 | "Path to the Xcode builder. |
83 | 88 | The string is splitted by spaces, then unquoted." |
84 | 89 | :type '(choice string (list string)) |
85 | | - :group 'swift |
| 90 | + :group 'swift-mode:repl |
86 | 91 | :safe 'stringp) |
87 | 92 |
|
88 | 93 | (defcustom swift-mode:xcode-select-executable |
89 | 94 | "xcode-select" |
90 | 95 | "Path to the Xcode selector. |
91 | 96 | The string is splitted by spaces, then unquoted." |
92 | 97 | :type '(choice string (list string)) |
93 | | - :group 'swift |
| 98 | + :group 'swift-mode:repl |
94 | 99 | :safe 'stringp) |
95 | 100 |
|
96 | 101 | (defcustom swift-mode:debugger-prompt-regexp "^(lldb) +\\|^[0-9]+> +" |
97 | 102 | "Regexp to search a debugger prompt." |
98 | 103 | :type 'string |
99 | | - :group 'swift |
| 104 | + :group 'swift-mode:repl |
100 | 105 | :safe 'stringp) |
101 | 106 |
|
102 | 107 | (defvar swift-mode:repl-buffer nil |
|
0 commit comments