nendo 0.5.0 → 0.5.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/emacs/nendo-mode.el +2 -0
  2. data/lib/init.nnd +51 -35
  3. data/lib/init.nndc +3371 -2920
  4. data/lib/nendo.rb +463 -194
  5. data/lib/srfi-2.nndc +48 -165
  6. data/lib/srfi-26.nndc +142 -511
  7. data/lib/text/html-lite.nndc +23 -1
  8. data/lib/util/combinations.nnd +290 -0
  9. data/lib/util/combinations.nndc +7218 -0
  10. data/lib/util/list.nndc +138 -387
  11. data/lib/util/match.nnd +672 -0
  12. data/lib/util/match.nndc +81024 -0
  13. data/test/match-test.nnd +186 -0
  14. data/test/nendo-util-test.nnd +5 -7
  15. data/test/nendo_spec.rb +697 -235
  16. data/test/syntax_spec.rb +561 -52
  17. data/test/util-combinations-test.nnd +383 -0
  18. metadata +9 -4
  19. data/example/scratch.nnd +0 -119
data/lib/srfi-2.nndc CHANGED
@@ -84,10 +84,7 @@ trampCall(
84
84
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
85
85
  end ,
86
86
  [
87
- begin
88
- trampCall(__expr__gensym__de5653c32c493c653ee6557b7cf108e127448746_20032)
89
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
90
- end
87
+ __expr__gensym__de5653c32c493c653ee6557b7cf108e127448746_20032
91
88
  ]
92
89
  ))
93
90
  )
@@ -127,10 +124,7 @@ trampCall(
127
124
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
128
125
  end ,
129
126
  [
130
- begin
131
- trampCall(__v__13__gensym__de5653c32c493c653ee6557b7cf108e127448746_20052)
132
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
133
- end
127
+ __v__13__gensym__de5653c32c493c653ee6557b7cf108e127448746_20052
134
128
  ]
135
129
  ))
136
130
  ]
@@ -166,10 +160,7 @@ trampCall(
166
160
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
167
161
  end ,
168
162
  [
169
- begin
170
- trampCall(__v__14__gensym__de5653c32c493c653ee6557b7cf108e127448746_20053)
171
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
172
- end
163
+ __v__14__gensym__de5653c32c493c653ee6557b7cf108e127448746_20053
173
164
  ]
174
165
  ))
175
166
  ]
@@ -205,10 +196,7 @@ trampCall(
205
196
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
206
197
  end ,
207
198
  [
208
- begin
209
- trampCall(__v__15__gensym__de5653c32c493c653ee6557b7cf108e127448746_20054)
210
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
211
- end
199
+ __v__15__gensym__de5653c32c493c653ee6557b7cf108e127448746_20054
212
200
  ]
213
201
  ))
214
202
  ]
@@ -248,10 +236,7 @@ trampCall(
248
236
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
249
237
  end ,
250
238
  [
251
- begin
252
- trampCall(__v__17__gensym__de5653c32c493c653ee6557b7cf108e127448746_20056)
253
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
254
- end
239
+ __v__17__gensym__de5653c32c493c653ee6557b7cf108e127448746_20056
255
240
  ]
256
241
  ))
257
242
  ]
