nendo 0.6.0 → 0.6.1

Sign up to get free protection for your applications and to get access to all the features.
Files changed (19) hide show
  1. data/lib/init.nnd +18 -0
  2. data/lib/init.nndc +3458 -3078
  3. data/lib/nendo/experimental.nnd +23 -2
  4. data/lib/nendo/experimental.nndc +2122 -276
  5. data/lib/nendo/test.nndc +116 -4
  6. data/lib/rfc/json.nndc +6 -6
  7. data/lib/ruby/core.rb +1 -1
  8. data/lib/ruby/printer.rb +6 -0
  9. data/lib/ruby/types.rb +4 -1
  10. data/lib/srfi-1.nndc +147 -147
  11. data/lib/srfi-2.nndc +90 -90
  12. data/lib/srfi-26.nndc +251 -251
  13. data/lib/text/html-lite.nndc +23 -23
  14. data/lib/util/combinations.nndc +191 -191
  15. data/lib/util/list.nndc +294 -294
  16. data/lib/util/match.nndc +5551 -5551
  17. data/test/nendo_spec.rb +33 -0
  18. data/test/syntax_spec.rb +31 -7
  19. metadata +5 -5
data/lib/nendo/test.nndc CHANGED
@@ -59,13 +59,13 @@ trampCall(
59
59
  end
60
60
  } ; ___lambda.call(
61
61
  begin
62
- ___lambda = lambda { |___gensym__da296d116d489ba951dcd8991bd44f36a977a621_30112|
62
+ ___lambda = lambda { |___gensym__da296d116d489ba951dcd8991bd44f36a977a621_30170|
63
63
  if (
64
64
  begin
65
65
  embedBacktraceInfo( "./lib/nendo/test.nnd", 175 );
66
66
  _null_QUMARK(
67
67
  begin
68
- trampCall(___gensym__da296d116d489ba951dcd8991bd44f36a977a621_30112)
68
+ trampCall(___gensym__da296d116d489ba951dcd8991bd44f36a977a621_30170)
69
69
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
70
70
  end
71
71
  )
@@ -84,7 +84,7 @@ trampCall(
84
84
  end ,
85
85
  [
86
86
  begin
87
- trampCall(___gensym__da296d116d489ba951dcd8991bd44f36a977a621_30112)
87
+ trampCall(___gensym__da296d116d489ba951dcd8991bd44f36a977a621_30170)
88
88
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
89
89
  end
90
90
  ]
@@ -1384,7 +1384,119 @@ trampCall(
1384
1384
  end
1385
1385
  end
1386
1386
  else
1387
- Cell.new()
1387
+ if (
1388
+ true
1389
+ ) then
1390
+ begin
1391
+ begin
1392
+ embedBacktraceInfo( "./lib/nendo/experimental.nnd", 132 );
1393
+ trampCall( self.__PAMARKraise_METHOD( '%raise',
1394
+ begin
1395
+ if @global_lisp_binding.has_key?('__PAMARKraise') then
1396
+ trampCall(@__PAMARKraise)
1397
+ else raise NameError.new( "Error: undefined variable __PAMARKraise", "__PAMARKraise" ) end
1398
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:132"] + __e.backtrace ) ; raise __e
1399
+ end ,
1400
+ [
1401
+ begin
1402
+ trampCall(_exc)
1403
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:133"] + __e.backtrace ) ; raise __e
1404
+ end ,
1405
+ begin
1406
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 76 );
1407
+ trampCall( self._sprintf_METHOD( 'sprintf',
1408
+ begin
1409
+ if @global_lisp_binding.has_key?('_sprintf') then
1410
+ trampCall(@_sprintf)
1411
+ else raise NameError.new( "Error: undefined variable _sprintf", "_sprintf" ) end
1412
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:76"] + __e.backtrace ) ; raise __e
1413
+ end ,
1414
+ [
1415
+ "%s:%s raised %s" ,
1416
+ begin
1417
+ embedBacktraceInfo( "./lib/nendo/experimental.nnd", 130 );
1418
+ trampCall( self.__ASMARKFILE_ASMARK_METHOD( '*FILE*',
1419
+ begin
1420
+ if @global_lisp_binding.has_key?('__ASMARKFILE_ASMARK') then
1421
+ trampCall(@__ASMARKFILE_ASMARK)
1422
+ else raise NameError.new( "Error: undefined variable __ASMARKFILE_ASMARK", "__ASMARKFILE_ASMARK" ) end
1423
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:130"] + __e.backtrace ) ; raise __e
1424
+ end ,
1425
+ [
1426
+ ]
1427
+ ))
1428
+ end ,
1429
+ begin
1430
+ embedBacktraceInfo( "./lib/nendo/experimental.nnd", 130 );
1431
+ trampCall( self.__ASMARKLINE_ASMARK_METHOD( '*LINE*',
1432
+ begin
1433
+ if @global_lisp_binding.has_key?('__ASMARKLINE_ASMARK') then
1434
+ trampCall(@__ASMARKLINE_ASMARK)
1435
+ else raise NameError.new( "Error: undefined variable __ASMARKLINE_ASMARK", "__ASMARKLINE_ASMARK" ) end
1436
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:130"] + __e.backtrace ) ; raise __e
1437
+ end ,
1438
+ [
1439
+ ]
1440
+ ))
1441
+ end ,
1442
+ begin
1443
+ trampCall(_exc)
1444
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:133"] + __e.backtrace ) ; raise __e
1445
+ end
1446
+ ]
1447
+ ))
1448
+ end ,
1449
+ begin
1450
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 76 );
1451
+ trampCall( self._sprintf_METHOD( 'sprintf',
1452
+ begin
1453
+ if @global_lisp_binding.has_key?('_sprintf') then
1454
+ trampCall(@_sprintf)
1455
+ else raise NameError.new( "Error: undefined variable _sprintf", "_sprintf" ) end
1456
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:76"] + __e.backtrace ) ; raise __e
1457
+ end ,
1458
+ [
1459
+ "%s:%s raised %s" ,
1460
+ begin
1461
+ embedBacktraceInfo( "./lib/nendo/experimental.nnd", 130 );
1462
+ trampCall( self.__ASMARKFILE_ASMARK_METHOD( '*FILE*',
1463
+ begin
1464
+ if @global_lisp_binding.has_key?('__ASMARKFILE_ASMARK') then
1465
+ trampCall(@__ASMARKFILE_ASMARK)
1466
+ else raise NameError.new( "Error: undefined variable __ASMARKFILE_ASMARK", "__ASMARKFILE_ASMARK" ) end
1467
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:130"] + __e.backtrace ) ; raise __e
1468
+ end ,
1469
+ [
1470
+ ]
1471
+ ))
1472
+ end ,
1473
+ begin
1474
+ embedBacktraceInfo( "./lib/nendo/experimental.nnd", 130 );
1475
+ trampCall( self.__ASMARKLINE_ASMARK_METHOD( '*LINE*',
1476
+ begin
1477
+ if @global_lisp_binding.has_key?('__ASMARKLINE_ASMARK') then
1478
+ trampCall(@__ASMARKLINE_ASMARK)
1479
+ else raise NameError.new( "Error: undefined variable __ASMARKLINE_ASMARK", "__ASMARKLINE_ASMARK" ) end
1480
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:130"] + __e.backtrace ) ; raise __e
1481
+ end ,
1482
+ [
1483
+ ]
1484
+ ))
1485
+ end ,
1486
+ begin
1487
+ trampCall(_exc)
1488
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:133"] + __e.backtrace ) ; raise __e
1489
+ end
1490
+ ]
1491
+ ))
1492
+ end
1493
+ ]
1494
+ ))
1495
+ end
1496
+ end
1497
+ else
1498
+ Cell.new()
1499
+ end
1388
1500
  end
1389
1501
  end
1390
1502
  } ,
data/lib/rfc/json.nndc CHANGED
@@ -553,13 +553,13 @@ trampCall(
553
553
  end
554
554
  } ; ___lambda.call(
555
555
  begin
556
- ___lambda = lambda { |___gensym__6e1da08b054bbf0469585c6330e1b00b59b91d4c_90123|
556
+ ___lambda = lambda { |___gensym__6e1da08b054bbf0469585c6330e1b00b59b91d4c_90180|
557
557
  if (
558
558
  begin
559
559
  embedBacktraceInfo( "./lib/rfc/json.nnd", 62 );
560
560
  _null_QUMARK(
561
561
  begin
562
- trampCall(___gensym__6e1da08b054bbf0469585c6330e1b00b59b91d4c_90123)
562
+ trampCall(___gensym__6e1da08b054bbf0469585c6330e1b00b59b91d4c_90180)
563
563
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
564
564
  end
565
565
  )
@@ -581,7 +581,7 @@ trampCall(
581
581
  end ,
582
582
  [
583
583
  begin
584
- trampCall(___gensym__6e1da08b054bbf0469585c6330e1b00b59b91d4c_90123)
584
+ trampCall(___gensym__6e1da08b054bbf0469585c6330e1b00b59b91d4c_90180)
585
585
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
586
586
  end
587
587
  ]
@@ -671,13 +671,13 @@ trampCall(
671
671
  end
672
672
  } ; ___lambda.call(
673
673
  begin
674
- ___lambda = lambda { |___gensym__6e1da08b054bbf0469585c6330e1b00b59b91d4c_90124|
674
+ ___lambda = lambda { |___gensym__6e1da08b054bbf0469585c6330e1b00b59b91d4c_90181|
675
675
  if (
676
676
  begin
677
677
  embedBacktraceInfo( "./lib/rfc/json.nnd", 62 );
678
678
  _null_QUMARK(
679
679
  begin
680
- trampCall(___gensym__6e1da08b054bbf0469585c6330e1b00b59b91d4c_90124)
680
+ trampCall(___gensym__6e1da08b054bbf0469585c6330e1b00b59b91d4c_90181)
681
681
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
682
682
  end
683
683
  )
@@ -699,7 +699,7 @@ trampCall(
699
699
  end ,
700
700
  [
701
701
  begin
702
- trampCall(___gensym__6e1da08b054bbf0469585c6330e1b00b59b91d4c_90124)
702
+ trampCall(___gensym__6e1da08b054bbf0469585c6330e1b00b59b91d4c_90181)
703
703
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
704
704
  end
705
705
  ]
data/lib/ruby/core.rb CHANGED
@@ -42,7 +42,7 @@ module Nendo
42
42
  end
43
43
 
44
44
  def self.version
45
- "0.6.0" ##NENDO-VERSION
45
+ "0.6.1" ##NENDO-VERSION
46
46
  end
47
47
 
48
48
  attr_reader :evaluator
data/lib/ruby/printer.rb CHANGED
@@ -83,6 +83,12 @@ module Nendo
83
83
  sprintf( "#<SyntacticClosure[%s:%s]>", sexp.originalSymbol, sexp.renamedSymbol )
84
84
  when Regexp
85
85
  "#/" + sexp.source + "/" + (sexp.casefold? ? "i" : "")
86
+ when LispRegexp
87
+ if readable
88
+ sexp.to_readable
89
+ else
90
+ sexp.to_s
91
+ end
86
92
  when LispKeyword
87
93
  ":" + sexp.key.to_s
88
94
  when LispCoreSyntax
data/lib/ruby/types.rb CHANGED
@@ -179,7 +179,10 @@ module Nendo
179
179
  @ignoreCase = (str[0] == 'i')
180
180
  end
181
181
  def to_s
182
- sprintf( "|%s|", @exp ) + (@ignoreCase ? "i" : "")
182
+ sprintf( "/%s/", @exp ) + (@ignoreCase ? "i" : "")
183
+ end
184
+ def to_readable
185
+ sprintf( "#/%s/", @exp ) + (@ignoreCase ? "i" : "")
183
186
  end
184
187
  def escape
185
188
  @exp.gsub( /\\/, "\\\\\\\\" )
data/lib/srfi-1.nndc CHANGED
@@ -49,8 +49,8 @@ trampCall(
49
49
  begin
50
50
  ___lambda = lambda { |_elt|
51
51
  begin
52
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30201|
53
- ___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30201 =
52
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30258|
53
+ ___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30258 =
54
54
  Proc.new { |_i,_ans|
55
55
  if (
56
56
  begin
@@ -74,9 +74,9 @@ trampCall(
74
74
  begin
75
75
  begin
76
76
  embedBacktraceInfo( "", 1 );
77
- delayCall( '___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30201', '__gensym__d2f54e498a1042043dafdae0618b15c325a30372_30201',
77
+ delayCall( '___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30258', '__gensym__d2f54e498a1042043dafdae0618b15c325a30372_30258',
78
78
  begin
79
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30201)
79
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30258)
80
80
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
81
81
  end ,
82
82
  [
@@ -111,9 +111,9 @@ trampCall(
111
111
  }
112
112
  begin
113
113
  embedBacktraceInfo( "", 1 );
114
- delayCall( '___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30201', '__gensym__d2f54e498a1042043dafdae0618b15c325a30372_30201',
114
+ delayCall( '___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30258', '__gensym__d2f54e498a1042043dafdae0618b15c325a30372_30258',
115
115
  begin
116
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30201)
116
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30258)
117
117
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
118
118
  end ,
119
119
  [
@@ -232,8 +232,8 @@ trampCall(
232
232
  begin
233
233
  end
234
234
  begin
235
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30202|
236
- ___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30202 =
235
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30259|
236
+ ___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30259 =
237
237
  Proc.new { |_i,_ans|
238
238
  if (
239
239
  begin
@@ -257,9 +257,9 @@ trampCall(
257
257
  begin
258
258
  begin
259
259
  embedBacktraceInfo( "", 1 );
260
- delayCall( '___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30202', '__gensym__d2f54e498a1042043dafdae0618b15c325a30372_30202',
260
+ delayCall( '___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30259', '__gensym__d2f54e498a1042043dafdae0618b15c325a30372_30259',
261
261
  begin
262
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30202)
262
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30259)
263
263
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
264
264
  end ,
265
265
  [
@@ -305,9 +305,9 @@ trampCall(
305
305
  }
306
306
  begin
307
307
  embedBacktraceInfo( "", 1 );
308
- delayCall( '___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30202', '__gensym__d2f54e498a1042043dafdae0618b15c325a30372_30202',
308
+ delayCall( '___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30259', '__gensym__d2f54e498a1042043dafdae0618b15c325a30372_30259',
309
309
  begin
310
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30202)
310
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30259)
311
311
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
312
312
  end ,
313
313
  [
@@ -578,8 +578,8 @@ trampCall(
578
578
  begin
579
579
  ___lambda = lambda { |_last_MIMARKval|
580
580
  begin
581
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30203|
582
- ___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30203 =
581
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30260|
582
+ ___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30260 =
583
583
  Proc.new { |_count,_val,_ans|
584
584
  if (
585
585
  begin
@@ -603,9 +603,9 @@ trampCall(
603
603
  begin
604
604
  begin
605
605
  embedBacktraceInfo( "", 1 );
606
- delayCall( '___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30203', '__gensym__d2f54e498a1042043dafdae0618b15c325a30372_30203',
606
+ delayCall( '___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30260', '__gensym__d2f54e498a1042043dafdae0618b15c325a30372_30260',
607
607
  begin
608
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30203)
608
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30260)
609
609
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
610
610
  end ,
611
611
  [
@@ -653,9 +653,9 @@ trampCall(
653
653
  }
654
654
  begin
655
655
  embedBacktraceInfo( "", 1 );
656
- delayCall( '___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30203', '__gensym__d2f54e498a1042043dafdae0618b15c325a30372_30203',
656
+ delayCall( '___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30260', '__gensym__d2f54e498a1042043dafdae0618b15c325a30372_30260',
657
657
  begin
658
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30203)
658
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30260)
659
659
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
660
660
  end ,
661
661
  [
@@ -1320,28 +1320,28 @@ trampCall(
1320
1320
  begin
1321
1321
  ___lambda = lambda { |_x,_lag|
1322
1322
  begin
1323
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30204|
1323
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30261|
1324
1324
  if (
1325
1325
  begin
1326
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30204)
1326
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30261)
1327
1327
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1328
1328
  end
1329
1329
  ) then
1330
1330
  begin
1331
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30204)
1331
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30261)
1332
1332
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1333
1333
  end
1334
1334
  else
1335
1335
  begin
1336
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30205|
1336
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30262|
1337
1337
  if (
1338
1338
  begin
1339
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30205)
1339
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30262)
1340
1340
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1341
1341
  end
1342
1342
  ) then
1343
1343
  begin
1344
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30205)
1344
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30262)
1345
1345
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1346
1346
  end
1347
1347
  else
@@ -1615,28 +1615,28 @@ trampCall(
1615
1615
  trampCall(
1616
1616
  Proc.new { |__EQMARK,*__rest__| _lists = __rest__[0] ;
1617
1617
  begin
1618
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30209|
1618
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30266|
1619
1619
  if (
1620
1620
  begin
1621
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30209)
1621
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30266)
1622
1622
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1623
1623
  end
1624
1624
  ) then
1625
1625
  begin
1626
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30209)
1626
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30266)
1627
1627
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1628
1628
  end
1629
1629
  else
1630
1630
  begin
1631
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30210|
1631
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30267|
1632
1632
  if (
1633
1633
  begin
1634
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30210)
1634
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30267)
1635
1635
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1636
1636
  end
1637
1637
  ) then
1638
1638
  begin
1639
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30210)
1639
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30267)
1640
1640
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1641
1641
  end
1642
1642
  else
@@ -1648,28 +1648,28 @@ trampCall(
1648
1648
  _lp1 =
1649
1649
  Proc.new { |_list_MIMARKa,_others|
1650
1650
  begin
1651
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30211|
1651
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30268|
1652
1652
  if (
1653
1653
  begin
1654
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30211)
1654
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30268)
1655
1655
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1656
1656
  end
1657
1657
  ) then
1658
1658
  begin
1659
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30211)
1659
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30268)
1660
1660
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1661
1661
  end
1662
1662
  else
1663
1663
  begin
1664
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30212|
1664
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30269|
1665
1665
  if (
1666
1666
  begin
1667
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30212)
1667
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30269)
1668
1668
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1669
1669
  end
1670
1670
  ) then
1671
1671
  begin
1672
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30212)
1672
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30269)
1673
1673
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1674
1674
  end
1675
1675
  else
@@ -6804,13 +6804,13 @@ trampCall(
6804
6804
  rescue => __e ; __e.set_backtrace( ["./lib/srfi-1.nnd:630"] + __e.backtrace ) ; raise __e
6805
6805
  end ,
6806
6806
  begin
6807
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30213|
6807
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30270|
6808
6808
  if (
6809
6809
  begin
6810
6810
  embedBacktraceInfo( "./lib/srfi-1.nnd", 610 );
6811
6811
  _null_QUMARK(
6812
6812
  begin
6813
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30213)
6813
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30270)
6814
6814
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
6815
6815
  end
6816
6816
  )
@@ -6822,7 +6822,7 @@ trampCall(
6822
6822
  embedBacktraceInfo( "./lib/srfi-1.nnd", 617 );
6823
6823
  _car(
6824
6824
  begin
6825
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30213)
6825
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30270)
6826
6826
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
6827
6827
  end
6828
6828
  )
@@ -9395,9 +9395,9 @@ trampCall(
9395
9395
  ) then
9396
9396
  if (
9397
9397
  begin
9398
- def self.___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30215_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30215', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
9399
- @global_lisp_binding['___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30215'] = self.method( :___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30215_METHOD )
9400
- @___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30215 =
9398
+ def self.___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30272_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30272', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
9399
+ @global_lisp_binding['___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30272'] = self.method( :___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30272_METHOD )
9400
+ @___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30272 =
9401
9401
  trampCall(
9402
9402
  begin
9403
9403
  embedBacktraceInfo( "./lib/srfi-1.nnd", 788 );
@@ -9452,9 +9452,9 @@ trampCall(
9452
9452
  } ,
9453
9453
  [
9454
9454
  begin
9455
- if @global_lisp_binding.has_key?('___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30215') then
9456
- trampCall(@___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30215)
9457
- else raise NameError.new( "Error: undefined variable ___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30215", "___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30215" ) end
9455
+ if @global_lisp_binding.has_key?('___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30272') then
9456
+ trampCall(@___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30272)
9457
+ else raise NameError.new( "Error: undefined variable ___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30272", "___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30272" ) end
9458
9458
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
9459
9459
  end
9460
9460
  ]
@@ -11338,13 +11338,13 @@ trampCall(
11338
11338
  end
11339
11339
  } ; ___lambda.call(
11340
11340
  begin
11341
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30225|
11341
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30282|
11342
11342
  if (
11343
11343
  begin
11344
11344
  embedBacktraceInfo( "./lib/srfi-1.nnd", 738 );
11345
11345
  _null_QUMARK(
11346
11346
  begin
11347
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30225)
11347
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30282)
11348
11348
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
11349
11349
  end
11350
11350
  )
@@ -11368,7 +11368,7 @@ trampCall(
11368
11368
  end ,
11369
11369
  [
11370
11370
  begin
11371
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30225)
11371
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30282)
11372
11372
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
11373
11373
  end
11374
11374
  ]
@@ -11444,13 +11444,13 @@ trampCall(
11444
11444
  end
11445
11445
  } ; ___lambda.call(
11446
11446
  begin
11447
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30226|
11447
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30283|
11448
11448
  if (
11449
11449
  begin
11450
11450
  embedBacktraceInfo( "./lib/srfi-1.nnd", 738 );
11451
11451
  _null_QUMARK(
11452
11452
  begin
11453
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30226)
11453
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30283)
11454
11454
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
11455
11455
  end
11456
11456
  )
@@ -11474,7 +11474,7 @@ trampCall(
11474
11474
  end ,
11475
11475
  [
11476
11476
  begin
11477
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30226)
11477
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30283)
11478
11478
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
11479
11479
  end
11480
11480
  ]
@@ -11545,13 +11545,13 @@ trampCall(
11545
11545
  end
11546
11546
  } ; ___lambda.call(
11547
11547
  begin
11548
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30227|
11548
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30284|
11549
11549
  if (
11550
11550
  begin
11551
11551
  embedBacktraceInfo( "./lib/srfi-1.nnd", 738 );
11552
11552
  _null_QUMARK(
11553
11553
  begin
11554
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30227)
11554
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30284)
11555
11555
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
11556
11556
  end
11557
11557
  )
@@ -11575,7 +11575,7 @@ trampCall(
11575
11575
  end ,
11576
11576
  [
11577
11577
  begin
11578
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30227)
11578
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30284)
11579
11579
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
11580
11580
  end
11581
11581
  ]
@@ -11770,13 +11770,13 @@ trampCall(
11770
11770
  end
11771
11771
  } ; ___lambda.call(
11772
11772
  begin
11773
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30228|
11773
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30285|
11774
11774
  if (
11775
11775
  begin
11776
11776
  embedBacktraceInfo( "./lib/srfi-1.nnd", 738 );
11777
11777
  _null_QUMARK(
11778
11778
  begin
11779
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30228)
11779
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30285)
11780
11780
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
11781
11781
  end
11782
11782
  )
@@ -11800,7 +11800,7 @@ trampCall(
11800
11800
  end ,
11801
11801
  [
11802
11802
  begin
11803
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30228)
11803
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30285)
11804
11804
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
11805
11805
  end
11806
11806
  ]
@@ -12006,13 +12006,13 @@ trampCall(
12006
12006
  end
12007
12007
  } ; ___lambda.call(
12008
12008
  begin
12009
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30229|
12009
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30286|
12010
12010
  if (
12011
12011
  begin
12012
12012
  embedBacktraceInfo( "./lib/srfi-1.nnd", 738 );
12013
12013
  _null_QUMARK(
12014
12014
  begin
12015
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30229)
12015
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30286)
12016
12016
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
12017
12017
  end
12018
12018
  )
@@ -12036,7 +12036,7 @@ trampCall(
12036
12036
  end ,
12037
12037
  [
12038
12038
  begin
12039
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30229)
12039
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30286)
12040
12040
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
12041
12041
  end
12042
12042
  ]
@@ -12112,13 +12112,13 @@ trampCall(
12112
12112
  end
12113
12113
  } ; ___lambda.call(
12114
12114
  begin
12115
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30230|
12115
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30287|
12116
12116
  if (
12117
12117
  begin
12118
12118
  embedBacktraceInfo( "./lib/srfi-1.nnd", 738 );
12119
12119
  _null_QUMARK(
12120
12120
  begin
12121
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30230)
12121
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30287)
12122
12122
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
12123
12123
  end
12124
12124
  )
@@ -12142,7 +12142,7 @@ trampCall(
12142
12142
  end ,
12143
12143
  [
12144
12144
  begin
12145
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30230)
12145
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30287)
12146
12146
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
12147
12147
  end
12148
12148
  ]
@@ -12321,13 +12321,13 @@ trampCall(
12321
12321
  end
12322
12322
  } ; ___lambda.call(
12323
12323
  begin
12324
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30231|
12324
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30288|
12325
12325
  if (
12326
12326
  begin
12327
12327
  embedBacktraceInfo( "./lib/srfi-1.nnd", 738 );
12328
12328
  _null_QUMARK(
12329
12329
  begin
12330
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30231)
12330
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30288)
12331
12331
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
12332
12332
  end
12333
12333
  )
@@ -12351,7 +12351,7 @@ trampCall(
12351
12351
  end ,
12352
12352
  [
12353
12353
  begin
12354
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30231)
12354
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30288)
12355
12355
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
12356
12356
  end
12357
12357
  ]
@@ -12432,13 +12432,13 @@ trampCall(
12432
12432
  end
12433
12433
  } ; ___lambda.call(
12434
12434
  begin
12435
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30232|
12435
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30289|
12436
12436
  if (
12437
12437
  begin
12438
12438
  embedBacktraceInfo( "./lib/srfi-1.nnd", 738 );
12439
12439
  _null_QUMARK(
12440
12440
  begin
12441
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30232)
12441
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30289)
12442
12442
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
12443
12443
  end
12444
12444
  )
@@ -12462,7 +12462,7 @@ trampCall(
12462
12462
  end ,
12463
12463
  [
12464
12464
  begin
12465
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30232)
12465
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30289)
12466
12466
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
12467
12467
  end
12468
12468
  ]
@@ -12493,9 +12493,9 @@ trampCall(
12493
12493
  Proc.new { |_pred,_list|
12494
12494
  if (
12495
12495
  begin
12496
- def self.___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30234_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30234', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
12497
- @global_lisp_binding['___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30234'] = self.method( :___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30234_METHOD )
12498
- @___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30234 =
12496
+ def self.___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30291_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30291', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
12497
+ @global_lisp_binding['___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30291'] = self.method( :___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30291_METHOD )
12498
+ @___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30291 =
12499
12499
  trampCall(
12500
12500
  begin
12501
12501
  embedBacktraceInfo( "./lib/srfi-1.nnd", 1097 );
@@ -12532,9 +12532,9 @@ trampCall(
12532
12532
  end ,
12533
12533
  [
12534
12534
  begin
12535
- if @global_lisp_binding.has_key?('___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30234') then
12536
- trampCall(@___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30234)
12537
- else raise NameError.new( "Error: undefined variable ___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30234", "___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30234" ) end
12535
+ if @global_lisp_binding.has_key?('___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30291') then
12536
+ trampCall(@___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30291)
12537
+ else raise NameError.new( "Error: undefined variable ___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30291", "___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30291" ) end
12538
12538
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
12539
12539
  end
12540
12540
  ]
@@ -12934,28 +12934,28 @@ trampCall(
12934
12934
  end
12935
12935
  if (
12936
12936
  begin
12937
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30235|
12937
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30292|
12938
12938
  if (
12939
12939
  begin
12940
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30235)
12940
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30292)
12941
12941
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
12942
12942
  end
12943
12943
  ) then
12944
12944
  begin
12945
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30235)
12945
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30292)
12946
12946
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
12947
12947
  end
12948
12948
  else
12949
12949
  begin
12950
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30236|
12950
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30293|
12951
12951
  if (
12952
12952
  begin
12953
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30236)
12953
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30293)
12954
12954
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
12955
12955
  end
12956
12956
  ) then
12957
12957
  begin
12958
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30236)
12958
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30293)
12959
12959
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
12960
12960
  end
12961
12961
  else
@@ -13342,28 +13342,28 @@ trampCall(
13342
13342
  end
13343
13343
  if (
13344
13344
  begin
13345
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30237|
13345
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30294|
13346
13346
  if (
13347
13347
  begin
13348
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30237)
13348
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30294)
13349
13349
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
13350
13350
  end
13351
13351
  ) then
13352
13352
  begin
13353
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30237)
13353
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30294)
13354
13354
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
13355
13355
  end
13356
13356
  else
13357
13357
  begin
13358
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30238|
13358
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30295|
13359
13359
  if (
13360
13360
  begin
13361
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30238)
13361
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30295)
13362
13362
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
13363
13363
  end
13364
13364
  ) then
13365
13365
  begin
13366
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30238)
13366
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30295)
13367
13367
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
13368
13368
  end
13369
13369
  else
@@ -13833,28 +13833,28 @@ trampCall(
13833
13833
  end
13834
13834
  ) then
13835
13835
  begin
13836
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30241|
13836
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30298|
13837
13837
  if (
13838
13838
  begin
13839
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30241)
13839
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30298)
13840
13840
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
13841
13841
  end
13842
13842
  ) then
