nendo 0.6.5 → 0.6.6

Sign up to get free protection for your applications and to get access to all the features.
Files changed (23) hide show
  1. checksums.yaml +8 -8
  2. data/README.md +13 -0
  3. data/Rakefile +5 -3
  4. data/VERSION.yml +1 -1
  5. data/benchmark/benchmark.nnd +46 -31
  6. data/bin/nendo +8 -0
  7. data/lib/nendo/debug/syslog.nndc +0 -10
  8. data/lib/nendo/init.nndc +0 -5012
  9. data/lib/nendo/nendo/experimental.nndc +0 -994
  10. data/lib/nendo/nendo/test.nndc +0 -474
  11. data/lib/nendo/rfc/json.nndc +0 -150
  12. data/lib/nendo/ruby/core.rb +5 -1
  13. data/lib/nendo/ruby/evaluator.rb +35 -14
  14. data/lib/nendo/srfi-1.nndc +0 -3375
  15. data/lib/nendo/srfi-2.nndc +0 -118
  16. data/lib/nendo/srfi-26.nndc +0 -431
  17. data/lib/nendo/text/html-lite.nndc +0 -625
  18. data/lib/nendo/text/tree.nndc +0 -40
  19. data/lib/nendo/util/combinations.nndc +0 -1178
  20. data/lib/nendo/util/list.nndc +0 -706
  21. data/lib/nendo/util/match.nndc +0 -8094
  22. metadata +9 -6
  23. data/README +0 -10
data/lib/nendo/srfi-26.nndc CHANGED
@@ -10,13 +10,9 @@ trampCall(
10
10
  @__PAMARKcut =
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__45c7e50a18fdc854bcb682c77ca85971738831a0_30259,__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260,__compare__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30261|
@@ -25,12 +21,10 @@ trampCall(
25
21
  if (
26
22
  begin
27
23
  trampCall(___gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30319)
28
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
29
24
  end
30
25
  ) then
31
26
  begin
32
27
  trampCall(___gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30319)
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__45c7e50a18fdc854bcb682c77ca85971738831a0_30320)
41
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
42
35
  end
43
36
  ) then
44
37
  begin
45
38
  trampCall(___gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30320)
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__45c7e50a18fdc854bcb682c77ca85971738831a0_30321)
54
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
55
46
  end
56
47
  ) then
57
48
  begin
58
49
  trampCall(___gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30321)
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__45c7e50a18fdc854bcb682c77ca85971738831a0_30322)
67
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
68
57
  end
69
58
  ) then
70
59
  begin
71
60
  trampCall(___gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30322)
72
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
73
61
  end
74
62
  else
75
63
  begin