@@ -278,7 +263,7 @@ trampCall(
278
263
  trampCall( callProcedure( '_rename__gensym__de5653c32c493c653ee6557b7cf108e127448746_20033',
279
264
  begin
280
265
  trampCall(__rename__gensym__de5653c32c493c653ee6557b7cf108e127448746_20033)
281
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
266
+ rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
282
267
  end ,
283
268
  [
284
269
  :"let"
@@ -311,7 +296,7 @@ trampCall(
311
296
  trampCall( callProcedure( '_rename__gensym__de5653c32c493c653ee6557b7cf108e127448746_20033',
312
297
  begin
313
298
  trampCall(__rename__gensym__de5653c32c493c653ee6557b7cf108e127448746_20033)
314
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
299
+ rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
315
300
  end ,
316
301
  [
317
302
  :"tmp"
@@ -356,7 +341,7 @@ trampCall(
356
341
  trampCall( callProcedure( '_rename__gensym__de5653c32c493c653ee6557b7cf108e127448746_20033',
357
342
  begin
358
343
  trampCall(__rename__gensym__de5653c32c493c653ee6557b7cf108e127448746_20033)
359
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
344
+ rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
360
345
  end ,
361
346
  [
362
347
  :"and"
@@ -373,7 +358,7 @@ trampCall(
373
358
  trampCall( callProcedure( '_rename__gensym__de5653c32c493c653ee6557b7cf108e127448746_20033',
374
359
  begin
375
360
  trampCall(__rename__gensym__de5653c32c493c653ee6557b7cf108e127448746_20033)
376
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
361
+ rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
377
362
  end ,
378
363
  [
379
364
  :"tmp"
@@ -398,7 +383,7 @@ trampCall(
398
383
  trampCall( callProcedure( '_rename__gensym__de5653c32c493c653ee6557b7cf108e127448746_20033',
399
384
  begin
400
385
  trampCall(__rename__gensym__de5653c32c493c653ee6557b7cf108e127448746_20033)
401
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
386
+ rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
402
387
  end ,
403
388
  [
404
389
  :"and-let*"
@@ -439,10 +424,7 @@ trampCall(
439
424
  ]
440
425
  ))
441
426
  } ; ___lambda.call(
442
- begin
443
- trampCall(__v__19__gensym__de5653c32c493c653ee6557b7cf108e127448746_20058)
444
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
445
- end
427
+ __v__19__gensym__de5653c32c493c653ee6557b7cf108e127448746_20058
446
428
  )
447
429
  end
448
430
  } ; ___lambda.call(
@@ -454,19 +436,13 @@ trampCall(
454
436
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
455
437
  end ,
456
438
  [
457
- begin
458
- trampCall(__v__13__gensym__de5653c32c493c653ee6557b7cf108e127448746_20052)
459
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
460
- end
439
+ __v__13__gensym__de5653c32c493c653ee6557b7cf108e127448746_20052
461
440
  ]
462
441
  ))
463
442
  )
464
443
  end
465
444
  } ; ___lambda.call(
466
- begin
467
- trampCall(__v__18__gensym__de5653c32c493c653ee6557b7cf108e127448746_20057)
468
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
469
- end
445
+ __v__18__gensym__de5653c32c493c653ee6557b7cf108e127448746_20057
470
446
  )
471
447
  end
472
448
  } ; ___lambda.call(
@@ -478,10 +454,7 @@ trampCall(
478
454
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
479
455
  end ,
480
456
  [
481
- begin
482
- trampCall(__v__14__gensym__de5653c32c493c653ee6557b7cf108e127448746_20053)
483
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
484
- end
457
+ __v__14__gensym__de5653c32c493c653ee6557b7cf108e127448746_20053
485
458
  ]
486
459
  ))
487
460
  )
@@ -498,19 +471,13 @@ trampCall(
498
471
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
499
472
  end ,
500
473
  [
501
- begin
502
- trampCall(__v__15__gensym__de5653c32c493c653ee6557b7cf108e127448746_20054)
503
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
504
- end
474
+ __v__15__gensym__de5653c32c493c653ee6557b7cf108e127448746_20054
505
475
  ]
506
476
  ))
507
477
  )
508
478
  end
509
479
  } ; ___lambda.call(
510
- begin
511
- trampCall(__v__16__gensym__de5653c32c493c653ee6557b7cf108e127448746_20055)
512
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
513
- end
480
+ __v__16__gensym__de5653c32c493c653ee6557b7cf108e127448746_20055
514
481
  )
515
482
  end
516
483
  } ; ___lambda.call(
@@ -522,10 +489,7 @@ trampCall(
522
489
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
523
490
  end ,
524
491
  [
525
- begin
526
- trampCall(__v__15__gensym__de5653c32c493c653ee6557b7cf108e127448746_20054)
527
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
528
- end
492
+ __v__15__gensym__de5653c32c493c653ee6557b7cf108e127448746_20054
529
493
  ]
530
494
  ))
531
495
  )
@@ -542,10 +506,7 @@ trampCall(
542
506
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
543
507
  end ,
544
508
  [
545
- begin
546
- trampCall(__v__14__gensym__de5653c32c493c653ee6557b7cf108e127448746_20053)
547
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
548
- end
509
+ __v__14__gensym__de5653c32c493c653ee6557b7cf108e127448746_20053
549
510
  ]
550
511
  ))
551
512
  )
@@ -562,10 +523,7 @@ trampCall(
562
523
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
563
524
  end ,
564
525
  [
565
- begin
566
- trampCall(__v__13__gensym__de5653c32c493c653ee6557b7cf108e127448746_20052)
567
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
568
- end
526
+ __v__13__gensym__de5653c32c493c653ee6557b7cf108e127448746_20052
569
527
  ]
570
528
  ))
571
529
  )
@@ -582,10 +540,7 @@ trampCall(
582
540
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
583
541
  end ,
584
542
  [
585
- begin
586
- trampCall(__expr__gensym__de5653c32c493c653ee6557b7cf108e127448746_20032)
587
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
588
- end
543
+ __expr__gensym__de5653c32c493c653ee6557b7cf108e127448746_20032
589
544
  ]
590
545
  ))
591
546
  )
@@ -622,10 +577,7 @@ trampCall(
622
577
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
623
578
  end ,
624
579
  [
625
- begin
626
- trampCall(__v__4__gensym__de5653c32c493c653ee6557b7cf108e127448746_20043)
627
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
628
- end
580
+ __v__4__gensym__de5653c32c493c653ee6557b7cf108e127448746_20043
629
581
  ]
630
582
  ))