13843
13843
  begin
13844
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30241)
13844
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30298)
13845
13845
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
13846
13846
  end
13847
13847
  else
13848
13848
  begin
13849
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30242|
13849
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30299|
13850
13850
  if (
13851
13851
  begin
13852
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30242)
13852
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30299)
13853
13853
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
13854
13854
  end
13855
13855
  ) then
13856
13856
  begin
13857
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30242)
13857
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30299)
13858
13858
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
13859
13859
  end
13860
13860
  else
@@ -14041,28 +14041,28 @@ trampCall(
14041
14041
  end
14042
14042
  else
14043
14043
  begin
14044
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30239|
14044
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30296|
14045
14045
  if (
14046
14046
  begin
14047
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30239)
14047
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30296)
14048
14048
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
14049
14049
  end
14050
14050
  ) then
14051
14051
  begin
14052
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30239)
14052
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30296)
14053
14053
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
14054
14054
  end
14055
14055
  else
14056
14056
  begin
14057
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30240|
14057
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30297|
14058
14058
  if (
14059
14059
  begin
14060
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30240)
14060
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30297)
14061
14061
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
14062
14062
  end
14063
14063
  ) then
14064
14064
  begin
14065
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30240)
14065
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30297)
14066
14066
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
14067
14067
  end
14068
14068
  else
