From afb467ea0270c59f9fdcad9fe5303d0ed526177c Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Sun, 29 Nov 2015 01:00:30 -0800 Subject: 2606 - handle cycles inside stash The idea is that to-text-line should truncate blindly past some threshold, even if to-text isn't smart enough to avoid infinite loops. Maybe I should define a 'truncating buffer' which stops once it fills up. That would be an easy way to eliminate all infinite loops in to-text-line. --- 070text.mu | 10 +++++++++- 1 file changed, 9 insertions(+), 1 deletion(-) (limited to '070text.mu') diff --git a/070text.mu b/070text.mu index eb3875d0..5de21e41 100644 --- a/070text.mu +++ b/070text.mu @@ -1,6 +1,14 @@ # Some useful helpers for dealing with text (arrays of characters) -# to-text gets called implicitly in various places +# to-text-line gets called implicitly in various places +# define it to be identical to 'to-text' by default +recipe to-text-line x:_elem -> y:address:array:character [ + local-scope + load-ingredients + y <- to-text x +] + +# to-text on text is just the identity function recipe to-text x:address:array:character -> y:address:array:character [ local-scope load-ingredients -- cgit 1.4.1-2-gfad0 ref='/danisanti/profani-tty/'>summary refs log tree commit diff stats
path: root/themes/boothj5_laptop
blob: af3958bd7c4404ad5b7d99ffc4cd2a3a0daadc52 (plain) (blame) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147