631
583
  ]
@@ -661,10 +613,7 @@ trampCall(
661
613
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
662
614
  end ,
663
615
  [
664
- begin
665
- trampCall(__v__5__gensym__de5653c32c493c653ee6557b7cf108e127448746_20044)
666
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
667
- end
616
+ __v__5__gensym__de5653c32c493c653ee6557b7cf108e127448746_20044
668
617
  ]
669
618
  ))
670
619
  ]
@@ -700,10 +649,7 @@ trampCall(
700
649
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
701
650
  end ,
702
651
  [
703
- begin
704
- trampCall(__v__6__gensym__de5653c32c493c653ee6557b7cf108e127448746_20045)
705
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
706
- end
652
+ __v__6__gensym__de5653c32c493c653ee6557b7cf108e127448746_20045
707
653
  ]
708
654
  ))
709
655
  ]
@@ -743,10 +689,7 @@ trampCall(
743
689
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
744
690
  end ,
745
691
  [
746
- begin
747
- trampCall(__v__8__gensym__de5653c32c493c653ee6557b7cf108e127448746_20047)
748
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
749
- end
692
+ __v__8__gensym__de5653c32c493c653ee6557b7cf108e127448746_20047
750
693
  ]
751
694
  ))
752
695
  ]
@@ -786,10 +729,7 @@ trampCall(
786
729
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
787
730
  end ,
788
731
  [
789
- begin
790
- trampCall(__v__10__gensym__de5653c32c493c653ee6557b7cf108e127448746_20049)
791
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
792
- end
732
+ __v__10__gensym__de5653c32c493c653ee6557b7cf108e127448746_20049
793
733
  ]
794
734
  ))
795
735
  ]