@@ -14224,28 +14224,28 @@ trampCall(
14224
14224
  } ,
14225
14225
  Proc.new { |_heads,_tails|
14226
14226
  begin
14227
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30245|
14227
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30302|
14228
14228
  if (
14229
14229
  begin
14230
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30245)
14230
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30302)
14231
14231
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
14232
14232
  end
14233
14233
  ) then
14234
14234
  begin
14235
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30245)
14235
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30302)
14236
14236
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
14237
14237
  end
14238
14238
  else
14239
14239
  begin
14240
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30246|
14240
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30303|
14241
14241
  if (
14242
14242
  begin
14243
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30246)
14243
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30303)
14244
14244
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
14245
14245
  end
14246
14246
  ) then
14247
14247
  begin
14248
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30246)
14248
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30303)
14249
14249
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
14250
14250
  end
14251
14251
  else
@@ -14430,28 +14430,28 @@ trampCall(
14430
14430
  end
14431
14431
  else
14432
14432
  begin
14433
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30243|
14433
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30300|
14434
14434
  if (
14435
14435
  begin
14436
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30243)
14436
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30300)
14437
14437
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
14438
14438
  end
14439
14439
  ) then
14440
14440
  begin
14441
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30243)
14441
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30300)
14442
14442
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
14443
14443
  end
