nendo 0.6.5 → 0.6.6
Sign up to get free protection for your applications and to get access to all the features.
- 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/srfi-2.nndc
CHANGED
@@ -10,13 +10,9 @@ trampCall(
|
|
10
10
|
@_and_MIMARKlet_ASMARK =
|
11
11
|
trampCall(
|
12
12
|
begin
|
13
|
-
embedBacktraceInfo( "", 1 );
|
14
13
|
trampCall( self._er_MIMARKmacro_MIMARKtransformer_METHOD( 'er-macro-transformer',
|
15
14
|
begin
|
16
|
-
if @global_lisp_binding.has_key?('_er_MIMARKmacro_MIMARKtransformer') then
|
17
15
|
trampCall(@_er_MIMARKmacro_MIMARKtransformer)
|
18
|
-
else raise NameError.new( "Error: undefined variable _er_MIMARKmacro_MIMARKtransformer", "_er_MIMARKmacro_MIMARKtransformer" ) end
|
19
|
-
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
20
16
|
end ,
|
21
17
|
[
|
22
18
|
Proc.new { |__expr__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30201,__rename__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30202,__compare__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30203|
|
@@ -25,12 +21,10 @@ trampCall(
|
|
25
21
|
if (
|
26
22
|
begin
|
27
23
|
trampCall(___gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30228)
|
28
|
-
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
29
24
|
end
|
30
25
|
) then
|
31
26
|
begin
|
32
27
|
trampCall(___gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30228)
|
33
|
-
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
34
28
|
end
|
35
29
|
else
|
36
30
|
begin
|
@@ -38,12 +32,10 @@ trampCall(
|
|
38
32
|
if (
|
39
33
|
begin
|
40
34
|
trampCall(___gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30229)
|
41
|
-
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
42
35
|
end
|
43
36
|
) then
|
44
37
|
begin
|
45
38
|
trampCall(___gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30229)
|
46
|
-
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
47
39
|
end
|
48
40
|
else
|
49
41
|
begin
|
@@ -51,12 +43,10 @@ trampCall(
|
|
51
43
|
if (
|
52
44
|
begin
|
53
45
|
trampCall(___gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30230)
|
54
|
-
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
55
46
|
end
|
56
47
|
) then
|
57
48
|
begin
|
58
49
|
trampCall(___gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30230)
|
59
|
-
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
60
50
|
end
|
61
51
|
else
|
62
52
|
begin
|
@@ -64,12 +54,10 @@ trampCall(
|
|
64
54
|
if (
|
65
55
|
begin
|
66
56
|
trampCall(___gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30231)
|
67
|
-
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
68
57
|
end
|
69
58
|
) then
|
70
59
|
begin
|
71
60
|
trampCall(___gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30231)
|
72
|
-
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
73
61
|
end
|
74
62
|
else
|
75
63
|
false
|
@@ -79,13 +67,9 @@ trampCall(
|
|
79
67
|
"no expansion for" ' ' +
|
80
68
|
_write_MIMARKto_MIMARKstring(
|
81
69
|
begin
|
82
|
-
embedBacktraceInfo( "", 1 );
|
83
70
|
trampCall( self._strip_MIMARKsyntactic_MIMARKclosures_METHOD( 'strip-syntactic-closures',
|
84
71
|
begin
|
85
|
-
if @global_lisp_binding.has_key?('_strip_MIMARKsyntactic_MIMARKclosures') then
|
86
72
|
trampCall(@_strip_MIMARKsyntactic_MIMARKclosures)
|
87
|
-
else raise NameError.new( "Error: undefined variable _strip_MIMARKsyntactic_MIMARKclosures", "_strip_MIMARKsyntactic_MIMARKclosures" ) end
|
88
|
-
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
89
73
|
end ,
|
90
74
|
[
|
91
75
|
__expr__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30201
|
@@ -105,14 +89,11 @@ trampCall(
|
|
105
89
|
___lambda = lambda { |__v__13__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30221|
|
106
90
|
if (
|
107
91
|
begin
|
108
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
|
109
92
|
_not(
|
110
93
|
begin
|
111
|
-
embedBacktraceInfo( "", 1 );
|
112
94
|
_eq_QUMARK(
|
113
95
|
false ,
|
114
96
|
begin
|
115
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 132 );
|
116
97
|
_pair_QUMARK(
|
117
98
|
__v__13__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30221
|
118
99
|
)
|
@@ -126,14 +107,11 @@ trampCall(
|
|
126
107
|
___lambda = lambda { |__v__14__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30222|
|
127
108
|
if (
|
128
109
|
begin
|
129
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
|
130
110
|
_not(
|
131
111
|
begin
|
132
|
-
embedBacktraceInfo( "", 1 );
|
133
112
|
_eq_QUMARK(
|
134
113
|
false ,
|
135
114
|
begin
|
136
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 132 );
|
137
115
|
_pair_QUMARK(
|
138
116
|
__v__14__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30222
|
139
117
|
)
|
@@ -147,14 +125,11 @@ trampCall(
|
|
147
125
|
___lambda = lambda { |__v__15__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30223|
|
148
126
|
if (
|
149
127
|
begin
|
150
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
|
151
128
|
_not(
|
152
129
|
begin
|
153
|
-
embedBacktraceInfo( "", 1 );
|
154
130
|
_eq_QUMARK(
|
155
131
|
false ,
|
156
132
|
begin
|
157
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 132 );
|
158
133
|
_pair_QUMARK(
|
159
134
|
__v__15__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30223
|
160
135
|
)
|
@@ -172,14 +147,11 @@ trampCall(
|
|
172
147
|
___lambda = lambda { |__v__17__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30225|
|
173
148
|
if (
|
174
149
|
begin
|
175
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
|
176
150
|
_not(
|
177
151
|
begin
|
178
|
-
embedBacktraceInfo( "", 1 );
|
179
152
|
_eq_QUMARK(
|
180
153
|
false ,
|
181
154
|
begin
|
182
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 133 );
|
183
155
|
_null_QUMARK(
|
184
156
|
__v__17__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30225
|
185
157
|
)
|
@@ -198,14 +170,11 @@ trampCall(
|
|
198
170
|
begin
|
199
171
|
___lambda = lambda { |_body|
|
200
172
|
begin
|
201
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
|
202
173
|
_cons(
|
203
174
|
begin
|
204
|
-
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
205
175
|
trampCall( callProcedure( '__rename__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30202', '_rename__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30202',
|
206
176
|
begin
|
207
177
|
trampCall(__rename__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30202)
|
208
|
-
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
209
178
|
end ,
|
210
179
|
[
|
211
180
|
:"let"
|
@@ -213,20 +182,15 @@ trampCall(
|
|
213
182
|
))
|
214
183
|
end ,
|
215
184
|
begin
|
216
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
|
217
185
|
_cons(
|
218
186
|
begin
|
219
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
|
220
187
|
_cons(
|
221
188
|
begin
|
222
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
|
223
189
|
_cons(
|
224
190
|
begin
|
225
|
-
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
226
191
|
trampCall( callProcedure( '__rename__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30202', '_rename__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30202',
|
227
192
|
begin
|
228
193
|
trampCall(__rename__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30202)
|
229
|
-
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
230
194
|
end ,
|
231
195
|
[
|
232
196
|
:"tmp"
|
@@ -234,11 +198,9 @@ trampCall(
|
|
234
198
|
))
|
235
199
|
end ,
|
236
200
|
begin
|
237
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
|
238
201
|
_cons(
|
239
202
|
begin
|
240
203
|
trampCall(_expr)
|
241
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-2.nnd:41"] + __e.backtrace ) ; raise __e
|
242
204
|
end ,
|
243
205
|
Cell.new()
|
244
206
|
)
|
@@ -249,17 +211,13 @@ trampCall(
|
|
249
211
|
)
|
250
212
|
end ,
|
251
213
|
begin
|
252
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
|
253
214
|
_cons(
|
254
215
|
begin
|
255
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
|
256
216
|
_cons(
|
257
217
|
begin
|
258
|
-
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
259
218
|
trampCall( callProcedure( '__rename__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30202', '_rename__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30202',
|
260
219
|
begin
|
261
220
|
trampCall(__rename__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30202)
|
262
|
-
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
263
221
|
end ,
|
264
222
|
[
|
265
223
|
:"and"
|
@@ -267,14 +225,11 @@ trampCall(
|
|
267
225
|
))
|
268
226
|
end ,
|
269
227
|
begin
|
270
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
|
271
228
|
_cons(
|
272
229
|
begin
|
273
|
-
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
274
230
|
trampCall( callProcedure( '__rename__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30202', '_rename__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30202',
|
275
231
|
begin
|
276
232
|
trampCall(__rename__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30202)
|
277
|
-
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
278
233
|
end ,
|
279
234
|
[
|
280
235
|
:"tmp"
|
@@ -282,17 +237,13 @@ trampCall(
|
|
282
237
|
))
|
283
238
|
end ,
|
284
239
|
begin
|
285
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
|
286
240
|
_cons(
|
287
241
|
begin
|
288
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
|
289
242
|
_cons(
|
290
243
|
begin
|
291
|
-
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
292
244
|
trampCall( callProcedure( '__rename__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30202', '_rename__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30202',
|
293
245
|
begin
|
294
246
|
trampCall(__rename__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30202)
|
295
|
-
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
296
247
|
end ,
|
297
248
|
[
|
298
249
|
:"and-let*"
|
@@ -300,15 +251,12 @@ trampCall(
|
|
300
251
|
))
|
301
252
|
end ,
|
302
253
|
begin
|
303
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
|
304
254
|
_cons(
|
305
255
|
begin
|
306
256
|
trampCall(_rest)
|
307
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-2.nnd:42"] + __e.backtrace ) ; raise __e
|
308
257
|
end ,
|
309
258
|
begin
|
310
259
|
trampCall(_body)
|
311
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-2.nnd:42"] + __e.backtrace ) ; raise __e
|
312
260
|
end
|
313
261
|
)
|
314
262
|
end
|
@@ -334,7 +282,6 @@ trampCall(
|
|
334
282
|
end
|
335
283
|
} ; ___lambda.call(
|
336
284
|
begin
|
337
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
|
338
285
|
_cdr(
|
339
286
|
__v__13__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30221
|
340
287
|
)
|
@@ -347,7 +294,6 @@ trampCall(
|
|
347
294
|
end
|
348
295
|
} ; ___lambda.call(
|
349
296
|
begin
|
350
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
|
351
297
|
_cdr(
|
352
298
|
__v__14__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30222
|
353
299
|
)
|
@@ -359,7 +305,6 @@ trampCall(
|
|
359
305
|
end
|
360
306
|
} ; ___lambda.call(
|
361
307
|
begin
|
362
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
|
363
308
|
_cdr(
|
364
309
|
__v__15__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30223
|
365
310
|
)
|
@@ -372,7 +317,6 @@ trampCall(
|
|
372
317
|
end
|
373
318
|
} ; ___lambda.call(
|
374
319
|
begin
|
375
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
|
376
320
|
_car(
|
377
321
|
__v__15__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30223
|
378
322
|
)
|
@@ -384,7 +328,6 @@ trampCall(
|
|
384
328
|
end
|
385
329
|
} ; ___lambda.call(
|
386
330
|
begin
|
387
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
|
388
331
|
_car(
|
389
332
|
__v__14__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30222
|
390
333
|
)
|
@@ -396,7 +339,6 @@ trampCall(
|
|
396
339
|
end
|
397
340
|
} ; ___lambda.call(
|
398
341
|
begin
|
399
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
|
400
342
|
_car(
|
401
343
|
__v__13__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30221
|
402
344
|
)
|
@@ -408,7 +350,6 @@ trampCall(
|
|
408
350
|
end
|
409
351
|
} ; ___lambda.call(
|
410
352
|
begin
|
411
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
|
412
353
|
_cdr(
|
413
354
|
__expr__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30201
|
414
355
|
)
|
@@ -423,14 +364,11 @@ trampCall(
|
|
423
364
|
___lambda = lambda { |__v__4__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30212|
|
424
365
|
if (
|
425
366
|
begin
|
426
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
|
427
367
|
_not(
|
428
368
|
begin
|
429
|
-
embedBacktraceInfo( "", 1 );
|
430
369
|
_eq_QUMARK(
|
431
370
|
false ,
|
432
371
|
begin
|
433
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 132 );
|
434
372
|
_pair_QUMARK(
|
435
373
|
__v__4__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30212
|
436
374
|
)
|
@@ -444,14 +382,11 @@ trampCall(
|
|
444
382
|
___lambda = lambda { |__v__5__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30213|
|
445
383
|
if (
|
446
384
|
begin
|
447
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
|
448
385
|
_not(
|
449
386
|
begin
|
450
|
-
embedBacktraceInfo( "", 1 );
|
451
387
|
_eq_QUMARK(
|
452
388
|
false ,
|
453
389
|
begin
|
454
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 132 );
|
455
390
|
_pair_QUMARK(
|
456
391
|
__v__5__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30213
|
457
392
|
)
|
@@ -465,14 +400,11 @@ trampCall(
|
|
465
400
|
___lambda = lambda { |__v__6__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30214|
|
466
401
|
if (
|
467
402
|
begin
|
468
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
|
469
403
|
_not(
|
470
404
|
begin
|
471
|
-
embedBacktraceInfo( "", 1 );
|
472
405
|
_eq_QUMARK(
|
473
406
|
false ,
|
474
407
|
begin
|
475
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 132 );
|
476
408
|
_pair_QUMARK(
|
477
409
|
__v__6__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30214
|
478
410
|
)
|
@@ -490,14 +422,11 @@ trampCall(
|
|
490
422
|
___lambda = lambda { |__v__8__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30216|
|
491
423
|
if (
|
492
424
|
begin
|
493
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
|
494
425
|
_not(
|
495
426
|
begin
|
496
|
-
embedBacktraceInfo( "", 1 );
|
497
427
|
_eq_QUMARK(
|
498
428
|
false ,
|
499
429
|
begin
|
500
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 132 );
|
501
430
|
_pair_QUMARK(
|
502
431
|
__v__8__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30216
|
503
432
|
)
|
@@ -515,14 +444,11 @@ trampCall(
|
|
515
444
|
___lambda = lambda { |__v__10__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30218|
|
516
445
|
if (
|
517
446
|
begin
|
518
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
|
519
447
|
_not(
|
520
448
|
begin
|
521
|
-
embedBacktraceInfo( "", 1 );
|
522
449
|
_eq_QUMARK(
|
523
450
|
false ,
|
524
451
|
begin
|
525
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 133 );
|
526
452
|
_null_QUMARK(
|
527
453
|
__v__10__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30218
|
528
454
|
)
|
@@ -541,14 +467,11 @@ trampCall(
|
|
541
467
|
begin
|
542
468
|
___lambda = lambda { |_body|
|
543
469
|
begin
|
544
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
|
545
470
|
_cons(
|
546
471
|
begin
|
547
|
-
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
548
472
|
trampCall( callProcedure( '__rename__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30202', '_rename__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30202',
|
549
473
|
begin
|
550
474
|
trampCall(__rename__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30202)
|
551
|
-
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
552
475
|
end ,
|
553
476
|
[
|
554
477
|
:"let"
|
@@ -556,24 +479,18 @@ trampCall(
|
|
556
479
|
))
|
557
480
|
end ,
|
558
481
|
begin
|
559
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
|
560
482
|
_cons(
|
561
483
|
begin
|
562
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
|
563
484
|
_cons(
|
564
485
|
begin
|
565
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
|
566
486
|
_cons(
|
567
487
|
begin
|
568
488
|
trampCall(_var)
|
569
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-2.nnd:39"] + __e.backtrace ) ; raise __e
|
570
489
|
end ,
|
571
490
|
begin
|
572
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
|
573
491
|
_cons(
|
574
492
|
begin
|
575
493
|
trampCall(_expr)
|
576
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-2.nnd:41"] + __e.backtrace ) ; raise __e
|
577
494
|
end ,
|
578
495
|
Cell.new()
|
579
496
|
)
|
@@ -584,17 +501,13 @@ trampCall(
|
|
584
501
|
)
|
585
502
|
end ,
|
586
503
|
begin
|
587
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
|
588
504
|
_cons(
|
589
505
|
begin
|
590
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
|
591
506
|
_cons(
|
592
507
|
begin
|
593
|
-
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
594
508
|
trampCall( callProcedure( '__rename__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30202', '_rename__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30202',
|
595
509
|
begin
|
596
510
|
trampCall(__rename__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30202)
|
597
|
-
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
598
511
|
end ,
|
599
512
|
[
|
600
513
|
:"and"
|
@@ -602,24 +515,18 @@ trampCall(
|
|
602
515
|
))
|
603
516
|
end ,
|
604
517
|
begin
|
605
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
|
606
518
|
_cons(
|
607
519
|
begin
|
608
520
|
trampCall(_var)
|
609
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-2.nnd:39"] + __e.backtrace ) ; raise __e
|
610
521
|
end ,
|
611
522
|
begin
|
612
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
|
613
523
|
_cons(
|
614
524
|
begin
|
615
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
|
616
525
|
_cons(
|
617
526
|
begin
|
618
|
-
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
619
527
|
trampCall( callProcedure( '__rename__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30202', '_rename__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30202',
|
620
528
|
begin
|
621
529
|
trampCall(__rename__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30202)
|
622
|
-
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
623
530
|
end ,
|
624
531
|
[
|
625
532
|
:"and-let*"
|
@@ -627,15 +534,12 @@ trampCall(
|
|
627
534
|
))
|
628
535
|
end ,
|
629
536
|
begin
|
630
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
|
631
537
|
_cons(
|
632
538
|
begin
|
633
539
|
trampCall(_rest)
|
634
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-2.nnd:42"] + __e.backtrace ) ; raise __e
|
635
540
|
end ,
|
636
541
|
begin
|
637
542
|
trampCall(_body)
|
638
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-2.nnd:42"] + __e.backtrace ) ; raise __e
|
639
543
|
end
|
640
544
|
)
|
641
545
|
end
|
@@ -661,7 +565,6 @@ trampCall(
|
|
661
565
|
end
|
662
566
|
} ; ___lambda.call(
|
663
567
|
begin
|
664
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
|
665
568
|
_cdr(
|
666
569
|
__v__4__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30212
|
667
570
|
)
|
@@ -674,7 +577,6 @@ trampCall(
|
|
674
577
|
end
|
675
578
|
} ; ___lambda.call(
|
676
579
|
begin
|
677
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
|
678
580
|
_cdr(
|
679
581
|
__v__5__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30213
|
680
582
|
)
|
@@ -686,7 +588,6 @@ trampCall(
|
|
686
588
|
end
|
687
589
|
} ; ___lambda.call(
|
688
590
|
begin
|
689
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
|
690
591
|
_cdr(
|
691
592
|
__v__8__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30216
|
692
593
|
)
|
@@ -699,7 +600,6 @@ trampCall(
|
|
699
600
|
end
|
700
601
|
} ; ___lambda.call(
|
701
602
|
begin
|
702
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
|
703
603
|
_car(
|
704
604
|
__v__8__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30216
|
705
605
|
)
|
@@ -711,7 +611,6 @@ trampCall(
|
|
711
611
|
end
|
712
612
|
} ; ___lambda.call(
|
713
613
|
begin
|
714
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
|
715
614
|
_cdr(
|
716
615
|
__v__6__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30214
|
717
616
|
)
|
@@ -724,7 +623,6 @@ trampCall(
|
|
724
623
|
end
|
725
624
|
} ; ___lambda.call(
|
726
625
|
begin
|
727
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
|
728
626
|
_car(
|
729
627
|
__v__6__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30214
|
730
628
|
)
|
@@ -736,7 +634,6 @@ trampCall(
|
|
736
634
|
end
|
737
635
|
} ; ___lambda.call(
|
738
636
|
begin
|
739
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
|
740
637
|
_car(
|
741
638
|
__v__5__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30213
|
742
639
|
)
|
@@ -748,7 +645,6 @@ trampCall(
|
|
748
645
|
end
|
749
646
|
} ; ___lambda.call(
|
750
647
|
begin
|
751
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
|
752
648
|
_car(
|
753
649
|
__v__4__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30212
|
754
650
|
)
|
@@ -760,7 +656,6 @@ trampCall(
|
|
760
656
|
end
|
761
657
|
} ; ___lambda.call(
|
762
658
|
begin
|
763
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
|
764
659
|
_cdr(
|
765
660
|
__expr__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30201
|
766
661
|
)
|
@@ -775,14 +670,11 @@ trampCall(
|
|
775
670
|
___lambda = lambda { |__v__1__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30209|
|
776
671
|
if (
|
777
672
|
begin
|
778
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
|
779
673
|
_not(
|
780
674
|
begin
|
781
|
-
embedBacktraceInfo( "", 1 );
|
782
675
|
_eq_QUMARK(
|
783
676
|
false ,
|
784
677
|
begin
|
785
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 132 );
|
786
678
|
_pair_QUMARK(
|
787
679
|
__v__1__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30209
|
788
680
|
)
|
@@ -796,14 +688,11 @@ trampCall(
|
|
796
688
|
___lambda = lambda { |__v__2__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30210|
|
797
689
|
if (
|
798
690
|
begin
|
799
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
|
800
691
|
_not(
|
801
692
|
begin
|
802
|
-
embedBacktraceInfo( "", 1 );
|
803
693
|
_eq_QUMARK(
|
804
694
|
false ,
|
805
695
|
begin
|
806
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 133 );
|
807
696
|
_null_QUMARK(
|
808
697
|
__v__2__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30210
|
809
698
|
)
|
@@ -818,14 +707,11 @@ trampCall(
|
|
818
707
|
begin
|
819
708
|
___lambda = lambda { |_body|
|
820
709
|
begin
|
821
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
|
822
710
|
_cons(
|
823
711
|
begin
|
824
|
-
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
825
712
|
trampCall( callProcedure( '__rename__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30202', '_rename__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30202',
|
826
713
|
begin
|
827
714
|
trampCall(__rename__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30202)
|
828
|
-
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
829
715
|
end ,
|
830
716
|
[
|
831
717
|
:"begin"
|
@@ -834,7 +720,6 @@ trampCall(
|
|
834
720
|
end ,
|
835
721
|
begin
|
836
722
|
trampCall(_body)
|
837
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-2.nnd:42"] + __e.backtrace ) ; raise __e
|
838
723
|
end
|
839
724
|
)
|
840
725
|
end
|
@@ -844,7 +729,6 @@ trampCall(
|
|
844
729
|
end
|
845
730
|
} ; ___lambda.call(
|
846
731
|
begin
|
847
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
|
848
732
|
_cdr(
|
849
733
|
__v__1__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30209
|
850
734
|
)
|
@@ -856,7 +740,6 @@ trampCall(
|
|
856
740
|
end
|
857
741
|
} ; ___lambda.call(
|
858
742
|
begin
|
859
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
|
860
743
|
_car(
|
861
744
|
__v__1__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30209
|
862
745
|
)
|
@@ -868,7 +751,6 @@ trampCall(
|
|
868
751
|
end
|
869
752
|
} ; ___lambda.call(
|
870
753
|
begin
|
871
|
-
embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
|
872
754
|
_cdr(
|
873
755
|
__expr__gensym__44adcf5e9bc103ebc6f421698db2c9569e38c060_30201
|
874
756
|
)
|