nendo 0.5.0 → 0.5.1
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.
- data/emacs/nendo-mode.el +2 -0
- data/lib/init.nnd +51 -35
- data/lib/init.nndc +3371 -2920
- data/lib/nendo.rb +463 -194
- data/lib/srfi-2.nndc +48 -165
- data/lib/srfi-26.nndc +142 -511
- data/lib/text/html-lite.nndc +23 -1
- data/lib/util/combinations.nnd +290 -0
- data/lib/util/combinations.nndc +7218 -0
- data/lib/util/list.nndc +138 -387
- data/lib/util/match.nnd +672 -0
- data/lib/util/match.nndc +81024 -0
- data/test/match-test.nnd +186 -0
- data/test/nendo-util-test.nnd +5 -7
- data/test/nendo_spec.rb +697 -235
- data/test/syntax_spec.rb +561 -52
- data/test/util-combinations-test.nnd +383 -0
- metadata +9 -4
- 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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
-
|
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
|
)
|