14444
14444
  else
14445
14445
  begin
14446
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30244|
14446
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30301|
14447
14447
  if (
14448
14448
  begin
14449
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30244)
14449
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30301)
14450
14450
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
14451
14451
  end
14452
14452
  ) then
14453
14453
  begin
14454
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30244)
14454
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30301)
14455
14455
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
14456
14456
  end
14457
14457
  else
@@ -15094,28 +15094,28 @@ trampCall(
15094
15094
  begin
15095
15095
  end
15096
15096
  begin
15097
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30247|
15097
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30304|
15098
15098
  if (
15099
15099
  begin
15100
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30247)
15100
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30304)
15101
15101
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
15102
15102
  end
15103
15103
  ) then
15104
15104
  begin
15105
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30247)
15105
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30304)
15106
15106
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
15107
15107
  end
15108
15108
  else
15109
15109
  begin
15110
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30248|
15110
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30305|
15111
15111
  if (
15112
15112
  begin
15113
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30248)
15113
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30305)
15114
15114
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
15115
15115
  end
15116
15116
  ) then
15117
15117
  begin
15118
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30248)
15118
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30305)
15119
15119
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
15120
15120
  end
15121
15121
  else
@@ -15127,28 +15127,28 @@ trampCall(
15127
15127
  _lp =
15128
15128
  Proc.new { |_s1,_rest|
15129
15129
  begin
15130
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30249|
15130
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30306|
15131
15131
  if (
15132
15132
  begin
15133
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30249)
15133
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30306)
15134
15134
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
15135
15135
  end
15136
15136
  ) then