@@ -816,7 +756,7 @@ trampCall(
816
756
  trampCall( callProcedure( '_rename__gensym__de5653c32c493c653ee6557b7cf108e127448746_20033',
817
757
  begin
818
758
  trampCall(__rename__gensym__de5653c32c493c653ee6557b7cf108e127448746_20033)
819
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
759
+ rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
820
760
  end ,
821
761
  [
822
762
  :"let"
@@ -889,7 +829,7 @@ trampCall(
889
829
  trampCall( callProcedure( '_rename__gensym__de5653c32c493c653ee6557b7cf108e127448746_20033',
890
830
  begin
891
831
  trampCall(__rename__gensym__de5653c32c493c653ee6557b7cf108e127448746_20033)
892
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
832
+ rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
893
833
  end ,
894
834
  [
895
835
  :"and"
@@ -926,7 +866,7 @@ trampCall(
926
866
  trampCall( callProcedure( '_rename__gensym__de5653c32c493c653ee6557b7cf108e127448746_20033',
927
867
  begin
928
868
  trampCall(__rename__gensym__de5653c32c493c653ee6557b7cf108e127448746_20033)
929
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
869
+ rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
930
870
  end ,
931
871
  [
932
872
  :"and-let*"
@@ -967,10 +907,7 @@ trampCall(
967
907
  ]
968
908
  ))
969
909
  } ; ___lambda.call(
970
- begin
971
- trampCall(__v__12__gensym__de5653c32c493c653ee6557b7cf108e127448746_20051)
972
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
973
- end
910
+ __v__12__gensym__de5653c32c493c653ee6557b7cf108e127448746_20051
974
911
  )
975
912
  end
976
913
  } ; ___lambda.call(
@@ -982,19 +919,13 @@ trampCall(
982
919
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
983
920
  end ,
984
921
  [
985
- begin
986
- trampCall(__v__4__gensym__de5653c32c493c653ee6557b7cf108e127448746_20043)
987
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
988
- end
922
+ __v__4__gensym__de5653c32c493c653ee6557b7cf108e127448746_20043
989
923
  ]
990
924
  ))
991
925
  )
992
926
  end
993
927
  } ; ___lambda.call(
994
- begin
995
- trampCall(__v__11__gensym__de5653c32c493c653ee6557b7cf108e127448746_20050)
996
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
997
- end
928
+ __v__11__gensym__de5653c32c493c653ee6557b7cf108e127448746_20050
998
929
  )
999
930
  end
1000
931
  } ; ___lambda.call(
@@ -1006,10 +937,7 @@ trampCall(
1006
937
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1007
938
  end ,
1008
939
  [
1009
- begin
1010
- trampCall(__v__5__gensym__de5653c32c493c653ee6557b7cf108e127448746_20044)
1011
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1012
- end
940
+ __v__5__gensym__de5653c32c493c653ee6557b7cf108e127448746_20044
1013
941
  ]
1014
942
  ))
1015
943
  )
@@ -1026,19 +954,13 @@ trampCall(
1026
954
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1027
955
  end ,
1028
956
  [
1029
- begin
1030
- trampCall(__v__8__gensym__de5653c32c493c653ee6557b7cf108e127448746_20047)
1031
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1032
- end
957
+ __v__8__gensym__de5653c32c493c653ee6557b7cf108e127448746_20047
1033
958
  ]
1034
959
  ))
1035
960
  )
1036
961
  end
1037
962
  } ; ___lambda.call(
1038
- begin
1039
- trampCall(__v__9__gensym__de5653c32c493c653ee6557b7cf108e127448746_20048)
1040
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1041
- end
963
+ __v__9__gensym__de5653c32c493c653ee6557b7cf108e127448746_20048
1042
964
  )
1043
965
  end
1044
966
  } ; ___lambda.call(
@@ -1050,10 +972,7 @@ trampCall(
1050
972
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1051
973
  end ,
1052
974
  [
1053
- begin
1054
- trampCall(__v__8__gensym__de5653c32c493c653ee6557b7cf108e127448746_20047)
1055
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1056
- end
975
+ __v__8__gensym__de5653c32c493c653ee6557b7cf108e127448746_20047
1057
976
  ]
1058
977
  ))
1059
978
  )
@@ -1070,19 +989,13 @@ trampCall(
1070
989
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1071
990
  end ,
1072
991
  [
1073
- begin
1074
- trampCall(__v__6__gensym__de5653c32c493c653ee6557b7cf108e127448746_20045)
1075
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1076
- end
992
+ __v__6__gensym__de5653c32c493c653ee6557b7cf108e127448746_20045
1077
993
  ]
1078
994
  ))
1079
995
  )
1080
996
  end
1081
997
  } ; ___lambda.call(
1082
- begin
1083
- trampCall(__v__7__gensym__de5653c32c493c653ee6557b7cf108e127448746_20046)
1084
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1085
- end
998
+ __v__7__gensym__de5653c32c493c653ee6557b7cf108e127448746_20046
1086
999
  )
1087
1000
  end
1088
1001
  } ; ___lambda.call(
@@ -1094,10 +1007,7 @@ trampCall(
1094
1007
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1095
1008
  end ,
1096
1009
  [
1097
- begin
1098
- trampCall(__v__6__gensym__de5653c32c493c653ee6557b7cf108e127448746_20045)
1099
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1100
- end
1010
+ __v__6__gensym__de5653c32c493c653ee6557b7cf108e127448746_20045
1101
1011
  ]
1102
1012
  ))
1103
1013
  )
@@ -1114,10 +1024,7 @@ trampCall(
1114
1024
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1115
1025
  end ,
1116
1026
  [
1117
- begin
1118
- trampCall(__v__5__gensym__de5653c32c493c653ee6557b7cf108e127448746_20044)
1119
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1120
- end
1027
+ __v__5__gensym__de5653c32c493c653ee6557b7cf108e127448746_20044
1121
1028
  ]
1122
1029
  ))
