File tree Expand file tree Collapse file tree 1 file changed +44
-1
lines changed Expand file tree Collapse file tree 1 file changed +44
-1
lines changed Original file line number Diff line number Diff line change 9
9
; ;
10
10
11
11
12
+ (a| b (c
13
+ d) e)
12
14
13
15
(a| b (c
14
16
d) e)
17
19
(aa| (c (e
18
20
f)) g)
19
21
22
+ (aa| (c (e
23
+ f)) g)
24
+
20
25
; ; === Example 2 - comments
21
26
; ; Comment killed
22
27
(a| ; ; comment
23
28
e)
24
29
30
+ (a| ; ; comment
31
+ e)
32
+
25
33
; ; Example 3 - newline
26
34
; ; newline killed
27
35
(a|
28
36
e)
29
37
38
+ (a|
39
+ e)
40
+
30
41
; ; Example 4 - end of list
31
42
; ; Don't kill past it
32
43
44
+ (a b (c |)
45
+ e)
46
+
33
47
(a b (c |)
34
48
e)
35
49
@@ -53,26 +67,47 @@ string. "
53
67
d 19 e 31 ]
54
68
(+ a b))
55
69
70
+ (let [a 23
71
+ b (+ 4
72
+ 5
73
+ 9 )
74
+ m {:a 1 }
75
+ c " hello"
76
+ d 19 e 31 ]
77
+ (+ a b))
78
+
56
79
; ; Exmaple 8 -- map key value pairs
57
80
; ; killing from :c includes the corresponding value
58
81
{:a 1
59
82
:b 2
60
83
:c {:d 4
61
84
:e 5 }}
62
85
86
+ {:a 1
87
+ :b 2
88
+ :c {:d 4
89
+ :e 5 }}
90
+
63
91
; ; Example 9 -- deleteing from #_ should delete whole expr
64
92
[#_(comment
65
93
(+ 2 3 ))]
66
94
95
+ [#_(comment
96
+ (+ 2 3 ))]
97
+
67
98
; ; Example 10 -- deleting from | should delete to eol
68
99
; ; | (23 34
69
100
; ; )
70
101
71
102
72
-
73
103
; ; Example 11 -- Deleting should delete whole expr to closing ]
74
104
| 24 [1 ]
75
105
106
+ | 24 [1 ]
107
+
108
+ 43 [1 2
109
+ 3 ]
110
+
76
111
43 [1 2
77
112
3 ]
78
113
@@ -84,9 +119,17 @@ string. "
84
119
; ; Example 14 -- newline in string, deletes to end of string
85
120
[" abc| def\n ghi" " this stays" ]
86
121
122
+ [" abc| def\n ghi" " this stays" ]
87
123
88
124
; ; Example 15 -- Heisenbug should delete up to and including g]
89
125
#_|[a b (c d
90
126
e
91
127
f) g]
128
+
129
+ #_|[a b (c d
130
+ e
131
+ f) g]
132
+
133
+ :a
134
+
92
135
:a
You can’t perform that action at this time.
0 commit comments