15137
15137
  begin
15138
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30249)
15138
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30306)
15139
15139
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
15140
15140
  end
15141
15141
  else
15142
15142
  begin
15143
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30250|
15143
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30307|
15144
15144
  if (
15145
15145
  begin
15146
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30250)
15146
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30307)
15147
15147
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
15148
15148
  end
15149
15149
  ) then
15150
15150
  begin
15151
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30250)
15151
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30307)
15152
15152
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
15153
15153
  end
15154
15154
  else
@@ -15166,28 +15166,28 @@ trampCall(
15166
15166
  _eq_QUMARK(
15167
15167
  false ,
15168
15168
  begin
15169
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30251|
15169
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30308|
15170
15170
  if (
15171
15171
  begin
15172
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30251)
15172
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30308)
15173
15173
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
15174
15174
  end
15175
15175
  ) then
15176
15176
  begin
15177
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30251)
15177
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30308)
15178
15178
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
15179
15179
  end
15180
15180
  else
15181
15181
  begin
15182
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30252|
15182
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30309|
15183
15183
  if (
15184
15184
  begin
15185
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30252)
15185
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30309)
15186
15186
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
15187
15187
  end
15188
15188
  ) then
15189
15189
  begin
15190
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30252)
15190
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30309)
15191
15191
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
15192
15192
  end