@@ -77,12 +65,10 @@ trampCall(
77
65
  if (
78
66
  begin
79
67
  trampCall(___gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30323)
80
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
81
68
  end
82
69
  ) then
83
70
  begin
84
71
  trampCall(___gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30323)
85
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
86
72
  end
87
73
  else
88
74
  begin
@@ -90,12 +76,10 @@ trampCall(
90
76
  if (
91
77
  begin
92
78
  trampCall(___gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30324)
93
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
94
79
  end
95
80
  ) then
96
81
  begin
97
82
  trampCall(___gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30324)
98
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
99
83
  end
100
84
  else
101
85
  begin
@@ -103,12 +87,10 @@ trampCall(
103
87
  if (
104
88
  begin
105
89
  trampCall(___gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30325)
106
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
107
90
  end
108
91
  ) then
109
92
  begin
110
93
  trampCall(___gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30325)
111
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
112
94
  end
113
95
  else
114
96
  false
@@ -118,13 +100,9 @@ trampCall(
118
100
  "no expansion for" ' ' +
119
101
  _write_MIMARKto_MIMARKstring(
120
102
  begin
121
- embedBacktraceInfo( "", 1 );
122
103
  trampCall( self._strip_MIMARKsyntactic_MIMARKclosures_METHOD( 'strip-syntactic-closures',
123
104
  begin
124
- if @global_lisp_binding.has_key?('_strip_MIMARKsyntactic_MIMARKclosures') then
125
105
  trampCall(@_strip_MIMARKsyntactic_MIMARKclosures)
126
- else raise NameError.new( "Error: undefined variable _strip_MIMARKsyntactic_MIMARKclosures", "_strip_MIMARKsyntactic_MIMARKclosures" ) end
127
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
128
106
  end ,
129
107
  [
130
108
  __expr__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30259
@@ -144,14 +122,11 @@ trampCall(
144
122
  ___lambda = lambda { |__v__44__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30310|
145
123
  if (
146
124
  begin
147
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
148
125
  _not(
149
126
  begin
150
- embedBacktraceInfo( "", 1 );
151
127
  _eq_QUMARK(
152
128
  false ,
153
129
  begin
154
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 132 );
155
130
  _pair_QUMARK(
156
131
  __v__44__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30310
157
132
  )
@@ -165,14 +140,11 @@ trampCall(
165
140
  ___lambda = lambda { |__v__45__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30311|
166
141
  if (
167
142
  begin
168
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
169
143
  _not(
170
144
  begin
171
- embedBacktraceInfo( "", 1 );
172
145
  _eq_QUMARK(
173
146
  false ,
174
147
  begin
175
- embedBacktraceInfo( "", 1 );
176
148
  _equal_QUMARK(
177
149
  __v__45__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30311 ,
178
150
  false
@@ -187,14 +159,11 @@ trampCall(
187
159
  ___lambda = lambda { |__v__46__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30312|
188
160
  if (
189
161
  begin
190
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
191
162
  _not(
192
163
  begin
193
- embedBacktraceInfo( "", 1 );
194
164
  _eq_QUMARK(
195
165
  false ,
196
166
  begin
197
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 132 );
198
167
  _pair_QUMARK(
199
168
  __v__46__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30312
200
169
  )
@@ -208,20 +177,14 @@ trampCall(
208
177
  ___lambda = lambda { |__v__47__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30313|
209
178
  if (
210
179
  begin
211
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
212
180
  _not(
213
181
  begin
214
- embedBacktraceInfo( "", 1 );
215
182
  _eq_QUMARK(
216
183
  false ,
217
184
  begin
218
- embedBacktraceInfo( "", 1 );
219
185
  trampCall( self._list_QUMARK_METHOD( 'list?',
220
186
  begin
221
- if @global_lisp_binding.has_key?('_list_QUMARK') then
222
187
  trampCall(@_list_QUMARK)
223
- else raise NameError.new( "Error: undefined variable _list_QUMARK", "_list_QUMARK" ) end
224
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
225
188
  end ,
226
189
  [
227
190
  __v__47__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30313
@@ -239,14 +202,11 @@ trampCall(
239
202
  ___lambda = lambda { |__v__48__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30314|
240
203
  if (
241
204
  begin
242
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
243
205
  _not(
244
206
  begin
245
- embedBacktraceInfo( "", 1 );
246
207
  _eq_QUMARK(
247
208
  false ,
248
209
  begin
249
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 132 );
250
210
  _pair_QUMARK(
251
211
  __v__48__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30314
252
212
  )
@@ -260,20 +220,14 @@ trampCall(
260
220
  ___lambda = lambda { |__v__49__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30315|
261
221
  if (
262
222
  begin
263
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
264
223
  _not(
265
224
  begin
266
- embedBacktraceInfo( "", 1 );
267
225
  _eq_QUMARK(
268
226
  false ,
269
227
  begin
270
- embedBacktraceInfo( "", 1 );
271
228
  trampCall( self._list_QUMARK_METHOD( 'list?',
272
229
  begin
273
- if @global_lisp_binding.has_key?('_list_QUMARK') then
274
230
  trampCall(@_list_QUMARK)
275
- else raise NameError.new( "Error: undefined variable _list_QUMARK", "_list_QUMARK" ) end
276
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
277
231
  end ,
278
232
  [
279
233
  __v__49__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30315
@@ -291,14 +245,11 @@ trampCall(
291
245
  ___lambda = lambda { |__v__50__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30316|
292
246
  if (
293
247
  begin
294
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
295
248
  _not(
296
249
  begin
297
- embedBacktraceInfo( "", 1 );
298
250
  _eq_QUMARK(
299
251
  false ,
300
252
  begin
301
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 132 );
302
253
  _pair_QUMARK(
303
254
  __v__50__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30316
304
255
  )
@@ -317,14 +268,11 @@ trampCall(
317
268
  begin
318
269
  ___lambda = lambda { |_rest|
319
270
  begin
320
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
321
271
  _cons(
322
272
  begin
323
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
324
273
  trampCall( callProcedure( '__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260', '_rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260',
325
274
  begin
326
275
  trampCall(__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260)
327
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
328
276
  end ,
329
277
  [
330
278
  :"%cut"
@@ -332,77 +280,56 @@ trampCall(
332
280
  ))
333
281
  end ,
334
282
  begin
335
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
336
283
  _cons(
337
284
  true ,
338
285
  begin
339
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
340
286
  _cons(
341
287
  begin
342
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 259 );
343
288
  trampCall( self._map_METHOD( 'map',
344
289
  begin
345
- if @global_lisp_binding.has_key?('_map') then
346
290
  trampCall(@_map)
347
- else raise NameError.new( "Error: undefined variable _map", "_map" ) end
348
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/nendo/experimental.nnd:259"] + __e.backtrace ) ; raise __e
349
291
  end ,
350
292
  [
351
293
  Proc.new { |_params|
352
294
  begin
353
295
  trampCall(_params)
354
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-26.nnd:45"] + __e.backtrace ) ; raise __e
355
296
  end
356
297
  } ,
357
298
  begin
358
299
  trampCall(_params)
359
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-26.nnd:45"] + __e.backtrace ) ; raise __e
360
300
  end
361
301
  ]
362
302
  ))
363
303
  end ,
364
304
  begin
365
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
366
305
  _cons(
367
306
  begin
368
- embedBacktraceInfo( "", 1 );
369
307
  trampCall( self._append_METHOD( 'append',
370
308
  begin
371
- if @global_lisp_binding.has_key?('_append') then
372
309
  trampCall(@_append)
373
- else raise NameError.new( "Error: undefined variable _append", "_append" ) end
374
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
375
310
  end ,
376
311
  [
377
312
  begin
378
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 259 );
379
313
  trampCall( self._map_METHOD( 'map',
380
314
  begin
381
- if @global_lisp_binding.has_key?('_map') then
382
315
  trampCall(@_map)
383
- else raise NameError.new( "Error: undefined variable _map", "_map" ) end
384
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/nendo/experimental.nnd:259"] + __e.backtrace ) ; raise __e
385
316
  end ,
386
317
  [
387
318
  Proc.new { |_args|
388
319
  begin
389
320
  trampCall(_args)
390
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-26.nnd:45"] + __e.backtrace ) ; raise __e
391
321
  end
392
322
  } ,
393
323
  begin
394
324
  trampCall(_args)
395
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-26.nnd:45"] + __e.backtrace ) ; raise __e
396
325
  end
397
326
  ]
398
327
  ))
399
328
  end ,
400
329
  begin
401
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
402
330
  _cons(
403
331
  begin
404
332
  trampCall(_x)
405
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-26.nnd:45"] + __e.backtrace ) ; raise __e
406
333
  end ,
407
334
  Cell.new()
408
335
  )
@@ -412,7 +339,6 @@ trampCall(
412
339
  end ,
413
340
  begin
414
341
  trampCall(_rest)
415
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-26.nnd:45"] + __e.backtrace ) ; raise __e
416
342
  end
417
343
  )
418
344
  end
@@ -428,7 +354,6 @@ trampCall(
428
354
  end
429
355
  } ; ___lambda.call(
430
356
  begin
431
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
432
357
  _cdr(
433
358
  __v__50__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30316
434
359
  )
@@ -441,7 +366,6 @@ trampCall(
441
366
  end
442
367
  } ; ___lambda.call(
443
368
  begin
444
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
445
369
  _car(
446
370
  __v__50__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30316
447
371
  )
@@ -453,7 +377,6 @@ trampCall(
453
377
  end
454
378
  } ; ___lambda.call(
455
379
  begin
456
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
457
380
  _cdr(
458
381
  __v__48__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30314
459
382
  )
@@ -469,7 +392,6 @@ trampCall(
469
392
  end
470
393
  } ; ___lambda.call(
471
394
  begin
472
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
473
395
  _car(
474
396
  __v__48__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30314
475
397
  )
@@ -481,7 +403,6 @@ trampCall(
481
403
  end
482
404
  } ; ___lambda.call(
483
405
  begin
484
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
485
406
  _cdr(
486
407
  __v__46__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30312
487
408
  )
@@ -497,7 +418,6 @@ trampCall(
497
418
  end
498
419
  } ; ___lambda.call(
499
420
  begin
500
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
501
421
  _car(
502
422
  __v__46__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30312
503
423
  )
@@ -509,7 +429,6 @@ trampCall(
509
429
  end
510
430
  } ; ___lambda.call(
511
431
  begin
512
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
513
432
  _cdr(
514
433
  __v__44__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30310
515
434
  )
@@ -521,7 +440,6 @@ trampCall(
521
440
  end
522
441
  } ; ___lambda.call(
523
442
  begin
524
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
525
443
  _car(
526
444
  __v__44__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30310
527
445
  )
@@ -533,7 +451,6 @@ trampCall(
533
451
  end
534
452
  } ; ___lambda.call(
535
453
  begin
536
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
537
454
  _cdr(
538
455
  __expr__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30259
539
456
  )
@@ -548,14 +465,11 @@ trampCall(
548
465
  ___lambda = lambda { |__v__35__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30301|
549
466
  if (
550
467
  begin
551
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
552
468
  _not(
553
469
  begin
554
- embedBacktraceInfo( "", 1 );
555
470
  _eq_QUMARK(
556
471
  false ,
557
472
  begin
558
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 132 );
559
473
  _pair_QUMARK(
560
474
  __v__35__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30301
561
475
  )
@@ -569,14 +483,11 @@ trampCall(
569
483
  ___lambda = lambda { |__v__36__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30302|
570
484
  if (
571
485
  begin
572
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
573
486
  _not(
574
487
  begin
575
- embedBacktraceInfo( "", 1 );
576
488
  _eq_QUMARK(
577
489
  false ,
578
490
  begin
579
- embedBacktraceInfo( "", 1 );
580
491
  _equal_QUMARK(
581
492
  __v__36__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30302 ,
582
493
  true
@@ -591,14 +502,11 @@ trampCall(
591
502
  ___lambda = lambda { |__v__37__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30303|
592
503
  if (
593
504
  begin
594
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
595
505
  _not(
596
506
  begin
597
- embedBacktraceInfo( "", 1 );
598
507
  _eq_QUMARK(
599
508
  false ,
600
509
  begin
601
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 132 );
602
510
  _pair_QUMARK(
603
511
  __v__37__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30303
604
512
  )
@@ -612,20 +520,14 @@ trampCall(
612
520
  ___lambda = lambda { |__v__38__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30304|
613
521
  if (
614
522
  begin
615
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
616
523
  _not(
617
524
  begin
618
- embedBacktraceInfo( "", 1 );
619
525
  _eq_QUMARK(
620
526
  false ,
621
527
  begin
622
- embedBacktraceInfo( "", 1 );
623
528
  trampCall( self._list_QUMARK_METHOD( 'list?',
624
529
  begin
625
- if @global_lisp_binding.has_key?('_list_QUMARK') then
626
530
  trampCall(@_list_QUMARK)
627
- else raise NameError.new( "Error: undefined variable _list_QUMARK", "_list_QUMARK" ) end
628
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
629
531
  end ,
630
532
  [
631
533
  __v__38__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30304
@@ -643,14 +545,11 @@ trampCall(
643
545
  ___lambda = lambda { |__v__39__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30305|
644
546
  if (
645
547
  begin
646
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
647
548
  _not(
648
549
  begin
649
- embedBacktraceInfo( "", 1 );
650
550
  _eq_QUMARK(
651
551
  false ,
652
552
  begin
653
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 132 );
654
553
  _pair_QUMARK(
655
554
  __v__39__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30305
656
555
  )
@@ -664,20 +563,14 @@ trampCall(
664
563
  ___lambda = lambda { |__v__40__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30306|
665
564
  if (
666
565
  begin
667
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
668
566
  _not(
669
567
  begin
670
- embedBacktraceInfo( "", 1 );
671
568
  _eq_QUMARK(
672
569
  false ,
673
570
  begin
674
- embedBacktraceInfo( "", 1 );
675
571
  trampCall( self._list_QUMARK_METHOD( 'list?',
676
572
  begin
677
- if @global_lisp_binding.has_key?('_list_QUMARK') then
678
573
  trampCall(@_list_QUMARK)
679
- else raise NameError.new( "Error: undefined variable _list_QUMARK", "_list_QUMARK" ) end
680
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
681
574
  end ,
682
575
  [
683
576
  __v__40__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30306
@@ -695,14 +588,11 @@ trampCall(
695
588
  ___lambda = lambda { |__v__41__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30307|
696
589
  if (
697
590
  begin
698
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
699
591
  _not(
700
592
  begin
701
- embedBacktraceInfo( "", 1 );
702
593
  _eq_QUMARK(
703
594
  false ,
704
595
  begin
705
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 132 );
706
596
  _pair_QUMARK(
707
597
  __v__41__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30307
708
598
  )
@@ -721,14 +611,11 @@ trampCall(
721
611
  begin
722
612
  ___lambda = lambda { |_rest|
723
613
  begin
724
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
725
614
  _cons(
726
615
  begin
727
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
728
616
  trampCall( callProcedure( '__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260', '_rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260',
729
617
  begin
730
618
  trampCall(__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260)
731
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
732
619
  end ,
733
620
  [
734
621
  :"let"
@@ -736,20 +623,15 @@ trampCall(
736
623
  ))
737
624
  end ,
738
625
  begin
739
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
740
626
  _cons(
741
627
  begin
742
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
743
628
  _cons(
744
629
  begin
745
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
746
630
  _cons(
747
631
  begin
748
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
749
632
  trampCall( callProcedure( '__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260', '_rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260',
750
633
  begin
751
634
  trampCall(__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260)
752
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
753
635
  end ,
754
636
  [
755
637
  :"tmp"
@@ -757,11 +639,9 @@ trampCall(
757
639
  ))
758
640
  end ,
759
641
  begin
760
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
761
642
  _cons(
762
643
  begin
763
644
  trampCall(_x)
764
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-26.nnd:45"] + __e.backtrace ) ; raise __e
765
645
  end ,
766
646
  Cell.new()
767
647
  )
@@ -772,17 +652,13 @@ trampCall(
772
652
  )
773
653
  end ,
774
654
  begin
775
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
776
655
  _cons(
777
656
  begin
778
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
779
657
  _cons(
780
658
  begin
781
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
782
659
  trampCall( callProcedure( '__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260', '_rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260',
783
660
  begin
784
661
  trampCall(__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260)
785
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
786
662
  end ,
787
663
  [
788
664
  :"%cut"
@@ -790,80 +666,58 @@ trampCall(
790
666
  ))
791
667
  end ,
792
668
  begin
793
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
794
669
  _cons(
795
670
  true ,
796
671
  begin
797
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
798
672
  _cons(
799
673
  begin
800
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 259 );
801
674
  trampCall( self._map_METHOD( 'map',
802
675
  begin
803
- if @global_lisp_binding.has_key?('_map') then
804
676
  trampCall(@_map)
805
- else raise NameError.new( "Error: undefined variable _map", "_map" ) end
806
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/nendo/experimental.nnd:259"] + __e.backtrace ) ; raise __e
807
677
  end ,
808
678
  [
809
679
  Proc.new { |_params|
810
680
  begin
811
681
  trampCall(_params)
812
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-26.nnd:45"] + __e.backtrace ) ; raise __e
813
682
  end
814
683
  } ,
815
684
  begin
816
685
  trampCall(_params)
817
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-26.nnd:45"] + __e.backtrace ) ; raise __e
818
686
  end
819
687
  ]
820
688
  ))
821
689
  end ,
822
690
  begin
823
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
824
691
  _cons(
825
692
  begin
826
- embedBacktraceInfo( "", 1 );
827
693
  trampCall( self._append_METHOD( 'append',
828
694
  begin
829
- if @global_lisp_binding.has_key?('_append') then
830
695
  trampCall(@_append)
831
- else raise NameError.new( "Error: undefined variable _append", "_append" ) end
832
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
833
696
  end ,
834
697
  [
835
698
  begin
836
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 259 );
837
699
  trampCall( self._map_METHOD( 'map',
838
700
  begin
839
- if @global_lisp_binding.has_key?('_map') then
840
701
  trampCall(@_map)
841
- else raise NameError.new( "Error: undefined variable _map", "_map" ) end
842
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/nendo/experimental.nnd:259"] + __e.backtrace ) ; raise __e
843
702
  end ,
844
703
  [
845
704
  Proc.new { |_args|
846
705
  begin
847
706
  trampCall(_args)
848
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-26.nnd:45"] + __e.backtrace ) ; raise __e
849
707
  end
850
708
  } ,
851
709
  begin
852
710
  trampCall(_args)
853
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-26.nnd:45"] + __e.backtrace ) ; raise __e
854
711
  end
855
712
  ]
856
713
  ))
857
714
  end ,
858
715
  begin
859
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
860
716
  _cons(
861
717
  begin
862
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
863
718
  trampCall( callProcedure( '__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260', '_rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260',
864
719
  begin
865
720
  trampCall(__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260)
866
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
867
721
  end ,
868
722
  [
869
723
  :"tmp"
@@ -878,7 +732,6 @@ trampCall(
878
732
  end ,
879
733
  begin
880
734
  trampCall(_rest)
881
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-26.nnd:45"] + __e.backtrace ) ; raise __e
882
735
  end
883
736
  )
884
737
  end
@@ -901,7 +754,6 @@ trampCall(
901
754
  end
902
755
  } ; ___lambda.call(
903
756
  begin
904
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
905
757
  _cdr(
906
758
  __v__41__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30307
907
759
  )
@@ -914,7 +766,6 @@ trampCall(
914
766
  end
915
767
  } ; ___lambda.call(
916
768
  begin
917
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
918
769
  _car(
919
770
  __v__41__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30307
920
771
  )
@@ -926,7 +777,6 @@ trampCall(
926
777
  end
927
778
  } ; ___lambda.call(
928
779
  begin
929
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
930
780
  _cdr(
931
781
  __v__39__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30305
932
782
  )
@@ -942,7 +792,6 @@ trampCall(
942
792
  end
943
793
  } ; ___lambda.call(
944
794
  begin
945
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
946
795
  _car(
947
796
  __v__39__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30305
948
797
  )
@@ -954,7 +803,6 @@ trampCall(
954
803
  end
955
804
  } ; ___lambda.call(
956
805
  begin
957
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
958
806
  _cdr(
959
807
  __v__37__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30303
960
808
  )
@@ -970,7 +818,6 @@ trampCall(
970
818
  end
971
819
  } ; ___lambda.call(
972
820
  begin
973
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
974
821
  _car(
975
822
  __v__37__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30303
976
823
  )
@@ -982,7 +829,6 @@ trampCall(
982
829
  end
983
830
  } ; ___lambda.call(
984
831
  begin
985
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
986
832
  _cdr(
987
833
  __v__35__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30301
988
834
  )
@@ -994,7 +840,6 @@ trampCall(
994
840
  end
995
841
  } ; ___lambda.call(
996
842
  begin
997
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
998
843
  _car(
999
844
  __v__35__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30301
1000
845
  )
@@ -1006,7 +851,6 @@ trampCall(
1006
851
  end
1007
852
  } ; ___lambda.call(
1008
853
  begin
1009
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
1010
854
  _cdr(
1011
855
  __expr__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30259
1012
856
  )
@@ -1021,14 +865,11 @@ trampCall(
1021
865
  ___lambda = lambda { |__v__26__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30292|
1022
866
  if (
1023
867
  begin
1024
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
1025
868
  _not(
1026
869
  begin
1027
- embedBacktraceInfo( "", 1 );
1028
870
  _eq_QUMARK(
1029
871
  false ,
1030
872
  begin
1031
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 132 );
1032
873
  _pair_QUMARK(
1033
874
  __v__26__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30292
1034
875
  )
@@ -1046,14 +887,11 @@ trampCall(
1046
887
  ___lambda = lambda { |__v__28__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30294|
1047
888
  if (
1048
889
  begin
1049
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
1050
890
  _not(
1051
891
  begin
1052
- embedBacktraceInfo( "", 1 );
1053
892
  _eq_QUMARK(
1054
893
  false ,
1055
894
  begin
1056
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 132 );
1057
895
  _pair_QUMARK(
1058
896
  __v__28__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30294
1059
897
  )
@@ -1067,20 +905,14 @@ trampCall(
1067
905
  ___lambda = lambda { |__v__29__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30295|
1068
906
  if (
1069
907
  begin
1070
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
1071
908
  _not(
1072
909
  begin
1073
- embedBacktraceInfo( "", 1 );
1074
910
  _eq_QUMARK(
1075
911
  false ,
1076
912
  begin
1077
- embedBacktraceInfo( "", 1 );
1078
913
  trampCall( self._list_QUMARK_METHOD( 'list?',
1079
914
  begin
1080
- if @global_lisp_binding.has_key?('_list_QUMARK') then
1081
915
  trampCall(@_list_QUMARK)
1082
- else raise NameError.new( "Error: undefined variable _list_QUMARK", "_list_QUMARK" ) end
1083
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1084
916
  end ,
1085
917
  [
1086
918
  __v__29__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30295
@@ -1098,14 +930,11 @@ trampCall(
1098
930
  ___lambda = lambda { |__v__30__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30296|
1099
931
  if (
1100
932
  begin
1101
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
1102
933
  _not(
1103
934
  begin
1104
- embedBacktraceInfo( "", 1 );
1105
935
  _eq_QUMARK(
1106
936
  false ,
1107
937
  begin
1108
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 132 );
1109
938
  _pair_QUMARK(
1110
939
  __v__30__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30296
1111
940
  )
@@ -1119,20 +948,14 @@ trampCall(
1119
948
  ___lambda = lambda { |__v__31__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30297|
1120
949
  if (
1121
950
  begin
1122
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
1123
951
  _not(
1124
952
  begin
1125
- embedBacktraceInfo( "", 1 );
1126
953
  _eq_QUMARK(
1127
954
  false ,
1128
955
  begin
1129
- embedBacktraceInfo( "", 1 );
1130
956
  trampCall( self._list_QUMARK_METHOD( 'list?',
1131
957
  begin
1132
- if @global_lisp_binding.has_key?('_list_QUMARK') then
1133
958
  trampCall(@_list_QUMARK)
1134
- else raise NameError.new( "Error: undefined variable _list_QUMARK", "_list_QUMARK" ) end
1135
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1136
959
  end ,
1137
960
  [
1138
961
  __v__31__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30297
@@ -1150,14 +973,11 @@ trampCall(
1150
973
  ___lambda = lambda { |__v__32__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30298|
1151
974
  if (
1152
975
  begin
1153
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
1154
976
  _not(
1155
977
  begin
1156
- embedBacktraceInfo( "", 1 );
1157
978
  _eq_QUMARK(
1158
979
  false ,
1159
980
  begin
1160
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 132 );
1161
981
  _pair_QUMARK(
1162
982
  __v__32__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30298
1163
983
  )
@@ -1171,18 +991,14 @@ trampCall(
1171
991
  ___lambda = lambda { |__v__33__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30299|
1172
992
  if (
1173
993
  begin
1174
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
1175
994
  _not(
1176
995
  begin
1177
- embedBacktraceInfo( "", 1 );
1178
996
  _eq_QUMARK(
1179
997
  false ,
1180
998
  begin
1181
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
1182
999
  trampCall( callProcedure( '__compare__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30261', '_compare__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30261',
1183
1000
  begin
1184
1001
  trampCall(__compare__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30261)
1185
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
1186
1002
  end ,
1187
1003
  [
1188
1004
  __v__33__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30299 ,
@@ -1200,14 +1016,11 @@ trampCall(
1200
1016
  begin
1201
1017
  ___lambda = lambda { |_rest|
1202
1018
  begin
1203
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
1204
1019
  _cons(
1205
1020
  begin
1206
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
1207
1021
  trampCall( callProcedure( '__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260', '_rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260',
1208
1022
  begin
1209
1023
  trampCall(__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260)
1210
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
1211
1024
  end ,
1212
1025
  [
1213
1026
  :"error"
@@ -1215,7 +1028,6 @@ trampCall(
1215
1028
  ))
1216
1029
  end ,
1217
1030
  begin
1218
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
1219
1031
  _cons(
1220
1032
  "cut: non-terminal <...>" ,
1221
1033
  Cell.new()
@@ -1229,7 +1041,6 @@ trampCall(
1229
1041
  end
1230
1042
  } ; ___lambda.call(
1231
1043
  begin
1232
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
1233
1044
  _cdr(
1234
1045
  __v__32__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30298
1235
1046
  )
@@ -1241,7 +1052,6 @@ trampCall(
1241
1052
  end
1242
1053
  } ; ___lambda.call(
1243
1054
  begin
1244
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
1245
1055
  _car(
1246
1056
  __v__32__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30298
1247
1057
  )
@@ -1253,7 +1063,6 @@ trampCall(
1253
1063
  end
1254
1064
  } ; ___lambda.call(
1255
1065
  begin
1256
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
1257
1066
  _cdr(
1258
1067
  __v__30__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30296
1259
1068
  )
@@ -1269,7 +1078,6 @@ trampCall(
1269
1078
  end
1270
1079
  } ; ___lambda.call(
1271
1080
  begin
1272
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
1273
1081
  _car(
1274
1082
  __v__30__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30296
1275
1083
  )
@@ -1281,7 +1089,6 @@ trampCall(
1281
1089
  end
1282
1090
  } ; ___lambda.call(
1283
1091
  begin
1284
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
1285
1092
  _cdr(
1286
1093
  __v__28__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30294
1287
1094
  )
@@ -1297,7 +1104,6 @@ trampCall(
1297
1104
  end
1298
1105
  } ; ___lambda.call(
1299
1106
  begin
1300
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
1301
1107
  _car(
1302
1108
  __v__28__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30294
1303
1109
  )
@@ -1309,7 +1115,6 @@ trampCall(
1309
1115
  end
1310
1116
  } ; ___lambda.call(
1311
1117
  begin
1312
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
1313
1118
  _cdr(
1314
1119
  __v__26__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30292
1315
1120
  )
@@ -1322,7 +1127,6 @@ trampCall(
1322
1127
  end
1323
1128
  } ; ___lambda.call(
1324
1129
  begin
1325
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
1326
1130
  _car(
1327
1131
  __v__26__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30292
1328
1132
  )
@@ -1334,7 +1138,6 @@ trampCall(
1334
1138
  end
1335
1139
  } ; ___lambda.call(
1336
1140
  begin
1337
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
1338
1141
  _cdr(
1339
1142
  __expr__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30259
1340
1143
  )
@@ -1349,14 +1152,11 @@ trampCall(
1349
1152
  ___lambda = lambda { |__v__17__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30283|
1350
1153
  if (
1351
1154
  begin
1352
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
1353
1155
  _not(
1354
1156
  begin
1355
- embedBacktraceInfo( "", 1 );
1356
1157
  _eq_QUMARK(
1357
1158
  false ,
1358
1159
  begin
1359
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 132 );
1360
1160
  _pair_QUMARK(
1361
1161
  __v__17__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30283
1362
1162
  )
@@ -1374,14 +1174,11 @@ trampCall(
1374
1174
  ___lambda = lambda { |__v__19__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30285|
1375
1175
  if (
1376
1176
  begin
1377
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
1378
1177
  _not(
1379
1178
  begin
1380
- embedBacktraceInfo( "", 1 );
1381
1179
  _eq_QUMARK(
1382
1180
  false ,
1383
1181
  begin
1384
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 132 );
1385
1182
  _pair_QUMARK(
1386
1183
  __v__19__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30285
1387
1184
  )
@@ -1395,20 +1192,14 @@ trampCall(
1395
1192
  ___lambda = lambda { |__v__20__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30286|
1396
1193
  if (
1397
1194
  begin
1398
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
1399
1195
  _not(
1400
1196
  begin
1401
- embedBacktraceInfo( "", 1 );
1402
1197
  _eq_QUMARK(
1403
1198
  false ,
1404
1199
  begin
1405
- embedBacktraceInfo( "", 1 );
1406
1200
  trampCall( self._list_QUMARK_METHOD( 'list?',
1407
1201
  begin
1408
- if @global_lisp_binding.has_key?('_list_QUMARK') then
1409
1202
  trampCall(@_list_QUMARK)
1410
- else raise NameError.new( "Error: undefined variable _list_QUMARK", "_list_QUMARK" ) end
1411
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1412
1203
  end ,
1413
1204
  [
1414
1205
  __v__20__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30286
@@ -1426,14 +1217,11 @@ trampCall(
1426
1217
  ___lambda = lambda { |__v__21__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30287|
1427
1218
  if (
1428
1219
  begin
1429
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
1430
1220
  _not(
1431
1221
  begin
1432
- embedBacktraceInfo( "", 1 );
1433
1222
  _eq_QUMARK(
1434
1223
  false ,
1435
1224
  begin
1436
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 132 );
1437
1225
  _pair_QUMARK(
1438
1226
  __v__21__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30287
1439
1227
  )
@@ -1447,20 +1235,14 @@ trampCall(
1447
1235
  ___lambda = lambda { |__v__22__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30288|
1448
1236
  if (
1449
1237
  begin
1450
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
1451
1238
  _not(
1452
1239
  begin
1453
- embedBacktraceInfo( "", 1 );
1454
1240
  _eq_QUMARK(
1455
1241
  false ,
1456
1242
  begin
1457
- embedBacktraceInfo( "", 1 );
1458
1243
  trampCall( self._list_QUMARK_METHOD( 'list?',
1459
1244
  begin
1460
- if @global_lisp_binding.has_key?('_list_QUMARK') then
1461
1245
  trampCall(@_list_QUMARK)
1462
- else raise NameError.new( "Error: undefined variable _list_QUMARK", "_list_QUMARK" ) end
1463
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1464
1246
  end ,
1465
1247
  [
1466
1248
  __v__22__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30288
@@ -1478,14 +1260,11 @@ trampCall(
1478
1260
  ___lambda = lambda { |__v__23__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30289|
1479
1261
  if (
1480
1262
  begin
1481
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
1482
1263
  _not(
1483
1264
  begin
1484
- embedBacktraceInfo( "", 1 );
1485
1265
  _eq_QUMARK(
1486
1266
  false ,
1487
1267
  begin
1488
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 132 );
1489
1268
  _pair_QUMARK(
1490
1269
  __v__23__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30289
1491
1270
  )
@@ -1499,18 +1278,14 @@ trampCall(
1499
1278
  ___lambda = lambda { |__v__24__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30290|
1500
1279
  if (
1501
1280
  begin
1502
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
1503
1281
  _not(
1504
1282
  begin
1505
- embedBacktraceInfo( "", 1 );
1506
1283
  _eq_QUMARK(
1507
1284
  false ,
1508
1285
  begin
1509
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
1510
1286
  trampCall( callProcedure( '__compare__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30261', '_compare__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30261',
1511
1287
  begin
1512
1288
  trampCall(__compare__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30261)
1513
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
1514
1289
  end ,
1515
1290
  [
1516
1291
  __v__24__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30290 ,
@@ -1527,14 +1302,11 @@ trampCall(
1527
1302
  ___lambda = lambda { |__v__25__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30291|
1528
1303
  if (
1529
1304
  begin
1530
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
1531
1305
  _not(
1532
1306
  begin
1533
- embedBacktraceInfo( "", 1 );
1534
1307
  _eq_QUMARK(
1535
1308
  false ,
1536
1309
  begin
1537
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 133 );
1538
1310
  _null_QUMARK(
1539
1311
  __v__25__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30291
1540
1312
  )
@@ -1545,14 +1317,11 @@ trampCall(
1545
1317
  end
1546
1318
  ) then
1547
1319
  begin
1548
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
1549
1320
  _cons(
1550
1321
  begin
1551
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
1552
1322
  trampCall( callProcedure( '__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260', '_rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260',
1553
1323
  begin
1554
1324
  trampCall(__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260)
1555
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
1556
1325
  end ,
1557
1326
  [
1558
1327
  :"%cut"
@@ -1560,54 +1329,39 @@ trampCall(
1560
1329
  ))
1561
1330
  end ,
1562
1331
  begin
1563
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
1564
1332
  _cons(
1565
1333
  begin
1566
1334
  trampCall(_e_QUMARK)
1567
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-26.nnd:40"] + __e.backtrace ) ; raise __e
1568
1335
  end ,
1569
1336
  begin
1570
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
1571
1337
  _cons(
1572
1338
  begin
1573
- embedBacktraceInfo( "", 1 );
1574
1339
  trampCall( self._append_METHOD( 'append',
1575
1340
  begin
1576
- if @global_lisp_binding.has_key?('_append') then
1577
1341
  trampCall(@_append)
1578
- else raise NameError.new( "Error: undefined variable _append", "_append" ) end
1579
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1580
1342
  end ,
1581
1343
  [
1582
1344
  begin
1583
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 259 );
1584
1345
  trampCall( self._map_METHOD( 'map',
1585
1346
  begin
1586
- if @global_lisp_binding.has_key?('_map') then
1587
1347
  trampCall(@_map)
1588
- else raise NameError.new( "Error: undefined variable _map", "_map" ) end
1589
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/nendo/experimental.nnd:259"] + __e.backtrace ) ; raise __e
1590
1348
  end ,
1591
1349
  [
1592
1350
  Proc.new { |_params|
1593
1351
  begin
1594
1352
  trampCall(_params)
1595
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-26.nnd:45"] + __e.backtrace ) ; raise __e
1596
1353
  end
1597
1354
  } ,
1598
1355
  begin
1599
1356
  trampCall(_params)
1600
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-26.nnd:45"] + __e.backtrace ) ; raise __e
1601
1357
  end
1602
1358
  ]
1603
1359
  ))
1604
1360
  end ,
1605
1361
  begin
1606
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
1607
1362
  trampCall( callProcedure( '__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260', '_rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260',
1608
1363
  begin
1609
1364
  trampCall(__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260)
1610
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
1611
1365
  end ,
1612
1366
  [
1613
1367
  :"tmp"
@@ -1618,17 +1372,13 @@ trampCall(
1618
1372
  ))
1619
1373
  end ,
1620
1374
  begin
1621
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
1622
1375
  _cons(
1623
1376
  begin
1624
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
1625
1377
  _cons(
1626
1378
  begin
1627
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
1628
1379
  trampCall( callProcedure( '__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260', '_rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260',
1629
1380
  begin
1630
1381
  trampCall(__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260)
1631
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
1632
1382
  end ,
1633
1383
  [
1634
1384
  :"apply"
@@ -1636,47 +1386,34 @@ trampCall(
1636
1386
  ))
1637
1387
  end ,
1638
1388
  begin
1639
- embedBacktraceInfo( "", 1 );
1640
1389
  trampCall( self._append_METHOD( 'append',
1641
1390
  begin
1642
- if @global_lisp_binding.has_key?('_append') then
1643
1391
  trampCall(@_append)
1644
- else raise NameError.new( "Error: undefined variable _append", "_append" ) end
1645
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1646
1392
  end ,
1647
1393
  [
1648
1394
  begin
1649
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 259 );
1650
1395
  trampCall( self._map_METHOD( 'map',
1651
1396
  begin
1652
- if @global_lisp_binding.has_key?('_map') then
1653
1397
  trampCall(@_map)
1654
- else raise NameError.new( "Error: undefined variable _map", "_map" ) end
1655
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/nendo/experimental.nnd:259"] + __e.backtrace ) ; raise __e
1656
1398
  end ,
1657
1399
  [
1658
1400
  Proc.new { |_args|
1659
1401
  begin
1660
1402
  trampCall(_args)
1661
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-26.nnd:45"] + __e.backtrace ) ; raise __e
1662
1403
  end
1663
1404
  } ,
1664
1405
  begin
1665
1406
  trampCall(_args)
1666
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-26.nnd:45"] + __e.backtrace ) ; raise __e
1667
1407
  end
1668
1408
  ]
1669
1409
  ))
1670
1410
  end ,
1671
1411
  begin
1672
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
1673
1412
  _cons(
1674
1413
  begin
1675
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
1676
1414
  trampCall( callProcedure( '__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260', '_rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260',
1677
1415
  begin
1678
1416
  trampCall(__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260)
1679
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
1680
1417
  end ,
1681
1418
  [
1682
1419
  :"tmp"
@@ -1705,7 +1442,6 @@ trampCall(
1705
1442
  end
1706
1443
  } ; ___lambda.call(
1707
1444
  begin
1708
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
1709
1445
  _cdr(
1710
1446
  __v__23__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30289
1711
1447
  )
@@ -1717,7 +1453,6 @@ trampCall(
1717
1453
  end
1718
1454
  } ; ___lambda.call(
1719
1455
  begin
1720
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
1721
1456
  _car(
1722
1457
  __v__23__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30289
1723
1458
  )
@@ -1729,7 +1464,6 @@ trampCall(
1729
1464
  end
1730
1465
  } ; ___lambda.call(
1731
1466
  begin
1732
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
1733
1467
  _cdr(
1734
1468
  __v__21__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30287
1735
1469
  )
@@ -1745,7 +1479,6 @@ trampCall(
1745
1479
  end
1746
1480
  } ; ___lambda.call(
1747
1481
  begin
1748
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
1749
1482
  _car(
1750
1483
  __v__21__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30287
1751
1484
  )
@@ -1757,7 +1490,6 @@ trampCall(
1757
1490
  end
1758
1491
  } ; ___lambda.call(
1759
1492
  begin
1760
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
1761
1493
  _cdr(
1762
1494
  __v__19__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30285
1763
1495
  )
@@ -1773,7 +1505,6 @@ trampCall(
1773
1505
  end
1774
1506
  } ; ___lambda.call(
1775
1507
  begin
1776
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
1777
1508
  _car(
1778
1509
  __v__19__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30285
1779
1510
  )
@@ -1785,7 +1516,6 @@ trampCall(
1785
1516
  end
1786
1517
  } ; ___lambda.call(
1787
1518
  begin
1788
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
1789
1519
  _cdr(
1790
1520
  __v__17__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30283
1791
1521
  )
@@ -1798,7 +1528,6 @@ trampCall(
1798
1528
  end
1799
1529
  } ; ___lambda.call(
1800
1530
  begin
1801
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
1802
1531
  _car(
1803
1532
  __v__17__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30283
1804
1533
  )
@@ -1810,7 +1539,6 @@ trampCall(
1810
1539
  end
1811
1540
  } ; ___lambda.call(
1812
1541
  begin
1813
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
1814
1542
  _cdr(
1815
1543
  __expr__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30259
1816
1544
  )
@@ -1825,14 +1553,11 @@ trampCall(
1825
1553
  ___lambda = lambda { |__v__8__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30274|
1826
1554
  if (
1827
1555
  begin
1828
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
1829
1556
  _not(
1830
1557
  begin
1831
- embedBacktraceInfo( "", 1 );
1832
1558
  _eq_QUMARK(
1833
1559
  false ,
1834
1560
  begin
1835
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 132 );
1836
1561
  _pair_QUMARK(
1837
1562
  __v__8__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30274
1838
1563
  )
@@ -1850,14 +1575,11 @@ trampCall(
1850
1575
  ___lambda = lambda { |__v__10__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30276|
1851
1576
  if (
1852
1577
  begin
1853
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
1854
1578
  _not(
1855
1579
  begin
1856
- embedBacktraceInfo( "", 1 );
1857
1580
  _eq_QUMARK(
1858
1581
  false ,
1859
1582
  begin
1860
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 132 );
1861
1583
  _pair_QUMARK(
1862
1584
  __v__10__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30276
1863
1585
  )
@@ -1871,20 +1593,14 @@ trampCall(
1871
1593
  ___lambda = lambda { |__v__11__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30277|
1872
1594
  if (
1873
1595
  begin
1874
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
1875
1596
  _not(
1876
1597
  begin
1877
- embedBacktraceInfo( "", 1 );
1878
1598
  _eq_QUMARK(
1879
1599
  false ,
1880
1600
  begin
1881
- embedBacktraceInfo( "", 1 );
1882
1601
  trampCall( self._list_QUMARK_METHOD( 'list?',
1883
1602
  begin
1884
- if @global_lisp_binding.has_key?('_list_QUMARK') then
1885
1603
  trampCall(@_list_QUMARK)
1886
- else raise NameError.new( "Error: undefined variable _list_QUMARK", "_list_QUMARK" ) end
1887
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1888
1604
  end ,
1889
1605
  [
1890
1606
  __v__11__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30277
@@ -1902,14 +1618,11 @@ trampCall(
1902
1618
  ___lambda = lambda { |__v__12__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30278|
1903
1619
  if (
1904
1620
  begin
1905
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
1906
1621
  _not(
1907
1622
  begin
1908
- embedBacktraceInfo( "", 1 );
1909
1623
  _eq_QUMARK(
1910
1624
  false ,
1911
1625
  begin
1912
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 132 );
1913
1626
  _pair_QUMARK(
1914
1627
  __v__12__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30278
1915
1628
  )
@@ -1923,20 +1636,14 @@ trampCall(
1923
1636
  ___lambda = lambda { |__v__13__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30279|
1924
1637
  if (
1925
1638
  begin
1926
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
1927
1639
  _not(
1928
1640
  begin
1929
- embedBacktraceInfo( "", 1 );
1930
1641
  _eq_QUMARK(
1931
1642
  false ,
1932
1643
  begin
1933
- embedBacktraceInfo( "", 1 );
1934
1644
  trampCall( self._list_QUMARK_METHOD( 'list?',
1935
1645
  begin
1936
- if @global_lisp_binding.has_key?('_list_QUMARK') then
1937
1646
  trampCall(@_list_QUMARK)
1938
- else raise NameError.new( "Error: undefined variable _list_QUMARK", "_list_QUMARK" ) end
1939
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1940
1647
  end ,
1941
1648
  [
1942
1649
  __v__13__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30279
@@ -1954,14 +1661,11 @@ trampCall(
1954
1661
  ___lambda = lambda { |__v__14__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30280|
1955
1662
  if (
1956
1663
  begin
1957
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
1958
1664
  _not(
1959
1665
  begin
1960
- embedBacktraceInfo( "", 1 );
1961
1666
  _eq_QUMARK(
1962
1667
  false ,
1963
1668
  begin
1964
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 132 );
1965
1669
  _pair_QUMARK(
1966
1670
  __v__14__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30280
1967
1671
  )
@@ -1975,18 +1679,14 @@ trampCall(
1975
1679
  ___lambda = lambda { |__v__15__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30281|
1976
1680
  if (
1977
1681
  begin
1978
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
1979
1682
  _not(
1980
1683
  begin
1981
- embedBacktraceInfo( "", 1 );
1982
1684
  _eq_QUMARK(
1983
1685
  false ,
1984
1686
  begin
1985
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
1986
1687
  trampCall( callProcedure( '__compare__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30261', '_compare__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30261',
1987
1688
  begin
1988
1689
  trampCall(__compare__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30261)
1989
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
1990
1690
  end ,
1991
1691
  [
1992
1692
  __v__15__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30281 ,
@@ -2004,14 +1704,11 @@ trampCall(
2004
1704
  begin
2005
1705
  ___lambda = lambda { |_rest|
2006
1706
  begin
2007
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
2008
1707
  _cons(
2009
1708
  begin
2010
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
2011
1709
  trampCall( callProcedure( '__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260', '_rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260',
2012
1710
  begin
2013
1711
  trampCall(__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260)
2014
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
2015
1712
  end ,
2016
1713
  [
2017
1714
  :"%cut"
@@ -2019,57 +1716,41 @@ trampCall(
2019
1716
  ))
2020
1717
  end ,
2021
1718
  begin
2022
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
2023
1719
  _cons(
2024
1720
  begin
2025
1721
  trampCall(_e_QUMARK)
2026
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-26.nnd:40"] + __e.backtrace ) ; raise __e
2027
1722
  end ,
2028
1723
  begin
2029
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
2030
1724
  _cons(
2031
1725
  begin
2032
- embedBacktraceInfo( "", 1 );
2033
1726
  trampCall( self._append_METHOD( 'append',
2034
1727
  begin
2035
- if @global_lisp_binding.has_key?('_append') then
2036
1728
  trampCall(@_append)
2037
- else raise NameError.new( "Error: undefined variable _append", "_append" ) end
2038
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
2039
1729
  end ,
2040
1730
  [
2041
1731
  begin
2042
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 259 );
2043
1732
  trampCall( self._map_METHOD( 'map',
2044
1733
  begin
2045
- if @global_lisp_binding.has_key?('_map') then
2046
1734
  trampCall(@_map)
2047
- else raise NameError.new( "Error: undefined variable _map", "_map" ) end
2048
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/nendo/experimental.nnd:259"] + __e.backtrace ) ; raise __e
2049
1735
  end ,
2050
1736
  [
2051
1737
  Proc.new { |_params|
2052
1738
  begin
2053
1739
  trampCall(_params)
2054
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-26.nnd:45"] + __e.backtrace ) ; raise __e
2055
1740
  end
2056
1741
  } ,
2057
1742
  begin
2058
1743
  trampCall(_params)
2059
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-26.nnd:45"] + __e.backtrace ) ; raise __e
2060
1744
  end
2061
1745
  ]
2062
1746
  ))
2063
1747
  end ,
2064
1748
  begin
2065
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
2066
1749
  _cons(
2067
1750
  begin
2068
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
2069
1751
  trampCall( callProcedure( '__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260', '_rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260',
2070
1752
  begin
2071
1753
  trampCall(__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260)
2072
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
2073
1754
  end ,
2074
1755
  [
2075
1756
  :"tmp"
@@ -2083,50 +1764,36 @@ trampCall(
2083
1764
  ))
2084
1765
  end ,
2085
1766
  begin
2086
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
2087
1767
  _cons(
2088
1768
  begin
2089
- embedBacktraceInfo( "", 1 );
2090
1769
  trampCall( self._append_METHOD( 'append',
2091
1770
  begin
2092
- if @global_lisp_binding.has_key?('_append') then
2093
1771
  trampCall(@_append)
2094
- else raise NameError.new( "Error: undefined variable _append", "_append" ) end
2095
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
2096
1772
  end ,
2097
1773
  [
2098
1774
  begin
2099
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 259 );
2100
1775
  trampCall( self._map_METHOD( 'map',
2101
1776
  begin
2102
- if @global_lisp_binding.has_key?('_map') then
2103
1777
  trampCall(@_map)
2104
- else raise NameError.new( "Error: undefined variable _map", "_map" ) end
2105
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/nendo/experimental.nnd:259"] + __e.backtrace ) ; raise __e
2106
1778
  end ,
2107
1779
  [
2108
1780
  Proc.new { |_args|
2109
1781
  begin
2110
1782
  trampCall(_args)
2111
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-26.nnd:45"] + __e.backtrace ) ; raise __e
2112
1783
  end
2113
1784
  } ,
2114
1785
  begin
2115
1786
  trampCall(_args)
2116
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-26.nnd:45"] + __e.backtrace ) ; raise __e
2117
1787
  end
2118
1788
  ]
2119
1789
  ))
2120
1790
  end ,
2121
1791
  begin
2122
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
2123
1792
  _cons(
2124
1793
  begin
2125
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
2126
1794
  trampCall( callProcedure( '__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260', '_rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260',
2127
1795
  begin
2128
1796
  trampCall(__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260)
2129
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
2130
1797
  end ,
2131
1798
  [
2132
1799
  :"tmp"
@@ -2141,7 +1808,6 @@ trampCall(
2141
1808
  end ,
2142
1809
  begin
2143
1810
  trampCall(_rest)
2144
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-26.nnd:45"] + __e.backtrace ) ; raise __e
2145
1811
  end
2146
1812
  )
2147
1813
  end
@@ -2157,7 +1823,6 @@ trampCall(
2157
1823
  end
2158
1824
  } ; ___lambda.call(
2159
1825
  begin
2160
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
2161
1826
  _cdr(
2162
1827
  __v__14__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30280
2163
1828
  )
@@ -2169,7 +1834,6 @@ trampCall(
2169
1834
  end
2170
1835
  } ; ___lambda.call(
2171
1836
  begin
2172
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
2173
1837
  _car(
2174
1838
  __v__14__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30280
2175
1839
  )
@@ -2181,7 +1845,6 @@ trampCall(
2181
1845
  end
2182
1846
  } ; ___lambda.call(
2183
1847
  begin
2184
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
2185
1848
  _cdr(
2186
1849
  __v__12__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30278
2187
1850
  )
@@ -2197,7 +1860,6 @@ trampCall(
2197
1860
  end
2198
1861
  } ; ___lambda.call(
2199
1862
  begin
2200
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
2201
1863
  _car(
2202
1864
  __v__12__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30278
2203
1865
  )
@@ -2209,7 +1871,6 @@ trampCall(
2209
1871
  end
2210
1872
  } ; ___lambda.call(
2211
1873
  begin
2212
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
2213
1874
  _cdr(
2214
1875
  __v__10__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30276
2215
1876
  )
@@ -2225,7 +1886,6 @@ trampCall(
2225
1886
  end
2226
1887
  } ; ___lambda.call(
2227
1888
  begin
2228
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
2229
1889
  _car(
2230
1890
  __v__10__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30276
2231
1891
  )
@@ -2237,7 +1897,6 @@ trampCall(
2237
1897
  end
2238
1898
  } ; ___lambda.call(
2239
1899
  begin
2240
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
2241
1900
  _cdr(
2242
1901
  __v__8__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30274
2243
1902
  )
@@ -2250,7 +1909,6 @@ trampCall(
2250
1909
  end
2251
1910
  } ; ___lambda.call(
2252
1911
  begin
2253
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
2254
1912
  _car(
2255
1913
  __v__8__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30274
2256
1914
  )
@@ -2262,7 +1920,6 @@ trampCall(
2262
1920
  end
2263
1921
  } ; ___lambda.call(
2264
1922
  begin
2265
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
2266
1923
  _cdr(
2267
1924
  __expr__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30259
2268
1925
  )
@@ -2277,14 +1934,11 @@ trampCall(
2277
1934
  ___lambda = lambda { |__v__1__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30267|
2278
1935
  if (
2279
1936
  begin
2280
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
2281
1937
  _not(
2282
1938
  begin
2283
- embedBacktraceInfo( "", 1 );
2284
1939
  _eq_QUMARK(
2285
1940
  false ,
2286
1941
  begin
2287
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 132 );
2288
1942
  _pair_QUMARK(
2289
1943
  __v__1__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30267
2290
1944
  )
@@ -2302,14 +1956,11 @@ trampCall(
2302
1956
  ___lambda = lambda { |__v__3__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30269|
2303
1957
  if (
2304
1958
  begin
2305
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
2306
1959
  _not(
2307
1960
  begin
2308
- embedBacktraceInfo( "", 1 );
2309
1961
  _eq_QUMARK(
2310
1962
  false ,
2311
1963
  begin
2312
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 132 );
2313
1964
  _pair_QUMARK(
2314
1965
  __v__3__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30269
2315
1966
  )
@@ -2327,14 +1978,11 @@ trampCall(
2327
1978
  ___lambda = lambda { |__v__5__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30271|
2328
1979
  if (
2329
1980
  begin
2330
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
2331
1981
  _not(
2332
1982
  begin
2333
- embedBacktraceInfo( "", 1 );
2334
1983
  _eq_QUMARK(
2335
1984
  false ,
2336
1985
  begin
2337
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 132 );
2338
1986
  _pair_QUMARK(
2339
1987
  __v__5__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30271
2340
1988
  )
@@ -2352,14 +2000,11 @@ trampCall(
2352
2000
  ___lambda = lambda { |__v__7__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30273|
2353
2001
  if (
2354
2002
  begin
2355
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
2356
2003
  _not(
2357
2004
  begin
2358
- embedBacktraceInfo( "", 1 );
2359
2005
  _eq_QUMARK(
2360
2006
  false ,
2361
2007
  begin
2362
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 133 );
2363
2008
  _null_QUMARK(
2364
2009
  __v__7__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30273
2365
2010
  )
@@ -2370,14 +2015,11 @@ trampCall(
2370
2015
  end
2371
2016
  ) then
2372
2017
  begin
2373
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
2374
2018
  _cons(
2375
2019
  begin
2376
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
2377
2020
  trampCall( callProcedure( '__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260', '_rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260',
2378
2021
  begin
2379
2022
  trampCall(__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30260)
2380
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
2381
2023
  end ,
2382
2024
  [
2383
2025
  :"lambda"
@@ -2385,18 +2027,14 @@ trampCall(
2385
2027
  ))
2386
2028
  end ,
2387
2029
  begin
2388
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
2389
2030
  _cons(
2390
2031
  begin
2391
2032
  trampCall(_params)
2392
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-26.nnd:45"] + __e.backtrace ) ; raise __e
2393
2033
  end ,
2394
2034
  begin
2395
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
2396
2035
  _cons(
2397
2036
  begin
2398
2037
  trampCall(_args)
2399
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-26.nnd:45"] + __e.backtrace ) ; raise __e
2400
2038
  end ,
2401
2039
  Cell.new()
2402
2040
  )
@@ -2410,7 +2048,6 @@ trampCall(
2410
2048
  end
2411
2049
  } ; ___lambda.call(
2412
2050
  begin
2413
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
2414
2051
  _cdr(
2415
2052
  __v__5__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30271
2416
2053
  )
@@ -2423,7 +2060,6 @@ trampCall(
2423
2060
  end
2424
2061
  } ; ___lambda.call(
2425
2062
  begin
2426
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
2427
2063
  _car(
2428
2064
  __v__5__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30271
2429
2065
  )
@@ -2435,7 +2071,6 @@ trampCall(
2435
2071
  end
2436
2072
  } ; ___lambda.call(
2437
2073
  begin
2438
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
2439
2074
  _cdr(
2440
2075
  __v__3__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30269
2441
2076
  )
@@ -2448,7 +2083,6 @@ trampCall(
2448
2083
  end
2449
2084
  } ; ___lambda.call(
2450
2085
  begin
2451
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
2452
2086
  _car(
2453
2087
  __v__3__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30269
2454
2088
  )
@@ -2460,7 +2094,6 @@ trampCall(
2460
2094
  end
2461
2095
  } ; ___lambda.call(
2462
2096
  begin
2463
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
2464
2097
  _cdr(
2465
2098
  __v__1__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30267
2466
2099
  )
@@ -2473,7 +2106,6 @@ trampCall(
2473
2106
  end
2474
2107
  } ; ___lambda.call(
2475
2108
  begin
2476
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
2477
2109
  _car(
2478
2110
  __v__1__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30267
2479
2111
  )
@@ -2485,7 +2117,6 @@ trampCall(
2485
2117
  end
2486
2118
  } ; ___lambda.call(
2487
2119
  begin
2488
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
2489
2120
  _cdr(
2490
2121
  __expr__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30259
2491
2122
  )
@@ -2510,13 +2141,9 @@ trampCall(
2510
2141
  @_cut =
2511
2142
  trampCall(
2512
2143
  begin
2513
- embedBacktraceInfo( "", 1 );
2514
2144
  trampCall( self._er_MIMARKmacro_MIMARKtransformer_METHOD( 'er-macro-transformer',
2515
2145
  begin
2516
- if @global_lisp_binding.has_key?('_er_MIMARKmacro_MIMARKtransformer') then
2517
2146
  trampCall(@_er_MIMARKmacro_MIMARKtransformer)
2518
- else raise NameError.new( "Error: undefined variable _er_MIMARKmacro_MIMARKtransformer", "_er_MIMARKmacro_MIMARKtransformer" ) end
2519
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
2520
2147
  end ,
2521
2148
  [
2522
2149
  Proc.new { |__expr__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30326,__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30327,__compare__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30328|
@@ -2525,12 +2152,10 @@ trampCall(
2525
2152
  if (
2526
2153
  begin
2527
2154
  trampCall(___gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30335)
2528
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
2529
2155
  end
2530
2156
  ) then
2531
2157
  begin
2532
2158
  trampCall(___gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30335)
2533
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
2534
2159
  end
2535
2160
  else
2536
2161
  begin
@@ -2538,12 +2163,10 @@ trampCall(
2538
2163
  if (
2539
2164
  begin
2540
2165
  trampCall(___gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30336)
2541
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
2542
2166
  end
2543
2167
  ) then
2544
2168
  begin
2545
2169
  trampCall(___gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30336)
2546
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
2547
2170
  end
2548
2171
  else
2549
2172
  false
@@ -2553,13 +2176,9 @@ trampCall(
2553
2176
  "no expansion for" ' ' +
2554
2177
  _write_MIMARKto_MIMARKstring(
2555
2178
  begin
2556
- embedBacktraceInfo( "", 1 );
2557
2179
  trampCall( self._strip_MIMARKsyntactic_MIMARKclosures_METHOD( 'strip-syntactic-closures',
2558
2180
  begin
2559
- if @global_lisp_binding.has_key?('_strip_MIMARKsyntactic_MIMARKclosures') then
2560
2181
  trampCall(@_strip_MIMARKsyntactic_MIMARKclosures)
2561
- else raise NameError.new( "Error: undefined variable _strip_MIMARKsyntactic_MIMARKclosures", "_strip_MIMARKsyntactic_MIMARKclosures" ) end
2562
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
2563
2182
  end ,
2564
2183
  [
2565
2184
  __expr__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30326
@@ -2579,20 +2198,14 @@ trampCall(
2579
2198
  ___lambda = lambda { |__v__1__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30334|
2580
2199
  if (
2581
2200
  begin
2582
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
2583
2201
  _not(
2584
2202
  begin
2585
- embedBacktraceInfo( "", 1 );
2586
2203
  _eq_QUMARK(
2587
2204
  false ,
2588
2205
  begin
2589
- embedBacktraceInfo( "", 1 );
2590
2206
  trampCall( self._list_QUMARK_METHOD( 'list?',
2591
2207
  begin
2592
- if @global_lisp_binding.has_key?('_list_QUMARK') then
2593
2208
  trampCall(@_list_QUMARK)
2594
- else raise NameError.new( "Error: undefined variable _list_QUMARK", "_list_QUMARK" ) end
2595
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
2596
2209
  end ,
2597
2210
  [
2598
2211
  __v__1__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30334
@@ -2607,14 +2220,11 @@ trampCall(
2607
2220
  begin
2608
2221
  ___lambda = lambda { |_args|
2609
2222
  begin
2610
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
2611
2223
  _cons(
2612
2224
  begin
2613
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
2614
2225
  trampCall( callProcedure( '__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30327', '_rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30327',
2615
2226
  begin
2616
2227
  trampCall(__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30327)
2617
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
2618
2228
  end ,
2619
2229
  [
2620
2230
  :"%cut"
@@ -2622,36 +2232,27 @@ trampCall(
2622
2232
  ))
2623
2233
  end ,
2624
2234
  begin
2625
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
2626
2235
  _cons(
2627
2236
  false ,
2628
2237
  begin
2629
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
2630
2238
  _cons(
2631
2239
  Cell.new() ,
2632
2240
  begin
2633
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
2634
2241
  _cons(
2635
2242
  Cell.new() ,
2636
2243
  begin
2637
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 259 );
2638
2244
  trampCall( self._map_METHOD( 'map',
2639
2245
  begin
2640
- if @global_lisp_binding.has_key?('_map') then
2641
2246
  trampCall(@_map)
2642
- else raise NameError.new( "Error: undefined variable _map", "_map" ) end
2643
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/nendo/experimental.nnd:259"] + __e.backtrace ) ; raise __e
2644
2247
  end ,
2645
2248
  [
2646
2249
  Proc.new { |_args|
2647
2250
  begin
2648
2251
  trampCall(_args)
2649
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-26.nnd:47"] + __e.backtrace ) ; raise __e
2650
2252
  end
2651
2253
  } ,
2652
2254
  begin
2653
2255
  trampCall(_args)
2654
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-26.nnd:47"] + __e.backtrace ) ; raise __e
2655
2256
  end
2656
2257
  ]
2657
2258
  ))
@@ -2673,7 +2274,6 @@ trampCall(
2673
2274
  end
2674
2275
  } ; ___lambda.call(
2675
2276
  begin
2676
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
2677
2277
  _cdr(
2678
2278
  __expr__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30326
2679
2279
  )
@@ -2698,13 +2298,9 @@ trampCall(
2698
2298
  @_cute =
2699
2299
  trampCall(
2700
2300
  begin
2701
- embedBacktraceInfo( "", 1 );
2702
2301
  trampCall( self._er_MIMARKmacro_MIMARKtransformer_METHOD( 'er-macro-transformer',
2703
2302
  begin
2704
- if @global_lisp_binding.has_key?('_er_MIMARKmacro_MIMARKtransformer') then
2705
2303
  trampCall(@_er_MIMARKmacro_MIMARKtransformer)
2706
- else raise NameError.new( "Error: undefined variable _er_MIMARKmacro_MIMARKtransformer", "_er_MIMARKmacro_MIMARKtransformer" ) end
2707
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
2708
2304
  end ,
2709
2305
  [
2710
2306
  Proc.new { |__expr__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30337,__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30338,__compare__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30339|
@@ -2713,12 +2309,10 @@ trampCall(
2713
2309
  if (
2714
2310
  begin
2715
2311
  trampCall(___gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30346)
2716
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
2717
2312
  end
2718
2313
  ) then
2719
2314
  begin
2720
2315
  trampCall(___gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30346)
2721
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
2722
2316
  end
2723
2317
  else
2724
2318
  begin
@@ -2726,12 +2320,10 @@ trampCall(
2726
2320
  if (
2727
2321
  begin
2728
2322
  trampCall(___gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30347)
2729
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
2730
2323
  end
2731
2324
  ) then
2732
2325
  begin
2733
2326
  trampCall(___gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30347)
2734
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
2735
2327
  end
2736
2328
  else
2737
2329
  false
@@ -2741,13 +2333,9 @@ trampCall(
2741
2333
  "no expansion for" ' ' +
2742
2334
  _write_MIMARKto_MIMARKstring(
2743
2335
  begin
2744
- embedBacktraceInfo( "", 1 );
2745
2336
  trampCall( self._strip_MIMARKsyntactic_MIMARKclosures_METHOD( 'strip-syntactic-closures',
2746
2337
  begin
2747
- if @global_lisp_binding.has_key?('_strip_MIMARKsyntactic_MIMARKclosures') then
2748
2338
  trampCall(@_strip_MIMARKsyntactic_MIMARKclosures)
2749
- else raise NameError.new( "Error: undefined variable _strip_MIMARKsyntactic_MIMARKclosures", "_strip_MIMARKsyntactic_MIMARKclosures" ) end
2750
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
2751
2339
  end ,
2752
2340
  [
2753
2341
  __expr__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30337
@@ -2767,20 +2355,14 @@ trampCall(
2767
2355
  ___lambda = lambda { |__v__1__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30345|
2768
2356
  if (
2769
2357
  begin
2770
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 265 );
2771
2358
  _not(
2772
2359
  begin
2773
- embedBacktraceInfo( "", 1 );
2774
2360
  _eq_QUMARK(
2775
2361
  false ,
2776
2362
  begin
2777
- embedBacktraceInfo( "", 1 );
2778
2363
  trampCall( self._list_QUMARK_METHOD( 'list?',
2779
2364
  begin
2780
- if @global_lisp_binding.has_key?('_list_QUMARK') then
2781
2365
  trampCall(@_list_QUMARK)
2782
- else raise NameError.new( "Error: undefined variable _list_QUMARK", "_list_QUMARK" ) end
2783
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
2784
2366
  end ,
2785
2367
  [
2786
2368
  __v__1__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30345
@@ -2795,14 +2377,11 @@ trampCall(
2795
2377
  begin
2796
2378
  ___lambda = lambda { |_args|
2797
2379
  begin
2798
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
2799
2380
  _cons(
2800
2381
  begin
2801
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
2802
2382
  trampCall( callProcedure( '__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30338', '_rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30338',
2803
2383
  begin
2804
2384
  trampCall(__rename__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30338)
2805
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
2806
2385
  end ,
2807
2386
  [
2808
2387
  :"%cut"
@@ -2810,36 +2389,27 @@ trampCall(
2810
2389
  ))
2811
2390
  end ,
2812
2391
  begin
2813
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
2814
2392
  _cons(
2815
2393
  true ,
2816
2394
  begin
2817
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
2818
2395
  _cons(
2819
2396
  Cell.new() ,
2820
2397
  begin
2821
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 102 );
2822
2398
  _cons(
2823
2399
  Cell.new() ,
2824
2400
  begin
2825
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 259 );
2826
2401
  trampCall( self._map_METHOD( 'map',
2827
2402
  begin
2828
- if @global_lisp_binding.has_key?('_map') then
2829
2403
  trampCall(@_map)
2830
- else raise NameError.new( "Error: undefined variable _map", "_map" ) end
2831
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/nendo/experimental.nnd:259"] + __e.backtrace ) ; raise __e
2832
2404
  end ,
2833
2405
  [
2834
2406
  Proc.new { |_args|
2835
2407
  begin
2836
2408
  trampCall(_args)
2837
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-26.nnd:49"] + __e.backtrace ) ; raise __e
2838
2409
  end
2839
2410
  } ,
2840
2411
  begin
2841
2412
  trampCall(_args)
2842
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/srfi-26.nnd:49"] + __e.backtrace ) ; raise __e
2843
2413
  end
2844
2414
  ]
2845
2415
  ))
@@ -2861,7 +2431,6 @@ trampCall(
2861
2431
  end
2862
2432
  } ; ___lambda.call(
2863
2433
  begin
2864
- embedBacktraceInfo( "./lib/nendo/nendo/experimental.nnd", 138 );
2865
2434
  _cdr(
2866
2435
  __expr__gensym__45c7e50a18fdc854bcb682c77ca85971738831a0_30337
2867
2436
  )