nendo 0.6.5 → 0.6.6
This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
- checksums.yaml +8 -8
- data/README.md +13 -0
- data/Rakefile +5 -3
- data/VERSION.yml +1 -1
- data/benchmark/benchmark.nnd +46 -31
- data/bin/nendo +8 -0
- data/lib/nendo/debug/syslog.nndc +0 -10
- data/lib/nendo/init.nndc +0 -5012
- data/lib/nendo/nendo/experimental.nndc +0 -994
- data/lib/nendo/nendo/test.nndc +0 -474
- data/lib/nendo/rfc/json.nndc +0 -150
- data/lib/nendo/ruby/core.rb +5 -1
- data/lib/nendo/ruby/evaluator.rb +35 -14
- data/lib/nendo/srfi-1.nndc +0 -3375
- data/lib/nendo/srfi-2.nndc +0 -118
- data/lib/nendo/srfi-26.nndc +0 -431
- data/lib/nendo/text/html-lite.nndc +0 -625
- data/lib/nendo/text/tree.nndc +0 -40
- data/lib/nendo/util/combinations.nndc +0 -1178
- data/lib/nendo/util/list.nndc +0 -706
- data/lib/nendo/util/match.nndc +0 -8094
- metadata +9 -6
- data/README +0 -10
data/lib/nendo/text/tree.nndc
CHANGED
@@ -5,13 +5,9 @@
|
|
5
5
|
|
6
6
|
trampCall(
|
7
7
|
begin
|
8
|
-
embedBacktraceInfo( "./lib/nendo/text/tree.nnd", 10 );
|
9
8
|
delayCall( '_require', 'require',
|
10
9
|
begin
|
11
|
-
if @global_lisp_binding.has_key?('_require') then
|
12
10
|
trampCall(@_require)
|
13
|
-
else raise NameError.new( "Error: undefined variable _require", "_require" ) end
|
14
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:10"] + __e.backtrace ) ; raise __e
|
15
11
|
end ,
|
16
12
|
[
|
17
13
|
"stringio"
|
@@ -36,11 +32,9 @@ trampCall(
|
|
36
32
|
Proc.new { |_tree|
|
37
33
|
if (
|
38
34
|
begin
|
39
|
-
embedBacktraceInfo( "./lib/nendo/text/tree.nnd", 17 );
|
40
35
|
_null_QUMARK(
|
41
36
|
begin
|
42
37
|
trampCall(_tree)
|
43
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:20"] + __e.backtrace ) ; raise __e
|
44
38
|
end
|
45
39
|
)
|
46
40
|
end
|
@@ -51,56 +45,43 @@ trampCall(
|
|
51
45
|
else
|
52
46
|
if (
|
53
47
|
begin
|
54
|
-
embedBacktraceInfo( "./lib/nendo/text/tree.nnd", 18 );
|
55
48
|
_pair_QUMARK(
|
56
49
|
begin
|
57
50
|
trampCall(_tree)
|
58
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:20"] + __e.backtrace ) ; raise __e
|
59
51
|
end
|
60
52
|
)
|
61
53
|
end
|
62
54
|
) then
|
63
55
|
begin
|
64
56
|
begin
|
65
|
-
embedBacktraceInfo( "./lib/nendo/text/tree.nnd", 18 );
|
66
57
|
trampCall( self._write_MIMARKtree_METHOD( 'write-tree',
|
67
58
|
begin
|
68
|
-
if @global_lisp_binding.has_key?('_write_MIMARKtree') then
|
69
59
|
trampCall(@_write_MIMARKtree)
|
70
|
-
else raise NameError.new( "Error: undefined variable _write_MIMARKtree", "_write_MIMARKtree" ) end
|
71
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:18"] + __e.backtrace ) ; raise __e
|
72
60
|
end ,
|
73
61
|
[
|
74
62
|
begin
|
75
|
-
embedBacktraceInfo( "./lib/nendo/text/tree.nnd", 18 );
|
76
63
|
_car(
|
77
64
|
begin
|
78
65
|
trampCall(_tree)
|
79
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:20"] + __e.backtrace ) ; raise __e
|
80
66
|
end
|
81
67
|
)
|
82
68
|
end ,
|
83
69
|
begin
|
84
70
|
trampCall(_out)
|
85
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:18"] + __e.backtrace ) ; raise __e
|
86
71
|
end
|
87
72
|
]
|
88
73
|
))
|
89
74
|
end
|
90
75
|
begin
|
91
|
-
embedBacktraceInfo( "./lib/nendo/text/tree.nnd", 18 );
|
92
76
|
delayCall( '_loop', 'loop',
|
93
77
|
begin
|
94
78
|
trampCall(_loop)
|
95
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:18"] + __e.backtrace ) ; raise __e
|
96
79
|
end ,
|
97
80
|
[
|
98
81
|
begin
|
99
|
-
embedBacktraceInfo( "./lib/nendo/text/tree.nnd", 18 );
|
100
82
|
_cdr(
|
101
83
|
begin
|
102
84
|
trampCall(_tree)
|
103
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:20"] + __e.backtrace ) ; raise __e
|
104
85
|
end
|
105
86
|
)
|
106
87
|
end
|
@@ -117,10 +98,8 @@ trampCall(
|
|
117
98
|
trampCall(_out).print(
|
118
99
|
begin
|
119
100
|
trampCall(_tree)
|
120
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:20"] + __e.backtrace ) ; raise __e
|
121
101
|
end
|
122
102
|
)
|
123
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:20"] + __e.backtrace ) ; raise __e
|
124
103
|
end
|
125
104
|
end
|
126
105
|
else
|
@@ -130,16 +109,13 @@ trampCall(
|
|
130
109
|
end
|
131
110
|
}
|
132
111
|
begin
|
133
|
-
embedBacktraceInfo( "./lib/nendo/text/tree.nnd", 18 );
|
134
112
|
delayCall( '_loop', 'loop',
|
135
113
|
begin
|
136
114
|
trampCall(_loop)
|
137
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:18"] + __e.backtrace ) ; raise __e
|
138
115
|
end ,
|
139
116
|
[
|
140
117
|
begin
|
141
118
|
trampCall(_tree)
|
142
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:20"] + __e.backtrace ) ; raise __e
|
143
119
|
end
|
144
120
|
]
|
145
121
|
)
|
@@ -151,33 +127,25 @@ trampCall(
|
|
151
127
|
} ; ___lambda.call(
|
152
128
|
if (
|
153
129
|
begin
|
154
|
-
embedBacktraceInfo( "./lib/nendo/text/tree.nnd", 17 );
|
155
130
|
_null_QUMARK(
|
156
131
|
begin
|
157
132
|
trampCall(_out)
|
158
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:18"] + __e.backtrace ) ; raise __e
|
159
133
|
end
|
160
134
|
)
|
161
135
|
end
|
162
136
|
) then
|
163
137
|
begin
|
164
138
|
trampCall(STDOUT)
|
165
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:14"] + __e.backtrace ) ; raise __e
|
166
139
|
end
|
167
140
|
else
|
168
141
|
begin
|
169
|
-
embedBacktraceInfo( "./lib/nendo/text/tree.nnd", 18 );
|
170
142
|
delayCall( '_car', 'car',
|
171
143
|
begin
|
172
|
-
if @global_lisp_binding.has_key?('_car') then
|
173
144
|
trampCall(@_car)
|
174
|
-
else raise NameError.new( "Error: undefined variable _car", "_car" ) end
|
175
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:18"] + __e.backtrace ) ; raise __e
|
176
145
|
end ,
|
177
146
|
[
|
178
147
|
begin
|
179
148
|
trampCall(_out)
|
180
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:18"] + __e.backtrace ) ; raise __e
|
181
149
|
end
|
182
150
|
]
|
183
151
|
)
|
@@ -201,22 +169,16 @@ trampCall(
|
|
201
169
|
begin
|
202
170
|
___lambda = lambda { |_sio|
|
203
171
|
begin
|
204
|
-
embedBacktraceInfo( "./lib/nendo/text/tree.nnd", 24 );
|
205
172
|
trampCall( self._write_MIMARKtree_METHOD( 'write-tree',
|
206
173
|
begin
|
207
|
-
if @global_lisp_binding.has_key?('_write_MIMARKtree') then
|
208
174
|
trampCall(@_write_MIMARKtree)
|
209
|
-
else raise NameError.new( "Error: undefined variable _write_MIMARKtree", "_write_MIMARKtree" ) end
|
210
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:24"] + __e.backtrace ) ; raise __e
|
211
175
|
end ,
|
212
176
|
[
|
213
177
|
begin
|
214
178
|
trampCall(_tree)
|
215
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:24"] + __e.backtrace ) ; raise __e
|
216
179
|
end ,
|
217
180
|
begin
|
218
181
|
trampCall(_sio)
|
219
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:24"] + __e.backtrace ) ; raise __e
|
220
182
|
end
|
221
183
|
]
|
222
184
|
))
|
@@ -224,14 +186,12 @@ trampCall(
|
|
224
186
|
begin
|
225
187
|
trampCall(_sio).string(
|
226
188
|
)
|
227
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:25"] + __e.backtrace ) ; raise __e
|
228
189
|
end
|
229
190
|
} ; ___lambda.call(
|
230
191
|
begin
|
231
192
|
trampCall(StringIO).new(
|
232
193
|
""
|
233
194
|
)
|
234
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:23"] + __e.backtrace ) ; raise __e
|
235
195
|
end
|
236
196
|
)
|
237
197
|
end
|