15193
15193
  else
@@ -15376,28 +15376,28 @@ trampCall(
15376
15376
  begin
15377
15377
  end
15378
15378
  begin
15379
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30253|
15379
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30310|
15380
15380
  if (
15381
15381
  begin
15382
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30253)
15382
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30310)
15383
15383
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
15384
15384
  end
15385
15385
  ) then
15386
15386
  begin
15387
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30253)
15387
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30310)
15388
15388
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
15389
15389
  end
15390
15390
  else
15391
15391
  begin
15392
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30254|
15392
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30311|
15393
15393
  if (
15394
15394
  begin
15395
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30254)
15395
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30311)
15396
15396
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
15397
15397
  end
15398
15398
  ) then
15399
15399
  begin
15400
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30254)
15400
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30311)
15401
15401
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
15402
15402
  end
15403
15403
  else
@@ -15409,28 +15409,28 @@ trampCall(
15409
15409
  _lp =
15410
15410
  Proc.new { |_s1,_rest|
15411
15411
  begin
15412
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30255|
15412
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30312|
15413
15413
  if (
15414
15414
  begin
15415
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30255)
15415
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30312)
15416
15416
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
15417
15417
  end
15418
15418
  ) then
15419
15419
  begin
15420
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30255)
15420
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30312)
15421
15421
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
15422
15422
  end