1123
1030
  )
@@ -1134,10 +1041,7 @@ trampCall(
1134
1041
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1135
1042
  end ,
1136
1043
  [
1137
- begin
1138
- trampCall(__v__4__gensym__de5653c32c493c653ee6557b7cf108e127448746_20043)
1139
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1140
- end
1044
+ __v__4__gensym__de5653c32c493c653ee6557b7cf108e127448746_20043
1141
1045
  ]
1142
1046
  ))
1143
1047
  )
@@ -1154,10 +1058,7 @@ trampCall(
1154
1058
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1155
1059
  end ,
1156
1060
  [
1157
- begin
1158
- trampCall(__expr__gensym__de5653c32c493c653ee6557b7cf108e127448746_20032)
1159
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1160
- end
1061
+ __expr__gensym__de5653c32c493c653ee6557b7cf108e127448746_20032
1161
1062
  ]
1162
1063
  ))
1163
1064
  )
@@ -1194,10 +1095,7 @@ trampCall(
1194
1095
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1195
1096
  end ,
1196
1097
  [
1197
- begin
1198
- trampCall(__v__1__gensym__de5653c32c493c653ee6557b7cf108e127448746_20040)
1199
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1200
- end
1098
+ __v__1__gensym__de5653c32c493c653ee6557b7cf108e127448746_20040
1201
1099
  ]
1202
1100
  ))
1203
1101
  ]
@@ -1233,10 +1131,7 @@ trampCall(
1233
1131
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1234
1132
  end ,
1235
1133
  [
1236
- begin
1237
- trampCall(__v__2__gensym__de5653c32c493c653ee6557b7cf108e127448746_20041)
1238
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1239
- end
1134
+ __v__2__gensym__de5653c32c493c653ee6557b7cf108e127448746_20041
1240
1135
  ]
1241
1136
  ))
1242
1137
  ]
@@ -1259,7 +1154,7 @@ trampCall(
1259
1154
  trampCall( callProcedure( '_rename__gensym__de5653c32c493c653ee6557b7cf108e127448746_20033',
1260
1155
  begin
1261
1156
  trampCall(__rename__gensym__de5653c32c493c653ee6557b7cf108e127448746_20033)
1262
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1157
+ rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
1263
1158
  end ,
1264
1159
  [
1265
1160
  :"begin"
@@ -1272,10 +1167,7 @@ trampCall(
1272
1167
  ]
1273
1168
  ))
1274
1169
  } ; ___lambda.call(
1275
- begin
1276
- trampCall(__v__3__gensym__de5653c32c493c653ee6557b7cf108e127448746_20042)
1277
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1278
- end
1170
+ __v__3__gensym__de5653c32c493c653ee6557b7cf108e127448746_20042
1279
1171
  )
1280
1172
  end
1281
1173
  } ; ___lambda.call(
@@ -1287,10 +1179,7 @@ trampCall(
1287
1179
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1288
1180
  end ,
1289
1181
  [
1290
- begin
1291
- trampCall(__v__1__gensym__de5653c32c493c653ee6557b7cf108e127448746_20040)
1292
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1293
- end
1182
+ __v__1__gensym__de5653c32c493c653ee6557b7cf108e127448746_20040
1294
1183
  ]
1295
1184
  ))
1296
1185
  )
@@ -1307,10 +1196,7 @@ trampCall(
1307
1196
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1308
1197
  end ,
1309
1198
  [
1310
- begin
1311
- trampCall(__v__1__gensym__de5653c32c493c653ee6557b7cf108e127448746_20040)
1312
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1313
- end
1199
+ __v__1__gensym__de5653c32c493c653ee6557b7cf108e127448746_20040
1314
1200
  ]
1315
1201
  ))
1316
1202
  )
@@ -1327,10 +1213,7 @@ trampCall(
1327
1213
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1328
1214
  end ,
1329
1215
  [
1330
- begin
1331
- trampCall(__expr__gensym__de5653c32c493c653ee6557b7cf108e127448746_20032)
1332
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1333
- end
1216
+ __expr__gensym__de5653c32c493c653ee6557b7cf108e127448746_20032
1334
1217
  ]
1335
1218
  ))
1336
1219
  )