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/util/list.nndc CHANGED
@@ -5,13 +5,9 @@
5
5
 
6
6
  trampCall(
7
7
  begin
8
- embedBacktraceInfo( "", 1 );
9
8
  delayCall( '_load', 'load',
10
9
  begin
11
- if @global_lisp_binding.has_key?('_load') then
12
10
  trampCall(@_load)
13
- else raise NameError.new( "Error: undefined variable _load", "_load" ) end
14
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
15
11
  end ,
16
12
  [
17
13
  "srfi-1"
@@ -23,13 +19,9 @@ trampCall(
23
19
 
24
20
  trampCall(
25
21
  begin
26
- embedBacktraceInfo( "", 1 );
27
22
  delayCall( '_load', 'load',
28
23
  begin
29
- if @global_lisp_binding.has_key?('_load') then
30
24
  trampCall(@_load)
31
- else raise NameError.new( "Error: undefined variable _load", "_load" ) end
32
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
33
25
  end ,
34
26
  [
35
27
  "srfi-26"
@@ -50,15 +42,12 @@ trampCall(
50
42
  ___lambda = lambda { |_fill_QUMARK,_filler|
51
43
  if (
52
44
  begin
53
- embedBacktraceInfo( "", 1 );
54
45
  __LTMARK(
55
46
  0 ,
56
47
  begin
57
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 63 );
58
48
  _length(
59
49
  begin
60
50
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70249)
61
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
62
51
  end
63
52
  )
64
53
  end
@@ -71,19 +60,14 @@ trampCall(
71
60
  _fill_QUMARK =
72
61
  trampCall(
73
62
  begin
74
- embedBacktraceInfo( "", 1 );
75
63
  trampCall( self._nth_METHOD( 'nth',
76
64
  begin
77
- if @global_lisp_binding.has_key?('_nth') then
78
65
  trampCall(@_nth)
79
- else raise NameError.new( "Error: undefined variable _nth", "_nth" ) end
80
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
81
66
  end ,
82
67
  [
83
68
  0 ,
84
69
  begin
85
70
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70249)
86
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
87
71
  end
88
72
  ]
89
73
  ))
@@ -94,15 +78,12 @@ trampCall(
94
78
  end
95
79
  if (
96
80
  begin
97
- embedBacktraceInfo( "", 1 );
98
81
  __LTMARK(
99
82
  1 ,
100
83
  begin
101
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 63 );
102
84
  _length(
103
85
  begin
104
86
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70249)
105
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
106
87
  end
107
88
  )
108
89
  end
@@ -115,19 +96,14 @@ trampCall(
115
96
  _filler =
116
97
  trampCall(
117
98
  begin
118
- embedBacktraceInfo( "", 1 );
119
99
  trampCall( self._nth_METHOD( 'nth',
120
100
  begin
121
- if @global_lisp_binding.has_key?('_nth') then
122
101
  trampCall(@_nth)
123
- else raise NameError.new( "Error: undefined variable _nth", "_nth" ) end
124
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
125
102
  end ,
126
103
  [
127
104
  1 ,
128
105
  begin
129
106
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70249)
130
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
131
107
  end
132
108
  ]
133
109
  ))
@@ -142,12 +118,10 @@ trampCall(
142
118
  if (
143
119
  begin
144
120
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70250)
145
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
146
121
  end
147
122
  ) then
148
123
  begin
149
124
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70250)
150
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
151
125
  end
152
126
  else
153
127
  begin
@@ -155,30 +129,23 @@ trampCall(
155
129
  if (
156
130
  begin
157
131
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70251)
158
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
159
132
  end
160
133
  ) then
161
134
  begin
162
135
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70251)
163
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
164
136
  end
165
137
  else
166
138
  false
167
139
  end
168
140
  } ; ___lambda.call(
169
141
  begin
170
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 27 );
171
142
  trampCall( self._negative_QUMARK_METHOD( 'negative?',
172
143
  begin
173
- if @global_lisp_binding.has_key?('_negative_QUMARK') then
174
144
  trampCall(@_negative_QUMARK)
175
- else raise NameError.new( "Error: undefined variable _negative_QUMARK", "_negative_QUMARK" ) end
176
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:27"] + __e.backtrace ) ; raise __e
177
145
  end ,
178
146
  [
179
147
  begin
180
148
  trampCall(_k)
181
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:35"] + __e.backtrace ) ; raise __e
182
149
  end
183
150
  ]
184
151
  ))
@@ -188,14 +155,11 @@ trampCall(
188
155
  end
189
156
  } ; ___lambda.call(
190
157
  begin
191
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 27 );
192
158
  _not(
193
159
  begin
194
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 27 );
195
160
  _integer_QUMARK(
196
161
  begin
197
162
  trampCall(_k)
198
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:35"] + __e.backtrace ) ; raise __e
199
163
  end
200
164
  )
201
165
  end
@@ -210,7 +174,6 @@ trampCall(
210
174
  _write_MIMARKto_MIMARKstring(
211
175
  begin
212
176
  trampCall(_k)
213
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:35"] + __e.backtrace ) ; raise __e
214
177
  end
215
178
  )
216
179
  rescue => __e
@@ -225,50 +188,37 @@ trampCall(
225
188
  Proc.new { |_i,_lis,_r|
226
189
  if (
227
190
  begin
228
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 32 );
229
191
  __EQMARK(
230
192
  begin
231
193
  trampCall(_i)
232
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:38"] + __e.backtrace ) ; raise __e
233
194
  end ,
234
195
  begin
235
196
  trampCall(_k)
236
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:35"] + __e.backtrace ) ; raise __e
237
197
  end
238
198
  )
239
199
  end
240
200
  ) then
241
201
  begin
242
202
  begin
243
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 34 );
244
203
  delayCall( '_values', 'values',
245
204
  begin
246
- if @global_lisp_binding.has_key?('_values') then
247
205
  trampCall(@_values)
248
- else raise NameError.new( "Error: undefined variable _values", "_values" ) end
249
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:34"] + __e.backtrace ) ; raise __e
250
206
  end ,
251
207
  [
252
208
  begin
253
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 36 );
254
209
  trampCall( self._reverse_EXMARK_METHOD( 'reverse!',
255
210
  begin
256
- if @global_lisp_binding.has_key?('_reverse_EXMARK') then
257
211
  trampCall(@_reverse_EXMARK)
258
- else raise NameError.new( "Error: undefined variable _reverse_EXMARK", "_reverse_EXMARK" ) end
259
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:36"] + __e.backtrace ) ; raise __e
260
212
  end ,
261
213
  [
262
214
  begin
263
215
  trampCall(_r)
264
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:38"] + __e.backtrace ) ; raise __e
265
216
  end
266
217
  ]
267
218
  ))
268
219
  end ,
269
220
  begin
270
221
  trampCall(_lis)
271
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:38"] + __e.backtrace ) ; raise __e
272
222
  end
273
223
  ]
274
224
  )
@@ -277,85 +227,61 @@ trampCall(
277
227
  else
278
228
  if (
279
229
  begin
280
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 33 );
281
230
  _null_QUMARK(
282
231
  begin
283
232
  trampCall(_lis)
284
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:38"] + __e.backtrace ) ; raise __e
285
233
  end
286
234
  )
287
235
  end
288
236
  ) then
289
237
  begin
290
238
  begin
291
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 34 );
292
239
  delayCall( '_values', 'values',
293
240
  begin
294
- if @global_lisp_binding.has_key?('_values') then
295
241
  trampCall(@_values)
296
- else raise NameError.new( "Error: undefined variable _values", "_values" ) end
297
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:34"] + __e.backtrace ) ; raise __e
298
242
  end ,
299
243
  [
300
244
  if (
301
245
  begin
302
246
  trampCall(_fill_QUMARK)
303
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:34"] + __e.backtrace ) ; raise __e
304
247
  end
305
248
  ) then
306
249
  begin
307
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 35 );
308
250
  trampCall( self._append_EXMARK_METHOD( 'append!',
309
251
  begin
310
- if @global_lisp_binding.has_key?('_append_EXMARK') then
311
252
  trampCall(@_append_EXMARK)
312
- else raise NameError.new( "Error: undefined variable _append_EXMARK", "_append_EXMARK" ) end
313
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:35"] + __e.backtrace ) ; raise __e
314
253
  end ,
315
254
  [
316
255
  begin
317
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 36 );
318
256
  trampCall( self._reverse_EXMARK_METHOD( 'reverse!',
319
257
  begin
320
- if @global_lisp_binding.has_key?('_reverse_EXMARK') then
321
258
  trampCall(@_reverse_EXMARK)
322
- else raise NameError.new( "Error: undefined variable _reverse_EXMARK", "_reverse_EXMARK" ) end
323
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:36"] + __e.backtrace ) ; raise __e
324
259
  end ,
325
260
  [
326
261
  begin
327
262
  trampCall(_r)
328
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:38"] + __e.backtrace ) ; raise __e
329
263
  end
330
264
  ]
331
265
  ))
332
266
  end ,
333
267
  begin
334
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 35 );
335
268
  trampCall( self._make_MIMARKlist_METHOD( 'make-list',
336
269
  begin
337
- if @global_lisp_binding.has_key?('_make_MIMARKlist') then
338
270
  trampCall(@_make_MIMARKlist)
339
- else raise NameError.new( "Error: undefined variable _make_MIMARKlist", "_make_MIMARKlist" ) end
340
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:35"] + __e.backtrace ) ; raise __e
341
271
  end ,
342
272
  [
343
273
  begin
344
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 35 );
345
274
  __MIMARK_ARGS2(
346
275
  begin
347
276
  trampCall(_k)
348
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:35"] + __e.backtrace ) ; raise __e
349
277
  end ,
350
278
  begin
351
279
  trampCall(_i)
352
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:38"] + __e.backtrace ) ; raise __e
353
280
  end
354
281
  )
355
282
  end ,
356
283
  begin
357
284
  trampCall(_filler)
358
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:35"] + __e.backtrace ) ; raise __e
359
285
  end
360
286
  ]
361
287
  ))
@@ -365,18 +291,13 @@ trampCall(
365
291
  end
366
292
  else
367
293
  begin
368
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 36 );
369
294
  trampCall( self._reverse_EXMARK_METHOD( 'reverse!',
370
295
  begin
371
- if @global_lisp_binding.has_key?('_reverse_EXMARK') then
372
296
  trampCall(@_reverse_EXMARK)
373
- else raise NameError.new( "Error: undefined variable _reverse_EXMARK", "_reverse_EXMARK" ) end
374
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:36"] + __e.backtrace ) ; raise __e
375
297
  end ,
376
298
  [
377
299
  begin
378
300
  trampCall(_r)
379
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:38"] + __e.backtrace ) ; raise __e
380
301
  end
381
302
  ]
382
303
  ))
@@ -384,7 +305,6 @@ trampCall(
384
305
  end ,
385
306
  begin
386
307
  trampCall(_lis)
387
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:38"] + __e.backtrace ) ; raise __e
388
308
  end
389
309
  ]
390
310
  )
@@ -396,47 +316,37 @@ trampCall(
396
316
  ) then
397
317
  begin
398
318
  begin
399
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 38 );
400
319
  delayCall( '_loop', 'loop',
401
320
  begin
402
321
  trampCall(_loop)
403
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:38"] + __e.backtrace ) ; raise __e
404
322
  end ,
405
323
  [
406
324
  begin
407
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 38 );
408
325
  __PLMARK_ARGS2(
409
326
  begin
410
327
  trampCall(_i)
411
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:38"] + __e.backtrace ) ; raise __e
412
328
  end ,
413
329
  1
414
330
  )
415
331
  end ,
416
332
  begin
417
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 38 );
418
333
  _cdr(
419
334
  begin
420
335
  trampCall(_lis)
421
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:38"] + __e.backtrace ) ; raise __e
422
336
  end
423
337
  )
424
338
  end ,
425
339
  begin
426
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 38 );
427
340
  _cons(
428
341
  begin
429
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 38 );
430
342
  _car(
431
343
  begin
432
344
  trampCall(_lis)
433
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:38"] + __e.backtrace ) ; raise __e
434
345
  end
435
346
  )
436
347
  end ,
437
348
  begin
438
349
  trampCall(_r)
439
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:38"] + __e.backtrace ) ; raise __e
440
350
  end
441
351
  )
442
352
  end
@@ -451,17 +361,14 @@ trampCall(
451
361
  end
452
362
  }
453
363
  begin
454
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 38 );
455
364
  delayCall( '_loop', 'loop',
456
365
  begin
457
366
  trampCall(_loop)
458
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:38"] + __e.backtrace ) ; raise __e
459
367
  end ,
460
368
  [
461
369
  0 ,
462
370
  begin
463
371
  trampCall(_lis)
464
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:38"] + __e.backtrace ) ; raise __e
465
372
  end ,
466
373
  Cell.new()
467
374
  ]
@@ -490,43 +397,29 @@ trampCall(
490
397
  trampCall(
491
398
  Proc.new { |_lis,_k,*__rest__| _args = __rest__[0] ;
492
399
  begin
493
- embedBacktraceInfo( "", 1 );
494
400
  delayCall( '_call_MIMARKwith_MIMARKvalues', 'call-with-values',
495
401
  begin
496
- if @global_lisp_binding.has_key?('_call_MIMARKwith_MIMARKvalues') then
497
402
  trampCall(@_call_MIMARKwith_MIMARKvalues)
498
- else raise NameError.new( "Error: undefined variable _call_MIMARKwith_MIMARKvalues", "_call_MIMARKwith_MIMARKvalues" ) end
499
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
500
403
  end ,
501
404
  [
502
405
  Proc.new { ||
503
406
  begin
504
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 41 );
505
407
  trampCall( self._apply_METHOD( 'apply',
506
408
  begin
507
- if @global_lisp_binding.has_key?('_apply') then
508
409
  trampCall(@_apply)
509
- else raise NameError.new( "Error: undefined variable _apply", "_apply" ) end
510
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:41"] + __e.backtrace ) ; raise __e
511
410
  end ,
512
411
  [
513
412
  begin
514
- if @global_lisp_binding.has_key?('_split_MIMARKat_ASMARK') then
515
413
  trampCall(@_split_MIMARKat_ASMARK)
516
- else raise NameError.new( "Error: undefined variable _split_MIMARKat_ASMARK", "_split_MIMARKat_ASMARK" ) end
517
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:41"] + __e.backtrace ) ; raise __e
518
414
  end ,
519
415
  begin
520
416
  trampCall(_lis)
521
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:41"] + __e.backtrace ) ; raise __e
522
417
  end ,
523
418
  begin
524
419
  trampCall(_k)
525
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:41"] + __e.backtrace ) ; raise __e
526
420
  end ,
527
421
  begin
528
422
  trampCall(_args)
529
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:41"] + __e.backtrace ) ; raise __e
530
423
  end
531
424
  ]
532
425
  ))
@@ -535,7 +428,6 @@ trampCall(
535
428
  Proc.new { |_h,_t|
536
429
  begin
537
430
  trampCall(_h)
538
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:41"] + __e.backtrace ) ; raise __e
539
431
  end
540
432
  }
541
433
  ]
@@ -560,12 +452,10 @@ trampCall(
560
452
  if (
561
453
  begin
562
454
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70255)
563
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
564
455
  end
565
456
  ) then
566
457
  begin
567
458
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70255)
568
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
569
459
  end
570
460
  else
571
461
  begin
@@ -573,30 +463,23 @@ trampCall(
573
463
  if (
574
464
  begin
575
465
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70256)
576
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
577
466
  end
578
467
  ) then
579
468
  begin
580
469
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70256)
581
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
582
470
  end
583
471
  else
584
472
  false
585
473
  end
586
474
  } ; ___lambda.call(
587
475
  begin
588
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 44 );
589
476
  trampCall( self._negative_QUMARK_METHOD( 'negative?',
590
477
  begin
591
- if @global_lisp_binding.has_key?('_negative_QUMARK') then
592
478
  trampCall(@_negative_QUMARK)
593
- else raise NameError.new( "Error: undefined variable _negative_QUMARK", "_negative_QUMARK" ) end
594
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:44"] + __e.backtrace ) ; raise __e
595
479
  end ,
596
480
  [
597
481
  begin
598
482
  trampCall(_k)
599
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:48"] + __e.backtrace ) ; raise __e
600
483
  end
601
484
  ]
602
485
  ))
@@ -606,14 +489,11 @@ trampCall(
606
489
  end
607
490
  } ; ___lambda.call(
608
491
  begin
609
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 44 );
610
492
  _not(
611
493
  begin
612
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 44 );
613
494
  _integer_QUMARK(
614
495
  begin
615
496
  trampCall(_k)
616
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:48"] + __e.backtrace ) ; raise __e
617
497
  end
618
498
  )
619
499
  end
@@ -628,7 +508,6 @@ trampCall(
628
508
  _write_MIMARKto_MIMARKstring(
629
509
  begin
630
510
  trampCall(_k)
631
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:48"] + __e.backtrace ) ; raise __e
632
511
  end
633
512
  )
634
513
  rescue => __e
@@ -643,15 +522,12 @@ trampCall(
643
522
  Proc.new { |_i,_lis|
644
523
  if (
645
524
  begin
646
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 48 );
647
525
  __EQMARK(
648
526
  begin
649
527
  trampCall(_i)
650
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:50"] + __e.backtrace ) ; raise __e
651
528
  end ,
652
529
  begin
653
530
  trampCall(_k)
654
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:48"] + __e.backtrace ) ; raise __e
655
531
  end
656
532
  )
657
533
  end
@@ -659,17 +535,14 @@ trampCall(
659
535
  begin
660
536
  begin
661
537
  trampCall(_lis)
662
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:50"] + __e.backtrace ) ; raise __e
663
538
  end
664
539
  end
665
540
  else
666
541
  if (
667
542
  begin
668
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 49 );
669
543
  _null_QUMARK(
670
544
  begin
671
545
  trampCall(_lis)
672
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:50"] + __e.backtrace ) ; raise __e
673
546
  end
674
547
  )
675
548
  end
@@ -683,29 +556,23 @@ trampCall(
683
556
  ) then
684
557
  begin
685
558
  begin
686
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 50 );
687
559
  delayCall( '_loop', 'loop',
688
560
  begin
689
561
  trampCall(_loop)
690
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:50"] + __e.backtrace ) ; raise __e
691
562
  end ,
692
563
  [
693
564
  begin
694
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 50 );
695
565
  __PLMARK_ARGS2(
696
566
  begin
697
567
  trampCall(_i)
698
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:50"] + __e.backtrace ) ; raise __e
699
568
  end ,
700
569
  1
701
570
  )
702
571
  end ,
703
572
  begin
704
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 50 );
705
573
  _cdr(
706
574
  begin
707
575
  trampCall(_lis)
708
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:50"] + __e.backtrace ) ; raise __e
709
576
  end
710
577
  )
711
578
  end
@@ -720,17 +587,14 @@ trampCall(
720
587
  end
721
588
  }
722
589
  begin
723
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 50 );
724
590
  delayCall( '_loop', 'loop',
725
591
  begin
726
592
  trampCall(_loop)
727
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:50"] + __e.backtrace ) ; raise __e
728
593
  end ,
729
594
  [
730
595
  0 ,
731
596
  begin
732
597
  trampCall(_lis)
733
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:50"] + __e.backtrace ) ; raise __e
734
598
  end
735
599
  ]
736
600
  )
@@ -756,15 +620,12 @@ trampCall(
756
620
  ___lambda = lambda { |_fill_QUMARK,_filler|
757
621
  if (
758
622
  begin
759
- embedBacktraceInfo( "", 1 );
760
623
  __LTMARK(
761
624
  0 ,
762
625
  begin
763
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 55 );
764
626
  _length(
765
627
  begin
766
628
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70260)
767
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
768
629
  end
769
630
  )
770
631
  end
@@ -777,19 +638,14 @@ trampCall(
777
638
  _fill_QUMARK =
778
639
  trampCall(
779
640
  begin
780
- embedBacktraceInfo( "", 1 );
781
641
  trampCall( self._nth_METHOD( 'nth',
782
642
  begin
783
- if @global_lisp_binding.has_key?('_nth') then
784
643
  trampCall(@_nth)
785
- else raise NameError.new( "Error: undefined variable _nth", "_nth" ) end
786
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
787
644
  end ,
788
645
  [
789
646
  0 ,
790
647
  begin
791
648
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70260)
792
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
793
649
  end
794
650
  ]
795
651
  ))
@@ -800,15 +656,12 @@ trampCall(
800
656
  end
801
657
  if (
802
658
  begin
803
- embedBacktraceInfo( "", 1 );
804
659
  __LTMARK(
805
660
  1 ,
806
661
  begin
807
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 55 );
808
662
  _length(
809
663
  begin
810
664
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70260)
811
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
812
665
  end
813
666
  )
814
667
  end
@@ -821,19 +674,14 @@ trampCall(
821
674
  _filler =
822
675
  trampCall(
823
676
  begin
824
- embedBacktraceInfo( "", 1 );
825
677
  trampCall( self._nth_METHOD( 'nth',
826
678
  begin
827
- if @global_lisp_binding.has_key?('_nth') then
828
679
  trampCall(@_nth)
829
- else raise NameError.new( "Error: undefined variable _nth", "_nth" ) end
830
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
831
680
  end ,
832
681
  [
833
682
  1 ,
834
683
  begin
835
684
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70260)
836
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
837
685
  end
838
686
  ]
839
687
  ))
@@ -848,12 +696,10 @@ trampCall(
848
696
  if (
849
697
  begin
850
698
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70261)
851
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
852
699
  end
853
700
  ) then
854
701
  begin
855
702
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70261)
856
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
857
703
  end
858
704
  else
859
705
  begin
@@ -861,30 +707,23 @@ trampCall(
861
707
  if (
862
708
  begin
863
709
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70262)
864
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
865
710
  end
866
711
  ) then
867
712
  begin
868
713
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70262)
869
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
870
714
  end
871
715
  else
872
716
  false
873
717
  end
874
718
  } ; ___lambda.call(
875
719
  begin
876
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 53 );
877
720
  trampCall( self._negative_QUMARK_METHOD( 'negative?',
878
721
  begin
879
- if @global_lisp_binding.has_key?('_negative_QUMARK') then
880
722
  trampCall(@_negative_QUMARK)
881
- else raise NameError.new( "Error: undefined variable _negative_QUMARK", "_negative_QUMARK" ) end
882
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:53"] + __e.backtrace ) ; raise __e
883
723
  end ,
884
724
  [
885
725
  begin
886
726
  trampCall(_k)
887
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:57"] + __e.backtrace ) ; raise __e
888
727
  end
889
728
  ]
890
729
  ))
@@ -894,14 +733,11 @@ trampCall(
894
733
  end
895
734
  } ; ___lambda.call(
896
735
  begin
897
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 53 );
898
736
  _not(
899
737
  begin
900
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 53 );
901
738
  _integer_QUMARK(
902
739
  begin
903
740
  trampCall(_k)
904
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:57"] + __e.backtrace ) ; raise __e
905
741
  end
906
742
  )
907
743
  end
@@ -916,7 +752,6 @@ trampCall(
916
752
  _write_MIMARKto_MIMARKstring(
917
753
  begin
918
754
  trampCall(_k)
919
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:57"] + __e.backtrace ) ; raise __e
920
755
  end
921
756
  )
922
757
  rescue => __e
@@ -929,44 +764,33 @@ trampCall(
929
764
  ___lambda = lambda { |_len|
930
765
  if (
931
766
  begin
932
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 56 );
933
767
  __LTMARK_EQMARK(
934
768
  begin
935
769
  trampCall(_k)
936
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:57"] + __e.backtrace ) ; raise __e
937
770
  end ,
938
771
  begin
939
772
  trampCall(_len)
940
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:57"] + __e.backtrace ) ; raise __e
941
773
  end
942
774
  )
943
775
  end
944
776
  ) then
945
777
  begin
946
778
  begin
947
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 56 );
948
779
  delayCall( '_drop', 'drop',
949
780
  begin
950
- if @global_lisp_binding.has_key?('_drop') then
951
781
  trampCall(@_drop)
952
- else raise NameError.new( "Error: undefined variable _drop", "_drop" ) end
953
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:56"] + __e.backtrace ) ; raise __e
954
782
  end ,
955
783
  [
956
784
  begin
957
785
  trampCall(_lis)
958
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:58"] + __e.backtrace ) ; raise __e
959
786
  end ,
960
787
  begin
961
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 57 );
962
788
  __MIMARK_ARGS2(
963
789
  begin
964
790
  trampCall(_len)
965
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:57"] + __e.backtrace ) ; raise __e
966
791
  end ,
967
792
  begin
968
793
  trampCall(_k)
969
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:57"] + __e.backtrace ) ; raise __e
970
794
  end
971
795
  )
972
796
  end
@@ -978,53 +802,39 @@ trampCall(
978
802
  if (
979
803
  begin
980
804
  trampCall(_fill_QUMARK)
981
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:57"] + __e.backtrace ) ; raise __e
982
805
  end
983
806
  ) then
984
807
  begin
985
808
  begin
986
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 57 );
987
809
  delayCall( '_append_EXMARK', 'append!',
988
810
  begin
989
- if @global_lisp_binding.has_key?('_append_EXMARK') then
990
811
  trampCall(@_append_EXMARK)
991
- else raise NameError.new( "Error: undefined variable _append_EXMARK", "_append_EXMARK" ) end
992
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:57"] + __e.backtrace ) ; raise __e
993
812
  end ,
994
813
  [
995
814
  begin
996
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 57 );
997
815
  trampCall( self._make_MIMARKlist_METHOD( 'make-list',
998
816
  begin
999
- if @global_lisp_binding.has_key?('_make_MIMARKlist') then
1000
817
  trampCall(@_make_MIMARKlist)
1001
- else raise NameError.new( "Error: undefined variable _make_MIMARKlist", "_make_MIMARKlist" ) end
1002
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:57"] + __e.backtrace ) ; raise __e
1003
818
  end ,
1004
819
  [
1005
820
  begin
1006
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 57 );
1007
821
  __MIMARK_ARGS2(
1008
822
  begin
1009
823
  trampCall(_k)
1010
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:57"] + __e.backtrace ) ; raise __e
1011
824
  end ,
1012
825
  begin
1013
826
  trampCall(_len)
1014
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:57"] + __e.backtrace ) ; raise __e
1015
827
  end
1016
828
  )
1017
829
  end ,
1018
830
  begin
1019
831
  trampCall(_filler)
1020
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:57"] + __e.backtrace ) ; raise __e
1021
832
  end
1022
833
  ]
1023
834
  ))
1024
835
  end ,
1025
836
  begin
1026
837
  trampCall(_lis)
1027
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:58"] + __e.backtrace ) ; raise __e
1028
838
  end
1029
839
  ]
1030
840
  )
@@ -1037,7 +847,6 @@ trampCall(
1037
847
  begin
1038
848
  begin
1039
849
  trampCall(_lis)
1040
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:58"] + __e.backtrace ) ; raise __e
1041
850
  end
1042
851
  end
1043
852
  else
@@ -1047,11 +856,9 @@ trampCall(
1047
856
  end
1048
857
  } ; ___lambda.call(
1049
858
  begin
1050
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 55 );
1051
859
  _length(
1052
860
  begin
1053
861
  trampCall(_lis)
1054
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:58"] + __e.backtrace ) ; raise __e
1055
862
  end
1056
863
  )
1057
864
  end
@@ -1081,12 +888,10 @@ trampCall(
1081
888
  if (
1082
889
  begin
1083
890
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70266)
1084
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1085
891
  end
1086
892
  ) then
1087
893
  begin
1088
894
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70266)
1089
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1090
895
  end
1091
896
  else
1092
897
  begin
@@ -1094,30 +899,23 @@ trampCall(
1094
899
  if (
1095
900
  begin
1096
901
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70267)
1097
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1098
902
  end
1099
903
  ) then
1100
904
  begin
1101
905
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70267)
1102
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1103
906
  end
1104
907
  else
1105
908
  false
1106
909
  end
1107
910
  } ; ___lambda.call(
1108
911
  begin
1109
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 61 );
1110
912
  trampCall( self._negative_QUMARK_METHOD( 'negative?',
1111
913
  begin
1112
- if @global_lisp_binding.has_key?('_negative_QUMARK') then
1113
914
  trampCall(@_negative_QUMARK)
1114
- else raise NameError.new( "Error: undefined variable _negative_QUMARK", "_negative_QUMARK" ) end
1115
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:61"] + __e.backtrace ) ; raise __e
1116
915
  end ,
1117
916
  [
1118
917
  begin
1119
918
  trampCall(_k)
1120
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:64"] + __e.backtrace ) ; raise __e
1121
919
  end
1122
920
  ]
1123
921
  ))
@@ -1127,14 +925,11 @@ trampCall(
1127
925
  end
1128
926
  } ; ___lambda.call(
1129
927
  begin
1130
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 61 );
1131
928
  _not(
1132
929
  begin
1133
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 61 );
1134
930
  _integer_QUMARK(
1135
931
  begin
1136
932
  trampCall(_k)
1137
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:64"] + __e.backtrace ) ; raise __e
1138
933
  end
1139
934
  )
1140
935
  end
@@ -1149,7 +944,6 @@ trampCall(
1149
944
  _write_MIMARKto_MIMARKstring(
1150
945
  begin
1151
946
  trampCall(_k)
1152
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:64"] + __e.backtrace ) ; raise __e
1153
947
  end
1154
948
  )
1155
949
  rescue => __e
@@ -1162,43 +956,32 @@ trampCall(
1162
956
  ___lambda = lambda { |_len|
1163
957
  if (
1164
958
  begin
1165
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 64 );
1166
959
  __LTMARK_EQMARK(
1167
960
  begin
1168
961
  trampCall(_k)
1169
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:64"] + __e.backtrace ) ; raise __e
1170
962
  end ,
1171
963
  begin
1172
964
  trampCall(_len)
1173
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:64"] + __e.backtrace ) ; raise __e
1174
965
  end
1175
966
  )
1176
967
  end
1177
968
  ) then
1178
969
  begin
1179
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 64 );
1180
970
  delayCall( '_take', 'take',
1181
971
  begin
1182
- if @global_lisp_binding.has_key?('_take') then
1183
972
  trampCall(@_take)
1184
- else raise NameError.new( "Error: undefined variable _take", "_take" ) end
1185
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:64"] + __e.backtrace ) ; raise __e
1186
973
  end ,
1187
974
  [
1188
975
  begin
1189
976
  trampCall(_lis)
1190
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:64"] + __e.backtrace ) ; raise __e
1191
977
  end ,
1192
978
  begin
1193
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 64 );
1194
979
  __MIMARK_ARGS2(
1195
980
  begin
1196
981
  trampCall(_len)
1197
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:64"] + __e.backtrace ) ; raise __e
1198
982
  end ,
1199
983
  begin
1200
984
  trampCall(_k)
1201
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:64"] + __e.backtrace ) ; raise __e
1202
985
  end
1203
986
  )
1204
987
  end
@@ -1210,11 +993,9 @@ trampCall(
1210
993
  end
1211
994
  } ; ___lambda.call(
1212
995
  begin
1213
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 63 );
1214
996
  _length(
1215
997
  begin
1216
998
  trampCall(_lis)
1217
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:64"] + __e.backtrace ) ; raise __e
1218
999
  end
1219
1000
  )
1220
1001
  end
@@ -1235,22 +1016,17 @@ trampCall(
1235
1016
  Proc.new { |_lis,_k,*__rest__| _args = __rest__[0] ;
1236
1017
  if (
1237
1018
  begin
1238
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 61 );
1239
1019
  _not(
1240
1020
  if (
1241
1021
  begin
1242
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 61 );
1243
1022
  _not(
1244
1023
  begin
1245
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 145 );
1246
1024
  _eq_QUMARK(
1247
1025
  false ,
1248
1026
  begin
1249
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 71 );
1250
1027
  _integer_QUMARK(
1251
1028
  begin
1252
1029
  trampCall(_k)
1253
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:77"] + __e.backtrace ) ; raise __e
1254
1030
  end
1255
1031
  )
1256
1032
  end
@@ -1260,18 +1036,13 @@ trampCall(
1260
1036
  end
1261
1037
  ) then
1262
1038
  begin
1263
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 71 );
1264
1039
  trampCall( self._positive_QUMARK_METHOD( 'positive?',
1265
1040
  begin
1266
- if @global_lisp_binding.has_key?('_positive_QUMARK') then
1267
1041
  trampCall(@_positive_QUMARK)
1268
- else raise NameError.new( "Error: undefined variable _positive_QUMARK", "_positive_QUMARK" ) end
1269
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:71"] + __e.backtrace ) ; raise __e
1270
1042
  end ,
1271
1043
  [
1272
1044
  begin
1273
1045
  trampCall(_k)
1274
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:77"] + __e.backtrace ) ; raise __e
1275
1046
  end
1276
1047
  ]
1277
1048
  ))
@@ -1288,7 +1059,6 @@ trampCall(
1288
1059
  _write_MIMARKto_MIMARKstring(
1289
1060
  begin
1290
1061
  trampCall(_k)
1291
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:77"] + __e.backtrace ) ; raise __e
1292
1062
  end
1293
1063
  )
1294
1064
  rescue => __e
@@ -1303,71 +1073,50 @@ trampCall(
1303
1073
  Proc.new { |_lis,_r|
1304
1074
  if (
1305
1075
  begin
1306
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 75 );
1307
1076
  _null_QUMARK(
1308
1077
  begin
1309
1078
  trampCall(_lis)
1310
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:77"] + __e.backtrace ) ; raise __e
1311
1079
  end
1312
1080
  )
1313
1081
  end
1314
1082
  ) then
1315
1083
  begin
1316
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 76 );
1317
1084
  delayCall( '_reverse_EXMARK', 'reverse!',
1318
1085
  begin
1319
- if @global_lisp_binding.has_key?('_reverse_EXMARK') then
1320
1086
  trampCall(@_reverse_EXMARK)
1321
- else raise NameError.new( "Error: undefined variable _reverse_EXMARK", "_reverse_EXMARK" ) end
1322
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:76"] + __e.backtrace ) ; raise __e
1323
1087
  end ,
1324
1088
  [
1325
1089
  begin
1326
1090
  trampCall(_r)
1327
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:78"] + __e.backtrace ) ; raise __e
1328
1091
  end
1329
1092
  ]
1330
1093
  )
1331
1094
  end
1332
1095
  else
1333
1096
  begin
1334
- embedBacktraceInfo( "", 1 );
1335
1097
  delayCall( '_call_MIMARKwith_MIMARKvalues', 'call-with-values',
1336
1098
  begin
1337
- if @global_lisp_binding.has_key?('_call_MIMARKwith_MIMARKvalues') then
1338
1099
  trampCall(@_call_MIMARKwith_MIMARKvalues)
1339
- else raise NameError.new( "Error: undefined variable _call_MIMARKwith_MIMARKvalues", "_call_MIMARKwith_MIMARKvalues" ) end
1340
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1341
1100
  end ,
1342
1101
  [
1343
1102
  Proc.new { ||
1344
1103
  begin
1345
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 77 );
1346
1104
  trampCall( self._apply_METHOD( 'apply',
1347
1105
  begin
1348
- if @global_lisp_binding.has_key?('_apply') then
1349
1106
  trampCall(@_apply)
1350
- else raise NameError.new( "Error: undefined variable _apply", "_apply" ) end
1351
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:77"] + __e.backtrace ) ; raise __e
1352
1107
  end ,
1353
1108
  [
1354
1109
  begin
1355
- if @global_lisp_binding.has_key?('_split_MIMARKat_ASMARK') then
1356
1110
  trampCall(@_split_MIMARKat_ASMARK)
1357
- else raise NameError.new( "Error: undefined variable _split_MIMARKat_ASMARK", "_split_MIMARKat_ASMARK" ) end
1358
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:77"] + __e.backtrace ) ; raise __e
1359
1111
  end ,
1360
1112
  begin
1361
1113
  trampCall(_lis)
1362
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:77"] + __e.backtrace ) ; raise __e
1363
1114
  end ,
1364
1115
  begin
1365
1116
  trampCall(_k)
1366
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:77"] + __e.backtrace ) ; raise __e
1367
1117
  end ,
1368
1118
  begin
1369
1119
  trampCall(_args)
1370
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:77"] + __e.backtrace ) ; raise __e
1371
1120
  end
1372
1121
  ]
1373
1122
  ))
@@ -1375,27 +1124,21 @@ trampCall(
1375
1124
  } ,
1376
1125
  Proc.new { |_h,_t|
1377
1126
  begin
1378
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 78 );
1379
1127
  trampCall( callProcedure( '_loop', 'loop',
1380
1128
  begin
1381
1129
  trampCall(_loop)
1382
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:78"] + __e.backtrace ) ; raise __e
1383
1130
  end ,
1384
1131
  [
1385
1132
  begin
1386
1133
  trampCall(_t)
1387
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:78"] + __e.backtrace ) ; raise __e
1388
1134
  end ,
1389
1135
  begin
1390
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 78 );
1391
1136
  _cons(
1392
1137
  begin
1393
1138
  trampCall(_h)
1394
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:78"] + __e.backtrace ) ; raise __e
1395
1139
  end ,
1396
1140
  begin
1397
1141
  trampCall(_r)
1398
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:78"] + __e.backtrace ) ; raise __e
1399
1142
  end
1400
1143
  )
1401
1144
  end
@@ -1409,16 +1152,13 @@ trampCall(
1409
1152
  end
1410
1153
  }
1411
1154
  begin
1412
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 78 );
1413
1155
  delayCall( '_loop', 'loop',
1414
1156
  begin
1415
1157
  trampCall(_loop)
1416
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:78"] + __e.backtrace ) ; raise __e
1417
1158
  end ,
1418
1159
  [
1419
1160
  begin
1420
1161
  trampCall(_lis)
1421
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:77"] + __e.backtrace ) ; raise __e
1422
1162
  end ,
1423
1163
  Cell.new()
1424
1164
  ]
@@ -1447,76 +1187,57 @@ trampCall(
1447
1187
  Proc.new { |_l,_r|
1448
1188
  if (
1449
1189
  begin
1450
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 89 );
1451
1190
  _null_QUMARK(
1452
1191
  begin
1453
1192
  trampCall(_l)
1454
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:88"] + __e.backtrace ) ; raise __e
1455
1193
  end
1456
1194
  )
1457
1195
  end
1458
1196
  ) then
1459
1197
  begin
1460
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 87 );
1461
1198
  delayCall( '_reverse_EXMARK', 'reverse!',
1462
1199
  begin
1463
- if @global_lisp_binding.has_key?('_reverse_EXMARK') then
1464
1200
  trampCall(@_reverse_EXMARK)
1465
- else raise NameError.new( "Error: undefined variable _reverse_EXMARK", "_reverse_EXMARK" ) end
1466
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:87"] + __e.backtrace ) ; raise __e
1467
1201
  end ,
1468
1202
  [
1469
1203
  begin
1470
1204
  trampCall(_r)
1471
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:88"] + __e.backtrace ) ; raise __e
1472
1205
  end
1473
1206
  ]
1474
1207
  )
1475
1208
  end
1476
1209
  else
1477
1210
  begin
1478
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
1479
1211
  delayCall( '_rec', 'rec',
1480
1212
  begin
1481
1213
  trampCall(_rec)
1482
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:91"] + __e.backtrace ) ; raise __e
1483
1214
  end ,
1484
1215
  [
1485
1216
  begin
1486
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
1487
1217
  _cdr(
1488
1218
  begin
1489
1219
  trampCall(_l)
1490
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:88"] + __e.backtrace ) ; raise __e
1491
1220
  end
1492
1221
  )
1493
1222
  end ,
1494
1223
  begin
1495
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 88 );
1496
1224
  trampCall( self._list_ASMARK_METHOD( 'list*',
1497
1225
  begin
1498
- if @global_lisp_binding.has_key?('_list_ASMARK') then
1499
1226
  trampCall(@_list_ASMARK)
1500
- else raise NameError.new( "Error: undefined variable _list_ASMARK", "_list_ASMARK" ) end
1501
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:88"] + __e.backtrace ) ; raise __e
1502
1227
  end ,
1503
1228
  [
1504
1229
  begin
1505
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
1506
1230
  _car(
1507
1231
  begin
1508
1232
  trampCall(_l)
1509
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:88"] + __e.backtrace ) ; raise __e
1510
1233
  end
1511
1234
  )
1512
1235
  end ,
1513
1236
  begin
1514
1237
  trampCall(_item)
1515
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:88"] + __e.backtrace ) ; raise __e
1516
1238
  end ,
1517
1239
  begin
1518
1240
  trampCall(_r)
1519
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:88"] + __e.backtrace ) ; raise __e
1520
1241
  end
1521
1242
  ]
1522
1243
  ))
@@ -1528,11 +1249,9 @@ trampCall(
1528
1249
  }
1529
1250
  if (
1530
1251
  begin
1531
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 89 );
1532
1252
  _null_QUMARK(
1533
1253
  begin
1534
1254
  trampCall(_lis)
1535
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:91"] + __e.backtrace ) ; raise __e
1536
1255
  end
1537
1256
  )
1538
1257
  end
@@ -1540,38 +1259,28 @@ trampCall(
1540
1259
  Cell.new()
1541
1260
  else
1542
1261
  begin
1543
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
1544
1262
  delayCall( '_rec', 'rec',
1545
1263
  begin
1546
1264
  trampCall(_rec)
1547
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:91"] + __e.backtrace ) ; raise __e
1548
1265
  end ,
1549
1266
  [
1550
1267
  begin
1551
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
1552
1268
  _cdr(
1553
1269
  begin
1554
1270
  trampCall(_lis)
1555
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:91"] + __e.backtrace ) ; raise __e
1556
1271
  end
1557
1272
  )
1558
1273
  end ,
1559
1274
  begin
1560
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
1561
1275
  trampCall( self._list_METHOD( 'list',
1562
1276
  begin
1563
- if @global_lisp_binding.has_key?('_list') then
1564
1277
  trampCall(@_list)
1565
- else raise NameError.new( "Error: undefined variable _list", "_list" ) end
1566
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:91"] + __e.backtrace ) ; raise __e
1567
1278
  end ,
1568
1279
  [
1569
1280
  begin
1570
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
1571
1281
  _car(
1572
1282
  begin
1573
1283
  trampCall(_lis)
1574
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:91"] + __e.backtrace ) ; raise __e
1575
1284
  end
1576
1285
  )
1577
1286
  end
@@ -1599,13 +1308,9 @@ trampCall(
1599
1308
  @_cond_MIMARKlist =
1600
1309
  trampCall(
1601
1310
  begin
1602
- embedBacktraceInfo( "", 1 );
1603
1311
  trampCall( self._er_MIMARKmacro_MIMARKtransformer_METHOD( 'er-macro-transformer',
1604
1312
  begin
1605
- if @global_lisp_binding.has_key?('_er_MIMARKmacro_MIMARKtransformer') then
1606
1313
  trampCall(@_er_MIMARKmacro_MIMARKtransformer)
1607
- else raise NameError.new( "Error: undefined variable _er_MIMARKmacro_MIMARKtransformer", "_er_MIMARKmacro_MIMARKtransformer" ) end
1608
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1609
1314
  end ,
1610
1315
  [
1611
1316
  Proc.new { |__expr__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70268,__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269,__compare__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70270|
@@ -1614,12 +1319,10 @@ trampCall(
1614
1319
  if (
1615
1320
  begin
1616
1321
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70314)
1617
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1618
1322
  end
1619
1323
  ) then
1620
1324
  begin
1621
1325
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70314)
1622
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1623
1326
  end
1624
1327
  else
1625
1328
  begin
@@ -1627,12 +1330,10 @@ trampCall(
1627
1330
  if (
1628
1331
  begin
1629
1332
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70315)
1630
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1631
1333
  end
1632
1334
  ) then
1633
1335
  begin
1634
1336
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70315)
1635
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1636
1337
  end
1637
1338
  else
1638
1339
  begin
@@ -1640,12 +1341,10 @@ trampCall(
1640
1341
  if (
1641
1342
  begin
1642
1343
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70316)
1643
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1644
1344
  end
1645
1345
  ) then
1646
1346
  begin
1647
1347
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70316)
1648
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1649
1348
  end
1650
1349
  else
1651
1350
  begin
@@ -1653,12 +1352,10 @@ trampCall(
1653
1352
  if (
1654
1353
  begin
1655
1354
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70317)
1656
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1657
1355
  end
1658
1356
  ) then
1659
1357
  begin
1660
1358
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70317)
1661
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1662
1359
  end
1663
1360
  else
1664
1361
  begin
@@ -1666,12 +1363,10 @@ trampCall(
1666
1363
  if (
1667
1364
  begin
1668
1365
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70318)
1669
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1670
1366
  end
1671
1367
  ) then
1672
1368
  begin
1673
1369
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70318)
1674
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1675
1370
  end
1676
1371
  else
1677
1372
  begin
@@ -1679,12 +1374,10 @@ trampCall(
1679
1374
  if (
1680
1375
  begin
1681
1376
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70319)
1682
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1683
1377
  end
1684
1378
  ) then
1685
1379
  begin
1686
1380
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70319)
1687
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1688
1381
  end
1689
1382
  else
1690
1383
  begin
@@ -1692,12 +1385,10 @@ trampCall(
1692
1385
  if (
1693
1386
  begin
1694
1387
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70320)
1695
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1696
1388
  end
1697
1389
  ) then
1698
1390
  begin
1699
1391
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70320)
1700
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1701
1392
  end
1702
1393
  else
1703
1394
  false
@@ -1707,13 +1398,9 @@ trampCall(
1707
1398
  "no expansion for" ' ' +
1708
1399
  _write_MIMARKto_MIMARKstring(
1709
1400
  begin
1710
- embedBacktraceInfo( "", 1 );
1711
1401
  trampCall( self._strip_MIMARKsyntactic_MIMARKclosures_METHOD( 'strip-syntactic-closures',
1712
1402
  begin
1713
- if @global_lisp_binding.has_key?('_strip_MIMARKsyntactic_MIMARKclosures') then
1714
1403
  trampCall(@_strip_MIMARKsyntactic_MIMARKclosures)
1715
- else raise NameError.new( "Error: undefined variable _strip_MIMARKsyntactic_MIMARKclosures", "_strip_MIMARKsyntactic_MIMARKclosures" ) end
1716
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1717
1404
  end ,
1718
1405
  [
1719
1406
  __expr__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70268
@@ -1733,14 +1420,11 @@ trampCall(
1733
1420
  ___lambda = lambda { |__v__34__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70309|
1734
1421
  if (
1735
1422
  begin
1736
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 61 );
1737
1423
  _not(
1738
1424
  begin
1739
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 145 );
1740
1425
  _eq_QUMARK(
1741
1426
  false ,
1742
1427
  begin
1743
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 143 );
1744
1428
  _pair_QUMARK(
1745
1429
  __v__34__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70309
1746
1430
  )
@@ -1754,14 +1438,11 @@ trampCall(
1754
1438
  ___lambda = lambda { |__v__35__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70310|
1755
1439
  if (
1756
1440
  begin
1757
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 61 );
1758
1441
  _not(
1759
1442
  begin
1760
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 145 );
1761
1443
  _eq_QUMARK(
1762
1444
  false ,
1763
1445
  begin
1764
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 143 );
1765
1446
  _pair_QUMARK(
1766
1447
  __v__35__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70310
1767
1448
  )
@@ -1784,14 +1465,11 @@ trampCall(
1784
1465
  begin
1785
1466
  ___lambda = lambda { |_rest|
1786
1467
  begin
1787
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
1788
1468
  _cons(
1789
1469
  begin
1790
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
1791
1470
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
1792
1471
  begin
1793
1472
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
1794
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
1795
1473
  end ,
1796
1474
  [
1797
1475
  :"let*"
@@ -1799,20 +1477,15 @@ trampCall(
1799
1477
  ))
1800
1478
  end ,
1801
1479
  begin
1802
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
1803
1480
  _cons(
1804
1481
  begin
1805
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
1806
1482
  _cons(
1807
1483
  begin
1808
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
1809
1484
  _cons(
1810
1485
  begin
1811
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
1812
1486
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
1813
1487
  begin
1814
1488
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
1815
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
1816
1489
  end ,
1817
1490
  [
1818
1491
  :"tmp"
@@ -1820,11 +1493,9 @@ trampCall(
1820
1493
  ))
1821
1494
  end ,
1822
1495
  begin
1823
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
1824
1496
  _cons(
1825
1497
  begin
1826
1498
  trampCall(_test)
1827
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:123"] + __e.backtrace ) ; raise __e
1828
1499
  end ,
1829
1500
  Cell.new()
1830
1501
  )
@@ -1832,17 +1503,13 @@ trampCall(
1832
1503
  )
1833
1504
  end ,
1834
1505
  begin
1835
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
1836
1506
  _cons(
1837
1507
  begin
1838
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
1839
1508
  _cons(
1840
1509
  begin
1841
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
1842
1510
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
1843
1511
  begin
1844
1512
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
1845
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
1846
1513
  end ,
1847
1514
  [
1848
1515
  :"r"
@@ -1850,17 +1517,13 @@ trampCall(
1850
1517
  ))
1851
1518
  end ,
1852
1519
  begin
1853
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
1854
1520
  _cons(
1855
1521
  begin
1856
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
1857
1522
  _cons(
1858
1523
  begin
1859
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
1860
1524
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
1861
1525
  begin
1862
1526
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
1863
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
1864
1527
  end ,
1865
1528
  [
1866
1529
  :"cond-list"
@@ -1869,7 +1532,6 @@ trampCall(
1869
1532
  end ,
1870
1533
  begin
1871
1534
  trampCall(_rest)
1872
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:124"] + __e.backtrace ) ; raise __e
1873
1535
  end
1874
1536
  )
1875
1537
  end ,
@@ -1884,17 +1546,13 @@ trampCall(
1884
1546
  )
1885
1547
  end ,
1886
1548
  begin
1887
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
1888
1549
  _cons(
1889
1550
  begin
1890
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
1891
1551
  _cons(
1892
1552
  begin
1893
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
1894
1553
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
1895
1554
  begin
1896
1555
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
1897
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
1898
1556
  end ,
1899
1557
  [
1900
1558
  :"if"
@@ -1902,14 +1560,11 @@ trampCall(
1902
1560
  ))
1903
1561
  end ,
1904
1562
  begin
1905
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
1906
1563
  _cons(
1907
1564
  begin
1908
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
1909
1565
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
1910
1566
  begin
1911
1567
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
1912
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
1913
1568
  end ,
1914
1569
  [
1915
1570
  :"tmp"
@@ -1917,17 +1572,13 @@ trampCall(
1917
1572
  ))
1918
1573
  end ,
1919
1574
  begin
1920
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
1921
1575
  _cons(
1922
1576
  begin
1923
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
1924
1577
  _cons(
1925
1578
  begin
1926
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
1927
1579
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
1928
1580
  begin
1929
1581
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
1930
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
1931
1582
  end ,
1932
1583
  [
1933
1584
  :"cons"
@@ -1935,17 +1586,13 @@ trampCall(
1935
1586
  ))
1936
1587
  end ,
1937
1588
  begin
1938
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
1939
1589
  _cons(
1940
1590
  begin
1941
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
1942
1591
  _cons(
1943
1592
  begin
1944
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
1945
1593
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
1946
1594
  begin
1947
1595
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
1948
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
1949
1596
  end ,
1950
1597
  [
1951
1598
  :"begin"
@@ -1954,19 +1601,15 @@ trampCall(
1954
1601
  end ,
1955
1602
  begin
1956
1603
  trampCall(_expr)
1957
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:125"] + __e.backtrace ) ; raise __e
1958
1604
  end
1959
1605
  )
1960
1606
  end ,
1961
1607
  begin
1962
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
1963
1608
  _cons(
1964
1609
  begin
1965
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
1966
1610
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
1967
1611
  begin
1968
1612
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
1969
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
1970
1613
  end ,
1971
1614
  [
1972
1615
  :"r"
@@ -1981,14 +1624,11 @@ trampCall(
1981
1624
  )
1982
1625
  end ,
1983
1626
  begin
1984
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
1985
1627
  _cons(
1986
1628
  begin
1987
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
1988
1629
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
1989
1630
  begin
1990
1631
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
1991
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
1992
1632
  end ,
1993
1633
  [
1994
1634
  :"r"
@@ -2017,7 +1657,6 @@ trampCall(
2017
1657
  end
2018
1658
  } ; ___lambda.call(
2019
1659
  begin
2020
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
2021
1660
  _cdr(
2022
1661
  __v__34__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70309
2023
1662
  )
@@ -2030,7 +1669,6 @@ trampCall(
2030
1669
  end
2031
1670
  } ; ___lambda.call(
2032
1671
  begin
2033
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
2034
1672
  _cdr(
2035
1673
  __v__35__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70310
2036
1674
  )
@@ -2043,7 +1681,6 @@ trampCall(
2043
1681
  end
2044
1682
  } ; ___lambda.call(
2045
1683
  begin
2046
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
2047
1684
  _car(
2048
1685
  __v__35__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70310
2049
1686
  )
@@ -2055,7 +1692,6 @@ trampCall(
2055
1692
  end
2056
1693
  } ; ___lambda.call(
2057
1694
  begin
2058
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
2059
1695
  _car(
2060
1696
  __v__34__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70309
2061
1697
  )
@@ -2067,7 +1703,6 @@ trampCall(
2067
1703
  end
2068
1704
  } ; ___lambda.call(
2069
1705
  begin
2070
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
2071
1706
  _cdr(
2072
1707
  __expr__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70268
2073
1708
  )
@@ -2082,14 +1717,11 @@ trampCall(
2082
1717
  ___lambda = lambda { |__v__27__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70302|
2083
1718
  if (
2084
1719
  begin
2085
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 61 );
2086
1720
  _not(
2087
1721
  begin
2088
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 145 );
2089
1722
  _eq_QUMARK(
2090
1723
  false ,
2091
1724
  begin
2092
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 143 );
2093
1725
  _pair_QUMARK(
2094
1726
  __v__27__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70302
2095
1727
  )
@@ -2103,14 +1735,11 @@ trampCall(
2103
1735
  ___lambda = lambda { |__v__28__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70303|
2104
1736
  if (
2105
1737
  begin
2106
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 61 );
2107
1738
  _not(
2108
1739
  begin
2109
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 145 );
2110
1740
  _eq_QUMARK(
2111
1741
  false ,
2112
1742
  begin
2113
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 143 );
2114
1743
  _pair_QUMARK(
2115
1744
  __v__28__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70303
2116
1745
  )
@@ -2128,14 +1757,11 @@ trampCall(
2128
1757
  ___lambda = lambda { |__v__30__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70305|
2129
1758
  if (
2130
1759
  begin
2131
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 61 );
2132
1760
  _not(
2133
1761
  begin
2134
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 145 );
2135
1762
  _eq_QUMARK(
2136
1763
  false ,
2137
1764
  begin
2138
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 143 );
2139
1765
  _pair_QUMARK(
2140
1766
  __v__30__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70305
2141
1767
  )
@@ -2149,18 +1775,14 @@ trampCall(
2149
1775
  ___lambda = lambda { |__v__31__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70306|
2150
1776
  if (
2151
1777
  begin
2152
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 61 );
2153
1778
  _not(
2154
1779
  begin
2155
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 145 );
2156
1780
  _eq_QUMARK(
2157
1781
  false ,
2158
1782
  begin
2159
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
2160
1783
  trampCall( callProcedure( '__compare__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70270', '_compare__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70270',
2161
1784
  begin
2162
1785
  trampCall(__compare__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70270)
2163
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
2164
1786
  end ,
2165
1787
  [
2166
1788
  __v__31__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70306 ,
@@ -2182,14 +1804,11 @@ trampCall(
2182
1804
  begin
2183
1805
  ___lambda = lambda { |_rest|
2184
1806
  begin
2185
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2186
1807
  _cons(
2187
1808
  begin
2188
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
2189
1809
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
2190
1810
  begin
2191
1811
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
2192
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
2193
1812
  end ,
2194
1813
  [
2195
1814
  :"let*"
@@ -2197,20 +1816,15 @@ trampCall(
2197
1816
  ))
2198
1817
  end ,
2199
1818
  begin
2200
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2201
1819
  _cons(
2202
1820
  begin
2203
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2204
1821
  _cons(
2205
1822
  begin
2206
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2207
1823
  _cons(
2208
1824
  begin
2209
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
2210
1825
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
2211
1826
  begin
2212
1827
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
2213
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
2214
1828
  end ,
2215
1829
  [
2216
1830
  :"tmp"
@@ -2218,11 +1832,9 @@ trampCall(
2218
1832
  ))
2219
1833
  end ,
2220
1834
  begin
2221
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2222
1835
  _cons(
2223
1836
  begin
2224
1837
  trampCall(_test)
2225
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:123"] + __e.backtrace ) ; raise __e
2226
1838
  end ,
2227
1839
  Cell.new()
2228
1840
  )
@@ -2230,17 +1842,13 @@ trampCall(
2230
1842
  )
2231
1843
  end ,
2232
1844
  begin
2233
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2234
1845
  _cons(
2235
1846
  begin
2236
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2237
1847
  _cons(
2238
1848
  begin
2239
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
2240
1849
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
2241
1850
  begin
2242
1851
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
2243
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
2244
1852
  end ,
2245
1853
  [
2246
1854
  :"r"
@@ -2248,17 +1856,13 @@ trampCall(
2248
1856
  ))
2249
1857
  end ,
2250
1858
  begin
2251
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2252
1859
  _cons(
2253
1860
  begin
2254
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2255
1861
  _cons(
2256
1862
  begin
2257
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
2258
1863
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
2259
1864
  begin
2260
1865
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
2261
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
2262
1866
  end ,
2263
1867
  [
2264
1868
  :"cond-list"
@@ -2267,7 +1871,6 @@ trampCall(
2267
1871
  end ,
2268
1872
  begin
2269
1873
  trampCall(_rest)
2270
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:124"] + __e.backtrace ) ; raise __e
2271
1874
  end
2272
1875
  )
2273
1876
  end ,
@@ -2282,17 +1885,13 @@ trampCall(
2282
1885
  )
2283
1886
  end ,
2284
1887
  begin
2285
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2286
1888
  _cons(
2287
1889
  begin
2288
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2289
1890
  _cons(
2290
1891
  begin
2291
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
2292
1892
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
2293
1893
  begin
2294
1894
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
2295
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
2296
1895
  end ,
2297
1896
  [
2298
1897
  :"if"
@@ -2300,14 +1899,11 @@ trampCall(
2300
1899
  ))
2301
1900
  end ,
2302
1901
  begin
2303
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2304
1902
  _cons(
2305
1903
  begin
2306
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
2307
1904
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
2308
1905
  begin
2309
1906
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
2310
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
2311
1907
  end ,
2312
1908
  [
2313
1909
  :"tmp"
@@ -2315,17 +1911,13 @@ trampCall(
2315
1911
  ))
2316
1912
  end ,
2317
1913
  begin
2318
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2319
1914
  _cons(
2320
1915
  begin
2321
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2322
1916
  _cons(
2323
1917
  begin
2324
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
2325
1918
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
2326
1919
  begin
2327
1920
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
2328
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
2329
1921
  end ,
2330
1922
  [
2331
1923
  :"append"
@@ -2333,17 +1925,13 @@ trampCall(
2333
1925
  ))
2334
1926
  end ,
2335
1927
  begin
2336
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2337
1928
  _cons(
2338
1929
  begin
2339
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2340
1930
  _cons(
2341
1931
  begin
2342
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
2343
1932
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
2344
1933
  begin
2345
1934
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
2346
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
2347
1935
  end ,
2348
1936
  [
2349
1937
  :"begin"
@@ -2352,19 +1940,15 @@ trampCall(
2352
1940
  end ,
2353
1941
  begin
2354
1942
  trampCall(_expr)
2355
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:125"] + __e.backtrace ) ; raise __e
2356
1943
  end
2357
1944
  )
2358
1945
  end ,
2359
1946
  begin
2360
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2361
1947
  _cons(
2362
1948
  begin
2363
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
2364
1949
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
2365
1950
  begin
2366
1951
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
2367
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
2368
1952
  end ,
2369
1953
  [
2370
1954
  :"r"
@@ -2379,14 +1963,11 @@ trampCall(
2379
1963
  )
2380
1964
  end ,
2381
1965
  begin
2382
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2383
1966
  _cons(
2384
1967
  begin
2385
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
2386
1968
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
2387
1969
  begin
2388
1970
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
2389
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
2390
1971
  end ,
2391
1972
  [
2392
1973
  :"r"
@@ -2415,7 +1996,6 @@ trampCall(
2415
1996
  end
2416
1997
  } ; ___lambda.call(
2417
1998
  begin
2418
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
2419
1999
  _cdr(
2420
2000
  __v__27__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70302
2421
2001
  )
@@ -2428,7 +2008,6 @@ trampCall(
2428
2008
  end
2429
2009
  } ; ___lambda.call(
2430
2010
  begin
2431
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
2432
2011
  _cdr(
2433
2012
  __v__30__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70305
2434
2013
  )
@@ -2440,7 +2019,6 @@ trampCall(
2440
2019
  end
2441
2020
  } ; ___lambda.call(
2442
2021
  begin
2443
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
2444
2022
  _car(
2445
2023
  __v__30__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70305
2446
2024
  )
@@ -2452,7 +2030,6 @@ trampCall(
2452
2030
  end
2453
2031
  } ; ___lambda.call(
2454
2032
  begin
2455
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
2456
2033
  _cdr(
2457
2034
  __v__28__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70303
2458
2035
  )
@@ -2465,7 +2042,6 @@ trampCall(
2465
2042
  end
2466
2043
  } ; ___lambda.call(
2467
2044
  begin
2468
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
2469
2045
  _car(
2470
2046
  __v__28__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70303
2471
2047
  )
@@ -2477,7 +2053,6 @@ trampCall(
2477
2053
  end
2478
2054
  } ; ___lambda.call(
2479
2055
  begin
2480
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
2481
2056
  _car(
2482
2057
  __v__27__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70302
2483
2058
  )
@@ -2489,7 +2064,6 @@ trampCall(
2489
2064
  end
2490
2065
  } ; ___lambda.call(
2491
2066
  begin
2492
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
2493
2067
  _cdr(
2494
2068
  __expr__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70268
2495
2069
  )
@@ -2504,14 +2078,11 @@ trampCall(
2504
2078
  ___lambda = lambda { |__v__16__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70291|
2505
2079
  if (
2506
2080
  begin
2507
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 61 );
2508
2081
  _not(
2509
2082
  begin
2510
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 145 );
2511
2083
  _eq_QUMARK(
2512
2084
  false ,
2513
2085
  begin
2514
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 143 );
2515
2086
  _pair_QUMARK(
2516
2087
  __v__16__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70291
2517
2088
  )
@@ -2525,14 +2096,11 @@ trampCall(
2525
2096
  ___lambda = lambda { |__v__17__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70292|
2526
2097
  if (
2527
2098
  begin
2528
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 61 );
2529
2099
  _not(
2530
2100
  begin
2531
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 145 );
2532
2101
  _eq_QUMARK(
2533
2102
  false ,
2534
2103
  begin
2535
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 143 );
2536
2104
  _pair_QUMARK(
2537
2105
  __v__17__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70292
2538
2106
  )
@@ -2550,14 +2118,11 @@ trampCall(
2550
2118
  ___lambda = lambda { |__v__19__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70294|
2551
2119
  if (
2552
2120
  begin
2553
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 61 );
2554
2121
  _not(
2555
2122
  begin
2556
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 145 );
2557
2123
  _eq_QUMARK(
2558
2124
  false ,
2559
2125
  begin
2560
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 143 );
2561
2126
  _pair_QUMARK(
2562
2127
  __v__19__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70294
2563
2128
  )
@@ -2571,18 +2136,14 @@ trampCall(
2571
2136
  ___lambda = lambda { |__v__20__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70295|
2572
2137
  if (
2573
2138
  begin
2574
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 61 );
2575
2139
  _not(
2576
2140
  begin
2577
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 145 );
2578
2141
  _eq_QUMARK(
2579
2142
  false ,
2580
2143
  begin
2581
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
2582
2144
  trampCall( callProcedure( '__compare__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70270', '_compare__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70270',
2583
2145
  begin
2584
2146
  trampCall(__compare__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70270)
2585
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
2586
2147
  end ,
2587
2148
  [
2588
2149
  __v__20__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70295 ,
@@ -2599,14 +2160,11 @@ trampCall(
2599
2160
  ___lambda = lambda { |__v__21__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70296|
2600
2161
  if (
2601
2162
  begin
2602
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 61 );
2603
2163
  _not(
2604
2164
  begin
2605
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 145 );
2606
2165
  _eq_QUMARK(
2607
2166
  false ,
2608
2167
  begin
2609
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 143 );
2610
2168
  _pair_QUMARK(
2611
2169
  __v__21__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70296
2612
2170
  )
@@ -2620,18 +2178,14 @@ trampCall(
2620
2178
  ___lambda = lambda { |__v__22__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70297|
2621
2179
  if (
2622
2180
  begin
2623
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 61 );
2624
2181
  _not(
2625
2182
  begin
2626
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 145 );
2627
2183
  _eq_QUMARK(
2628
2184
  false ,
2629
2185
  begin
2630
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
2631
2186
  trampCall( callProcedure( '__compare__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70270', '_compare__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70270',
2632
2187
  begin
2633
2188
  trampCall(__compare__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70270)
2634
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
2635
2189
  end ,
2636
2190
  [
2637
2191
  __v__22__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70297 ,
@@ -2648,14 +2202,11 @@ trampCall(
2648
2202
  ___lambda = lambda { |__v__23__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70298|
2649
2203
  if (
2650
2204
  begin
2651
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 61 );
2652
2205
  _not(
2653
2206
  begin
2654
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 145 );
2655
2207
  _eq_QUMARK(
2656
2208
  false ,
2657
2209
  begin
2658
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 143 );
2659
2210
  _pair_QUMARK(
2660
2211
  __v__23__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70298
2661
2212
  )
@@ -2673,14 +2224,11 @@ trampCall(
2673
2224
  ___lambda = lambda { |__v__25__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70300|
2674
2225
  if (
2675
2226
  begin
2676
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 61 );
2677
2227
  _not(
2678
2228
  begin
2679
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 145 );
2680
2229
  _eq_QUMARK(
2681
2230
  false ,
2682
2231
  begin
2683
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 89 );
2684
2232
  _null_QUMARK(
2685
2233
  __v__25__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70300
2686
2234
  )
@@ -2695,14 +2243,11 @@ trampCall(
2695
2243
  begin
2696
2244
  ___lambda = lambda { |_rest|
2697
2245
  begin
2698
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2699
2246
  _cons(
2700
2247
  begin
2701
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
2702
2248
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
2703
2249
  begin
2704
2250
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
2705
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
2706
2251
  end ,
2707
2252
  [
2708
2253
  :"let*"
@@ -2710,20 +2255,15 @@ trampCall(
2710
2255
  ))
2711
2256
  end ,
2712
2257
  begin
2713
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2714
2258
  _cons(
2715
2259
  begin
2716
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2717
2260
  _cons(
2718
2261
  begin
2719
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2720
2262
  _cons(
2721
2263
  begin
2722
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
2723
2264
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
2724
2265
  begin
2725
2266
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
2726
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
2727
2267
  end ,
2728
2268
  [
2729
2269
  :"tmp"
@@ -2731,11 +2271,9 @@ trampCall(
2731
2271
  ))
2732
2272
  end ,
2733
2273
  begin
2734
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2735
2274
  _cons(
2736
2275
  begin
2737
2276
  trampCall(_test)
2738
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:123"] + __e.backtrace ) ; raise __e
2739
2277
  end ,
2740
2278
  Cell.new()
2741
2279
  )
@@ -2743,17 +2281,13 @@ trampCall(
2743
2281
  )
2744
2282
  end ,
2745
2283
  begin
2746
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2747
2284
  _cons(
2748
2285
  begin
2749
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2750
2286
  _cons(
2751
2287
  begin
2752
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
2753
2288
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
2754
2289
  begin
2755
2290
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
2756
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
2757
2291
  end ,
2758
2292
  [
2759
2293
  :"r"
@@ -2761,17 +2295,13 @@ trampCall(
2761
2295
  ))
2762
2296
  end ,
2763
2297
  begin
2764
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2765
2298
  _cons(
2766
2299
  begin
2767
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2768
2300
  _cons(
2769
2301
  begin
2770
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
2771
2302
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
2772
2303
  begin
2773
2304
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
2774
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
2775
2305
  end ,
2776
2306
  [
2777
2307
  :"cond-list"
@@ -2780,7 +2310,6 @@ trampCall(
2780
2310
  end ,
2781
2311
  begin
2782
2312
  trampCall(_rest)
2783
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:124"] + __e.backtrace ) ; raise __e
2784
2313
  end
2785
2314
  )
2786
2315
  end ,
@@ -2795,17 +2324,13 @@ trampCall(
2795
2324
  )
2796
2325
  end ,
2797
2326
  begin
2798
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2799
2327
  _cons(
2800
2328
  begin
2801
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2802
2329
  _cons(
2803
2330
  begin
2804
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
2805
2331
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
2806
2332
  begin
2807
2333
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
2808
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
2809
2334
  end ,
2810
2335
  [
2811
2336
  :"if"
@@ -2813,14 +2338,11 @@ trampCall(
2813
2338
  ))
2814
2339
  end ,
2815
2340
  begin
2816
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2817
2341
  _cons(
2818
2342
  begin
2819
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
2820
2343
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
2821
2344
  begin
2822
2345
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
2823
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
2824
2346
  end ,
2825
2347
  [
2826
2348
  :"tmp"
@@ -2828,17 +2350,13 @@ trampCall(
2828
2350
  ))
2829
2351
  end ,
2830
2352
  begin
2831
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2832
2353
  _cons(
2833
2354
  begin
2834
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2835
2355
  _cons(
2836
2356
  begin
2837
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
2838
2357
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
2839
2358
  begin
2840
2359
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
2841
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
2842
2360
  end ,
2843
2361
  [
2844
2362
  :"append"
@@ -2846,24 +2364,18 @@ trampCall(
2846
2364
  ))
2847
2365
  end ,
2848
2366
  begin
2849
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2850
2367
  _cons(
2851
2368
  begin
2852
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2853
2369
  _cons(
2854
2370
  begin
2855
2371
  trampCall(_proc)
2856
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:117"] + __e.backtrace ) ; raise __e
2857
2372
  end ,
2858
2373
  begin
2859
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2860
2374
  _cons(
2861
2375
  begin
2862
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
2863
2376
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
2864
2377
  begin
2865
2378
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
2866
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
2867
2379
  end ,
2868
2380
  [
2869
2381
  :"tmp"
@@ -2876,14 +2388,11 @@ trampCall(
2876
2388
  )
2877
2389
  end ,
2878
2390
  begin
2879
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2880
2391
  _cons(
2881
2392
  begin
2882
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
2883
2393
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
2884
2394
  begin
2885
2395
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
2886
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
2887
2396
  end ,
2888
2397
  [
2889
2398
  :"r"
@@ -2898,14 +2407,11 @@ trampCall(
2898
2407
  )
2899
2408
  end ,
2900
2409
  begin
2901
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
2902
2410
  _cons(
2903
2411
  begin
2904
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
2905
2412
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
2906
2413
  begin
2907
2414
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
2908
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
2909
2415
  end ,
2910
2416
  [
2911
2417
  :"r"
@@ -2934,7 +2440,6 @@ trampCall(
2934
2440
  end
2935
2441
  } ; ___lambda.call(
2936
2442
  begin
2937
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
2938
2443
  _cdr(
2939
2444
  __v__16__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70291
2940
2445
  )
@@ -2946,7 +2451,6 @@ trampCall(
2946
2451
  end
2947
2452
  } ; ___lambda.call(
2948
2453
  begin
2949
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
2950
2454
  _cdr(
2951
2455
  __v__23__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70298
2952
2456
  )
@@ -2959,7 +2463,6 @@ trampCall(
2959
2463
  end
2960
2464
  } ; ___lambda.call(
2961
2465
  begin
2962
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
2963
2466
  _car(
2964
2467
  __v__23__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70298
2965
2468
  )
@@ -2971,7 +2474,6 @@ trampCall(
2971
2474
  end
2972
2475
  } ; ___lambda.call(
2973
2476
  begin
2974
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
2975
2477
  _cdr(
2976
2478
  __v__21__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70296
2977
2479
  )
@@ -2983,7 +2485,6 @@ trampCall(
2983
2485
  end
2984
2486
  } ; ___lambda.call(
2985
2487
  begin
2986
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
2987
2488
  _car(
2988
2489
  __v__21__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70296
2989
2490
  )
@@ -2995,7 +2496,6 @@ trampCall(
2995
2496
  end
2996
2497
  } ; ___lambda.call(
2997
2498
  begin
2998
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
2999
2499
  _cdr(
3000
2500
  __v__19__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70294
3001
2501
  )
@@ -3007,7 +2507,6 @@ trampCall(
3007
2507
  end
3008
2508
  } ; ___lambda.call(
3009
2509
  begin
3010
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
3011
2510
  _car(
3012
2511
  __v__19__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70294
3013
2512
  )
@@ -3019,7 +2518,6 @@ trampCall(
3019
2518
  end
3020
2519
  } ; ___lambda.call(
3021
2520
  begin
3022
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
3023
2521
  _cdr(
3024
2522
  __v__17__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70292
3025
2523
  )
@@ -3032,7 +2530,6 @@ trampCall(
3032
2530
  end
3033
2531
  } ; ___lambda.call(
3034
2532
  begin
3035
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
3036
2533
  _car(
3037
2534
  __v__17__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70292
3038
2535
  )
@@ -3044,7 +2541,6 @@ trampCall(
3044
2541
  end
3045
2542
  } ; ___lambda.call(
3046
2543
  begin
3047
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
3048
2544
  _car(
3049
2545
  __v__16__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70291
3050
2546
  )
@@ -3056,7 +2552,6 @@ trampCall(
3056
2552
  end
3057
2553
  } ; ___lambda.call(
3058
2554
  begin
3059
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
3060
2555
  _cdr(
3061
2556
  __expr__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70268
3062
2557
  )
@@ -3071,14 +2566,11 @@ trampCall(
3071
2566
  ___lambda = lambda { |__v__7__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70282|
3072
2567
  if (
3073
2568
  begin
3074
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 61 );
3075
2569
  _not(
3076
2570
  begin
3077
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 145 );
3078
2571
  _eq_QUMARK(
3079
2572
  false ,
3080
2573
  begin
3081
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 143 );
3082
2574
  _pair_QUMARK(
3083
2575
  __v__7__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70282
3084
2576
  )
@@ -3092,14 +2584,11 @@ trampCall(
3092
2584
  ___lambda = lambda { |__v__8__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70283|
3093
2585
  if (
3094
2586
  begin
3095
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 61 );
3096
2587
  _not(
3097
2588
  begin
3098
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 145 );
3099
2589
  _eq_QUMARK(
3100
2590
  false ,
3101
2591
  begin
3102
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 143 );
3103
2592
  _pair_QUMARK(
3104
2593
  __v__8__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70283
3105
2594
  )
@@ -3117,14 +2606,11 @@ trampCall(
3117
2606
  ___lambda = lambda { |__v__10__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70285|
3118
2607
  if (
3119
2608
  begin
3120
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 61 );
3121
2609
  _not(
3122
2610
  begin
3123
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 145 );
3124
2611
  _eq_QUMARK(
3125
2612
  false ,
3126
2613
  begin
3127
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 143 );
3128
2614
  _pair_QUMARK(
3129
2615
  __v__10__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70285
3130
2616
  )
@@ -3138,18 +2624,14 @@ trampCall(
3138
2624
  ___lambda = lambda { |__v__11__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70286|
3139
2625
  if (
3140
2626
  begin
3141
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 61 );
3142
2627
  _not(
3143
2628
  begin
3144
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 145 );
3145
2629
  _eq_QUMARK(
3146
2630
  false ,
3147
2631
  begin
3148
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
3149
2632
  trampCall( callProcedure( '__compare__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70270', '_compare__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70270',
3150
2633
  begin
3151
2634
  trampCall(__compare__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70270)
3152
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
3153
2635
  end ,
3154
2636
  [
3155
2637
  __v__11__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70286 ,
@@ -3166,14 +2648,11 @@ trampCall(
3166
2648
  ___lambda = lambda { |__v__12__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70287|
3167
2649
  if (
3168
2650
  begin
3169
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 61 );
3170
2651
  _not(
3171
2652
  begin
3172
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 145 );
3173
2653
  _eq_QUMARK(
3174
2654
  false ,
3175
2655
  begin
3176
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 143 );
3177
2656
  _pair_QUMARK(
3178
2657
  __v__12__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70287
3179
2658
  )
@@ -3191,14 +2670,11 @@ trampCall(
3191
2670
  ___lambda = lambda { |__v__14__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70289|
3192
2671
  if (
3193
2672
  begin
3194
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 61 );
3195
2673
  _not(
3196
2674
  begin
3197
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 145 );
3198
2675
  _eq_QUMARK(
3199
2676
  false ,
3200
2677
  begin
3201
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 89 );
3202
2678
  _null_QUMARK(
3203
2679
  __v__14__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70289
3204
2680
  )
@@ -3213,14 +2689,11 @@ trampCall(
3213
2689
  begin
3214
2690
  ___lambda = lambda { |_rest|
3215
2691
  begin
3216
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3217
2692
  _cons(
3218
2693
  begin
3219
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
3220
2694
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
3221
2695
  begin
3222
2696
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
3223
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
3224
2697
  end ,
3225
2698
  [
3226
2699
  :"let*"
@@ -3228,20 +2701,15 @@ trampCall(
3228
2701
  ))
3229
2702
  end ,
3230
2703
  begin
3231
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3232
2704
  _cons(
3233
2705
  begin
3234
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3235
2706
  _cons(
3236
2707
  begin
3237
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3238
2708
  _cons(
3239
2709
  begin
3240
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
3241
2710
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
3242
2711
  begin
3243
2712
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
3244
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
3245
2713
  end ,
3246
2714
  [
3247
2715
  :"tmp"
@@ -3249,11 +2717,9 @@ trampCall(
3249
2717
  ))
3250
2718
  end ,
3251
2719
  begin
3252
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3253
2720
  _cons(
3254
2721
  begin
3255
2722
  trampCall(_test)
3256
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:123"] + __e.backtrace ) ; raise __e
3257
2723
  end ,
3258
2724
  Cell.new()
3259
2725
  )
@@ -3261,17 +2727,13 @@ trampCall(
3261
2727
  )
3262
2728
  end ,
3263
2729
  begin
3264
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3265
2730
  _cons(
3266
2731
  begin
3267
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3268
2732
  _cons(
3269
2733
  begin
3270
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
3271
2734
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
3272
2735
  begin
3273
2736
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
3274
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
3275
2737
  end ,
3276
2738
  [
3277
2739
  :"r"
@@ -3279,17 +2741,13 @@ trampCall(
3279
2741
  ))
3280
2742
  end ,
3281
2743
  begin
3282
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3283
2744
  _cons(
3284
2745
  begin
3285
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3286
2746
  _cons(
3287
2747
  begin
3288
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
3289
2748
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
3290
2749
  begin
3291
2750
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
3292
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
3293
2751
  end ,
3294
2752
  [
3295
2753
  :"cond-list"
@@ -3298,7 +2756,6 @@ trampCall(
3298
2756
  end ,
3299
2757
  begin
3300
2758
  trampCall(_rest)
3301
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:124"] + __e.backtrace ) ; raise __e
3302
2759
  end
3303
2760
  )
3304
2761
  end ,
@@ -3313,17 +2770,13 @@ trampCall(
3313
2770
  )
3314
2771
  end ,
3315
2772
  begin
3316
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3317
2773
  _cons(
3318
2774
  begin
3319
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3320
2775
  _cons(
3321
2776
  begin
3322
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
3323
2777
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
3324
2778
  begin
3325
2779
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
3326
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
3327
2780
  end ,
3328
2781
  [
3329
2782
  :"if"
@@ -3331,14 +2784,11 @@ trampCall(
3331
2784
  ))
3332
2785
  end ,
3333
2786
  begin
3334
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3335
2787
  _cons(
3336
2788
  begin
3337
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
3338
2789
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
3339
2790
  begin
3340
2791
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
3341
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
3342
2792
  end ,
3343
2793
  [
3344
2794
  :"tmp"
@@ -3346,17 +2796,13 @@ trampCall(
3346
2796
  ))
3347
2797
  end ,
3348
2798
  begin
3349
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3350
2799
  _cons(
3351
2800
  begin
3352
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3353
2801
  _cons(
3354
2802
  begin
3355
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
3356
2803
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
3357
2804
  begin
3358
2805
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
3359
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
3360
2806
  end ,
3361
2807
  [
3362
2808
  :"cons"
@@ -3364,24 +2810,18 @@ trampCall(
3364
2810
  ))
3365
2811
  end ,
3366
2812
  begin
3367
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3368
2813
  _cons(
3369
2814
  begin
3370
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3371
2815
  _cons(
3372
2816
  begin
3373
2817
  trampCall(_proc)
3374
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:117"] + __e.backtrace ) ; raise __e
3375
2818
  end ,
3376
2819
  begin
3377
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3378
2820
  _cons(
3379
2821
  begin
3380
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
3381
2822
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
3382
2823
  begin
3383
2824
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
3384
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
3385
2825
  end ,
3386
2826
  [
3387
2827
  :"tmp"
@@ -3394,14 +2834,11 @@ trampCall(
3394
2834
  )
3395
2835
  end ,
3396
2836
  begin
3397
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3398
2837
  _cons(
3399
2838
  begin
3400
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
3401
2839
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
3402
2840
  begin
3403
2841
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
3404
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
3405
2842
  end ,
3406
2843
  [
3407
2844
  :"r"
@@ -3416,14 +2853,11 @@ trampCall(
3416
2853
  )
3417
2854
  end ,
3418
2855
  begin
3419
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3420
2856
  _cons(
3421
2857
  begin
3422
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
3423
2858
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
3424
2859
  begin
3425
2860
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
3426
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
3427
2861
  end ,
3428
2862
  [
3429
2863
  :"r"
@@ -3452,7 +2886,6 @@ trampCall(
3452
2886
  end
3453
2887
  } ; ___lambda.call(
3454
2888
  begin
3455
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
3456
2889
  _cdr(
3457
2890
  __v__7__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70282
3458
2891
  )
@@ -3464,7 +2897,6 @@ trampCall(
3464
2897
  end
3465
2898
  } ; ___lambda.call(
3466
2899
  begin
3467
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
3468
2900
  _cdr(
3469
2901
  __v__12__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70287
3470
2902
  )
@@ -3477,7 +2909,6 @@ trampCall(
3477
2909
  end
3478
2910
  } ; ___lambda.call(
3479
2911
  begin
3480
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
3481
2912
  _car(
3482
2913
  __v__12__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70287
3483
2914
  )
@@ -3489,7 +2920,6 @@ trampCall(
3489
2920
  end
3490
2921
  } ; ___lambda.call(
3491
2922
  begin
3492
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
3493
2923
  _cdr(
3494
2924
  __v__10__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70285
3495
2925
  )
@@ -3501,7 +2931,6 @@ trampCall(
3501
2931
  end
3502
2932
  } ; ___lambda.call(
3503
2933
  begin
3504
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
3505
2934
  _car(
3506
2935
  __v__10__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70285
3507
2936
  )
@@ -3513,7 +2942,6 @@ trampCall(
3513
2942
  end
3514
2943
  } ; ___lambda.call(
3515
2944
  begin
3516
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
3517
2945
  _cdr(
3518
2946
  __v__8__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70283
3519
2947
  )
@@ -3526,7 +2954,6 @@ trampCall(
3526
2954
  end
3527
2955
  } ; ___lambda.call(
3528
2956
  begin
3529
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
3530
2957
  _car(
3531
2958
  __v__8__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70283
3532
2959
  )
@@ -3538,7 +2965,6 @@ trampCall(
3538
2965
  end
3539
2966
  } ; ___lambda.call(
3540
2967
  begin
3541
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
3542
2968
  _car(
3543
2969
  __v__7__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70282
3544
2970
  )
@@ -3550,7 +2976,6 @@ trampCall(
3550
2976
  end
3551
2977
  } ; ___lambda.call(
3552
2978
  begin
3553
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
3554
2979
  _cdr(
3555
2980
  __expr__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70268
3556
2981
  )
@@ -3565,14 +2990,11 @@ trampCall(
3565
2990
  ___lambda = lambda { |__v__2__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70277|
3566
2991
  if (
3567
2992
  begin
3568
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 61 );
3569
2993
  _not(
3570
2994
  begin
3571
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 145 );
3572
2995
  _eq_QUMARK(
3573
2996
  false ,
3574
2997
  begin
3575
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 143 );
3576
2998
  _pair_QUMARK(
3577
2999
  __v__2__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70277
3578
3000
  )
@@ -3586,14 +3008,11 @@ trampCall(
3586
3008
  ___lambda = lambda { |__v__3__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70278|
3587
3009
  if (
3588
3010
  begin
3589
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 61 );
3590
3011
  _not(
3591
3012
  begin
3592
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 145 );
3593
3013
  _eq_QUMARK(
3594
3014
  false ,
3595
3015
  begin
3596
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 143 );
3597
3016
  _pair_QUMARK(
3598
3017
  __v__3__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70278
3599
3018
  )
@@ -3611,14 +3030,11 @@ trampCall(
3611
3030
  ___lambda = lambda { |__v__5__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70280|
3612
3031
  if (
3613
3032
  begin
3614
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 61 );
3615
3033
  _not(
3616
3034
  begin
3617
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 145 );
3618
3035
  _eq_QUMARK(
3619
3036
  false ,
3620
3037
  begin
3621
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 89 );
3622
3038
  _null_QUMARK(
3623
3039
  __v__5__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70280
3624
3040
  )
@@ -3633,14 +3049,11 @@ trampCall(
3633
3049
  begin
3634
3050
  ___lambda = lambda { |_rest|
3635
3051
  begin
3636
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3637
3052
  _cons(
3638
3053
  begin
3639
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
3640
3054
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
3641
3055
  begin
3642
3056
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
3643
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
3644
3057
  end ,
3645
3058
  [
3646
3059
  :"let*"
@@ -3648,20 +3061,15 @@ trampCall(
3648
3061
  ))
3649
3062
  end ,
3650
3063
  begin
3651
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3652
3064
  _cons(
3653
3065
  begin
3654
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3655
3066
  _cons(
3656
3067
  begin
3657
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3658
3068
  _cons(
3659
3069
  begin
3660
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
3661
3070
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
3662
3071
  begin
3663
3072
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
3664
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
3665
3073
  end ,
3666
3074
  [
3667
3075
  :"tmp"
@@ -3669,11 +3077,9 @@ trampCall(
3669
3077
  ))
3670
3078
  end ,
3671
3079
  begin
3672
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3673
3080
  _cons(
3674
3081
  begin
3675
3082
  trampCall(_test)
3676
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:123"] + __e.backtrace ) ; raise __e
3677
3083
  end ,
3678
3084
  Cell.new()
3679
3085
  )
@@ -3681,17 +3087,13 @@ trampCall(
3681
3087
  )
3682
3088
  end ,
3683
3089
  begin
3684
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3685
3090
  _cons(
3686
3091
  begin
3687
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3688
3092
  _cons(
3689
3093
  begin
3690
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
3691
3094
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
3692
3095
  begin
3693
3096
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
3694
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
3695
3097
  end ,
3696
3098
  [
3697
3099
  :"r"
@@ -3699,17 +3101,13 @@ trampCall(
3699
3101
  ))
3700
3102
  end ,
3701
3103
  begin
3702
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3703
3104
  _cons(
3704
3105
  begin
3705
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3706
3106
  _cons(
3707
3107
  begin
3708
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
3709
3108
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
3710
3109
  begin
3711
3110
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
3712
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
3713
3111
  end ,
3714
3112
  [
3715
3113
  :"cond-list"
@@ -3718,7 +3116,6 @@ trampCall(
3718
3116
  end ,
3719
3117
  begin
3720
3118
  trampCall(_rest)
3721
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:124"] + __e.backtrace ) ; raise __e
3722
3119
  end
3723
3120
  )
3724
3121
  end ,
@@ -3733,17 +3130,13 @@ trampCall(
3733
3130
  )
3734
3131
  end ,
3735
3132
  begin
3736
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3737
3133
  _cons(
3738
3134
  begin
3739
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3740
3135
  _cons(
3741
3136
  begin
3742
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
3743
3137
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
3744
3138
  begin
3745
3139
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
3746
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
3747
3140
  end ,
3748
3141
  [
3749
3142
  :"if"
@@ -3751,14 +3144,11 @@ trampCall(
3751
3144
  ))
3752
3145
  end ,
3753
3146
  begin
3754
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3755
3147
  _cons(
3756
3148
  begin
3757
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
3758
3149
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
3759
3150
  begin
3760
3151
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
3761
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
3762
3152
  end ,
3763
3153
  [
3764
3154
  :"tmp"
@@ -3766,17 +3156,13 @@ trampCall(
3766
3156
  ))
3767
3157
  end ,
3768
3158
  begin
3769
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3770
3159
  _cons(
3771
3160
  begin
3772
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3773
3161
  _cons(
3774
3162
  begin
3775
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
3776
3163
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
3777
3164
  begin
3778
3165
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
3779
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
3780
3166
  end ,
3781
3167
  [
3782
3168
  :"cons"
@@ -3784,14 +3170,11 @@ trampCall(
3784
3170
  ))
3785
3171
  end ,
3786
3172
  begin
3787
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3788
3173
  _cons(
3789
3174
  begin
3790
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
3791
3175
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
3792
3176
  begin
3793
3177
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
3794
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
3795
3178
  end ,
3796
3179
  [
3797
3180
  :"tmp"
@@ -3799,14 +3182,11 @@ trampCall(
3799
3182
  ))
3800
3183
  end ,
3801
3184
  begin
3802
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3803
3185
  _cons(
3804
3186
  begin
3805
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
3806
3187
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
3807
3188
  begin
3808
3189
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
3809
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
3810
3190
  end ,
3811
3191
  [
3812
3192
  :"r"
@@ -3821,14 +3201,11 @@ trampCall(
3821
3201
  )
3822
3202
  end ,
3823
3203
  begin
3824
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3825
3204
  _cons(
3826
3205
  begin
3827
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
3828
3206
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
3829
3207
  begin
3830
3208
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
3831
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
3832
3209
  end ,
3833
3210
  [
3834
3211
  :"r"
@@ -3857,7 +3234,6 @@ trampCall(
3857
3234
  end
3858
3235
  } ; ___lambda.call(
3859
3236
  begin
3860
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
3861
3237
  _cdr(
3862
3238
  __v__2__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70277
3863
3239
  )
@@ -3869,7 +3245,6 @@ trampCall(
3869
3245
  end
3870
3246
  } ; ___lambda.call(
3871
3247
  begin
3872
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
3873
3248
  _cdr(
3874
3249
  __v__3__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70278
3875
3250
  )
@@ -3882,7 +3257,6 @@ trampCall(
3882
3257
  end
3883
3258
  } ; ___lambda.call(
3884
3259
  begin
3885
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
3886
3260
  _car(
3887
3261
  __v__3__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70278
3888
3262
  )
@@ -3894,7 +3268,6 @@ trampCall(
3894
3268
  end
3895
3269
  } ; ___lambda.call(
3896
3270
  begin
3897
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
3898
3271
  _car(
3899
3272
  __v__2__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70277
3900
3273
  )
@@ -3906,7 +3279,6 @@ trampCall(
3906
3279
  end
3907
3280
  } ; ___lambda.call(
3908
3281
  begin
3909
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
3910
3282
  _cdr(
3911
3283
  __expr__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70268
3912
3284
  )
@@ -3921,14 +3293,11 @@ trampCall(
3921
3293
  ___lambda = lambda { |__v__1__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70276|
3922
3294
  if (
3923
3295
  begin
3924
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 61 );
3925
3296
  _not(
3926
3297
  begin
3927
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 145 );
3928
3298
  _eq_QUMARK(
3929
3299
  false ,
3930
3300
  begin
3931
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 89 );
3932
3301
  _null_QUMARK(
3933
3302
  __v__1__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70276
3934
3303
  )
@@ -3939,14 +3308,11 @@ trampCall(
3939
3308
  end
3940
3309
  ) then
3941
3310
  begin
3942
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3943
3311
  _cons(
3944
3312
  begin
3945
- embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
3946
3313
  trampCall( callProcedure( '__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269', '_rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269',
3947
3314
  begin
3948
3315
  trampCall(__rename__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70269)
3949
- rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
3950
3316
  end ,
3951
3317
  [
3952
3318
  :"quote"
@@ -3954,7 +3320,6 @@ trampCall(
3954
3320
  ))
3955
3321
  end ,
3956
3322
  begin
3957
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 125 );
3958
3323
  _cons(
3959
3324
  Cell.new() ,
3960
3325
  Cell.new()
@@ -3967,7 +3332,6 @@ trampCall(
3967
3332
  end
3968
3333
  } ; ___lambda.call(
3969
3334
  begin
3970
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 91 );
3971
3335
  _cdr(
3972
3336
  __expr__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70268
3973
3337
  )
@@ -3995,45 +3359,32 @@ trampCall(
3995
3359
  begin
3996
3360
  ___lambda = lambda { |_tb|
3997
3361
  begin
3998
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 135 );
3999
3362
  trampCall( self._for_MIMARKeach_METHOD( 'for-each',
4000
3363
  begin
4001
- if @global_lisp_binding.has_key?('_for_MIMARKeach') then
4002
3364
  trampCall(@_for_MIMARKeach)
4003
- else raise NameError.new( "Error: undefined variable _for_MIMARKeach", "_for_MIMARKeach" ) end
4004
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:135"] + __e.backtrace ) ; raise __e
4005
3365
  end ,
4006
3366
  [
4007
3367
  Proc.new { |_x|
4008
3368
  begin
4009
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 135 );
4010
3369
  trampCall( self._hash_MIMARKtable_MIMARKput_EXMARK_METHOD( 'hash-table-put!',
4011
3370
  begin
4012
- if @global_lisp_binding.has_key?('_hash_MIMARKtable_MIMARKput_EXMARK') then
4013
3371
  trampCall(@_hash_MIMARKtable_MIMARKput_EXMARK)
4014
- else raise NameError.new( "Error: undefined variable _hash_MIMARKtable_MIMARKput_EXMARK", "_hash_MIMARKtable_MIMARKput_EXMARK" ) end
4015
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:135"] + __e.backtrace ) ; raise __e
4016
3372
  end ,
4017
3373
  [
4018
3374
  begin
4019
3375
  trampCall(_tb)
4020
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:136"] + __e.backtrace ) ; raise __e
4021
3376
  end ,
4022
3377
  begin
4023
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 135 );
4024
3378
  _car(
4025
3379
  begin
4026
3380
  trampCall(_x)
4027
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:135"] + __e.backtrace ) ; raise __e
4028
3381
  end
4029
3382
  )
4030
3383
  end ,
4031
3384
  begin
4032
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 135 );
4033
3385
  _cdr(
4034
3386
  begin
4035
3387
  trampCall(_x)
4036
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:135"] + __e.backtrace ) ; raise __e
4037
3388
  end
4038
3389
  )
4039
3390
  end
@@ -4043,35 +3394,25 @@ trampCall(
4043
3394
  } ,
4044
3395
  begin
4045
3396
  trampCall(_a)
4046
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:135"] + __e.backtrace ) ; raise __e
4047
3397
  end
4048
3398
  ]
4049
3399
  ))
4050
3400
  end
4051
3401
  begin
4052
3402
  trampCall(_tb)
4053
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:136"] + __e.backtrace ) ; raise __e
4054
3403
  end
4055
3404
  } ; ___lambda.call(
4056
3405
  begin
4057
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 134 );
4058
3406
  trampCall( self._apply_METHOD( 'apply',
4059
3407
  begin
4060
- if @global_lisp_binding.has_key?('_apply') then
4061
3408
  trampCall(@_apply)
4062
- else raise NameError.new( "Error: undefined variable _apply", "_apply" ) end
4063
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:134"] + __e.backtrace ) ; raise __e
4064
3409
  end ,
4065
3410
  [
4066
3411
  begin
4067
- if @global_lisp_binding.has_key?('_make_MIMARKhash_MIMARKtable') then
4068
3412
  trampCall(@_make_MIMARKhash_MIMARKtable)
4069
- else raise NameError.new( "Error: undefined variable _make_MIMARKhash_MIMARKtable", "_make_MIMARKhash_MIMARKtable" ) end
4070
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:134"] + __e.backtrace ) ; raise __e
4071
3413
  end ,
4072
3414
  begin
4073
3415
  trampCall(_opt_MIMARKeq)
4074
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:134"] + __e.backtrace ) ; raise __e
4075
3416
  end
4076
3417
  ]
4077
3418
  ))
@@ -4092,24 +3433,16 @@ trampCall(
4092
3433
  trampCall(
4093
3434
  Proc.new { |_h|
4094
3435
  begin
4095
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 139 );
4096
3436
  delayCall( '_hash_MIMARKtable_MIMARKmap', 'hash-table-map',
4097
3437
  begin
4098
- if @global_lisp_binding.has_key?('_hash_MIMARKtable_MIMARKmap') then
4099
3438
  trampCall(@_hash_MIMARKtable_MIMARKmap)
4100
- else raise NameError.new( "Error: undefined variable _hash_MIMARKtable_MIMARKmap", "_hash_MIMARKtable_MIMARKmap" ) end
4101
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:139"] + __e.backtrace ) ; raise __e
4102
3439
  end ,
4103
3440
  [
4104
3441
  begin
4105
3442
  trampCall(_h)
4106
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:139"] + __e.backtrace ) ; raise __e
4107
3443
  end ,
4108
3444
  begin
4109
- if @global_lisp_binding.has_key?('_cons') then
4110
3445
  trampCall(@_cons)
4111
- else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
4112
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:139"] + __e.backtrace ) ; raise __e
4113
3446
  end
4114
3447
  ]
4115
3448
  )
@@ -4131,15 +3464,12 @@ trampCall(
4131
3464
  ___lambda = lambda { |_eq|
4132
3465
  if (
4133
3466
  begin
4134
- embedBacktraceInfo( "", 1 );
4135
3467
  __LTMARK(
4136
3468
  0 ,
4137
3469
  begin
4138
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 63 );
4139
3470
  _length(
4140
3471
  begin
4141
3472
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70321)
4142
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
4143
3473
  end
4144
3474
  )
4145
3475
  end
@@ -4152,19 +3482,14 @@ trampCall(
4152
3482
  _eq =
4153
3483
  trampCall(
4154
3484
  begin
4155
- embedBacktraceInfo( "", 1 );
4156
3485
  trampCall( self._nth_METHOD( 'nth',
4157
3486
  begin
4158
- if @global_lisp_binding.has_key?('_nth') then
4159
3487
  trampCall(@_nth)
4160
- else raise NameError.new( "Error: undefined variable _nth", "_nth" ) end
4161
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
4162
3488
  end ,
4163
3489
  [
4164
3490
  0 ,
4165
3491
  begin
4166
3492
  trampCall(___gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70321)
4167
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
4168
3493
  end
4169
3494
  ]
4170
3495
  ))
@@ -4174,30 +3499,22 @@ trampCall(
4174
3499
  end
4175
3500
  end
4176
3501
  begin
4177
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 143 );
4178
3502
  delayCall( '_find', 'find',
4179
3503
  begin
4180
- if @global_lisp_binding.has_key?('_find') then
4181
3504
  trampCall(@_find)
4182
- else raise NameError.new( "Error: undefined variable _find", "_find" ) end
4183
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:143"] + __e.backtrace ) ; raise __e
4184
3505
  end ,
4185
3506
  [
4186
3507
  Proc.new { |_elt|
4187
3508
  if (
4188
3509
  begin
4189
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 61 );
4190
3510
  _not(
4191
3511
  begin
4192
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 145 );
4193
3512
  _eq_QUMARK(
4194
3513
  false ,
4195
3514
  begin
4196
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 143 );
4197
3515
  _pair_QUMARK(
4198
3516
  begin
4199
3517
  trampCall(_elt)
4200
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:143"] + __e.backtrace ) ; raise __e
4201
3518
  end
4202
3519
  )
4203
3520
  end
@@ -4207,25 +3524,20 @@ trampCall(
4207
3524
  end
4208
3525
  ) then
4209
3526
  begin
4210
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 143 );
4211
3527
  trampCall( callProcedure( '_eq', 'eq',
4212
3528
  begin
4213
3529
  trampCall(_eq)
4214
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:143"] + __e.backtrace ) ; raise __e
4215
3530
  end ,
4216
3531
  [
4217
3532
  begin
4218
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 143 );
4219
3533
  _cdr(
4220
3534
  begin
4221
3535
  trampCall(_elt)
4222
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:143"] + __e.backtrace ) ; raise __e
4223
3536
  end
4224
3537
  )
4225
3538
  end ,
4226
3539
  begin
4227
3540
  trampCall(_key)
4228
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:143"] + __e.backtrace ) ; raise __e
4229
3541
  end
4230
3542
  ]
4231
3543
  ))
@@ -4236,17 +3548,13 @@ trampCall(
4236
3548
  } ,
4237
3549
  begin
4238
3550
  trampCall(_alist)
4239
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:143"] + __e.backtrace ) ; raise __e
4240
3551
  end
4241
3552
  ]
4242
3553
  )
4243
3554
  end
4244
3555
  } ; ___lambda.call(
4245
3556
  begin
4246
- if @global_lisp_binding.has_key?('_equal_QUMARK') then
4247
3557
  trampCall(@_equal_QUMARK)
4248
- else raise NameError.new( "Error: undefined variable _equal_QUMARK", "_equal_QUMARK" ) end
4249
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:142"] + __e.backtrace ) ; raise __e
4250
3558
  end
4251
3559
  )
4252
3560
  end
@@ -4266,13 +3574,9 @@ trampCall(
4266
3574
  ___lambda = lambda { |__tmp__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70324|
4267
3575
  Proc.new { |__tmp__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70322,__tmp__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70323|
4268
3576
  begin
4269
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 145 );
4270
3577
  delayCall( '_rassoc', 'rassoc',
4271
3578
  begin
4272
- if @global_lisp_binding.has_key?('_rassoc') then
4273
3579
  trampCall(@_rassoc)
4274
- else raise NameError.new( "Error: undefined variable _rassoc", "_rassoc" ) end
4275
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:145"] + __e.backtrace ) ; raise __e
4276
3580
  end ,
4277
3581
  [
4278
3582
  __tmp__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70322 ,
@@ -4284,10 +3588,7 @@ trampCall(
4284
3588
  }
4285
3589
  } ; ___lambda.call(
4286
3590
  begin
4287
- if @global_lisp_binding.has_key?('_eq_QUMARK') then
4288
3591
  trampCall(@_eq_QUMARK)
4289
- else raise NameError.new( "Error: undefined variable _eq_QUMARK", "_eq_QUMARK" ) end
4290
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:145"] + __e.backtrace ) ; raise __e
4291
3592
  end
4292
3593
  )
4293
3594
  end
@@ -4306,13 +3607,9 @@ trampCall(
4306
3607
  ___lambda = lambda { |__tmp__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70327|
4307
3608
  Proc.new { |__tmp__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70325,__tmp__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70326|
4308
3609
  begin
4309
- embedBacktraceInfo( "./lib/nendo/util/list.nnd", 146 );
4310
3610
  delayCall( '_rassoc', 'rassoc',
4311
3611
  begin
4312
- if @global_lisp_binding.has_key?('_rassoc') then
4313
3612
  trampCall(@_rassoc)
4314
- else raise NameError.new( "Error: undefined variable _rassoc", "_rassoc" ) end
4315
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:146"] + __e.backtrace ) ; raise __e
4316
3613
  end ,
4317
3614
  [
4318
3615
  __tmp__gensym__8ac8b7a738109fae1a89eee6598100ae9139175d_70325 ,
@@ -4324,10 +3621,7 @@ trampCall(
4324
3621
  }
4325
3622
  } ; ___lambda.call(
4326
3623
  begin
4327
- if @global_lisp_binding.has_key?('_eqv_QUMARK') then
4328
3624
  trampCall(@_eqv_QUMARK)
4329
- else raise NameError.new( "Error: undefined variable _eqv_QUMARK", "_eqv_QUMARK" ) end
4330
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/util/list.nnd:146"] + __e.backtrace ) ; raise __e
4331
3625
  end
4332
3626
  )
4333
3627
  end