15423
15423
  else
15424
15424
  begin
15425
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30256|
15425
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30313|
15426
15426
  if (
15427
15427
  begin
15428
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30256)
15428
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30313)
15429
15429
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
15430
15430
  end
15431
15431
  ) then
15432
15432
  begin
15433
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30256)
15433
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30313)
15434
15434
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
15435
15435
  end
15436
15436
  else
@@ -15448,28 +15448,28 @@ trampCall(
15448
15448
  _eq_QUMARK(
15449
15449
  false ,
15450
15450
  begin
15451
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30257|
15451
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30314|
15452
15452
  if (
15453
15453
  begin
15454
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30257)
15454
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30314)
15455
15455
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
15456
15456
  end
15457
15457
  ) then
15458
15458
  begin
15459
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30257)
15459
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30314)
15460
15460
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
15461
15461
  end
15462
15462
  else
15463
15463
  begin
15464
- ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30258|
15464
+ ___lambda = lambda { |___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30315|
15465
15465
  if (
15466
15466
  begin
15467
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30258)
15467
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30315)
15468
15468
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
15469
15469
  end
15470
15470
  ) then
15471
15471
  begin
15472
- trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30258)
15472
+ trampCall(___gensym__d2f54e498a1042043dafdae0618b15c325a30372_30315)
15473
15473
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
15474
15474
  end
15475
15475
  else