nendo 0.6.5 → 0.6.6

This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
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
  )