nendo 0.5.3 → 0.5.4
Sign up to get free protection for your applications and to get access to all the features.
- data/lib/init.nnd +7 -5
- data/lib/init.nndc +2078 -1997
- data/lib/nendo/experimental.nnd +58 -0
- data/lib/nendo/experimental.nndc +2614 -3
- data/lib/nendo/test.nnd +40 -8
- data/lib/nendo/test.nndc +704 -361
- data/lib/nendo.rb +29 -3
- data/lib/rfc/json.nndc +6 -6
- data/lib/srfi-1.nndc +147 -147
- data/lib/srfi-2.nndc +90 -90
- data/lib/srfi-26.nndc +251 -251
- data/lib/text/html-lite.nndc +23 -23
- data/lib/util/combinations.nndc +191 -191
- data/lib/util/list.nnd +2 -0
- data/lib/util/list.nndc +692 -609
- data/lib/util/match.nndc +5551 -5551
- data/test/nendo_spec.rb +19 -3
- data/test/syntax_spec.rb +339 -15
- data/test/testframework_spec.rb +153 -0
- data/test/util-list-test.nnd +6 -6
- metadata +6 -5
data/lib/util/combinations.nndc
CHANGED
@@ -65,18 +65,18 @@ trampCall(
|
|
65
65
|
trampCall(
|
66
66
|
Proc.new { |_lis,_k|
|
67
67
|
begin
|
68
|
-
___lambda = lambda { |
|
68
|
+
___lambda = lambda { |___gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91367|
|
69
69
|
if (
|
70
70
|
begin
|
71
|
-
___lambda = lambda { |
|
71
|
+
___lambda = lambda { |___gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91373|
|
72
72
|
if (
|
73
73
|
begin
|
74
|
-
trampCall(
|
74
|
+
trampCall(___gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91373)
|
75
75
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
76
76
|
end
|
77
77
|
) then
|
78
78
|
begin
|
79
|
-
trampCall(
|
79
|
+
trampCall(___gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91373)
|
80
80
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
81
81
|
end
|
82
82
|
else
|
@@ -95,7 +95,7 @@ trampCall(
|
|
95
95
|
[
|
96
96
|
0 ,
|
97
97
|
begin
|
98
|
-
trampCall(
|
98
|
+
trampCall(___gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91367)
|
99
99
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
100
100
|
end
|
101
101
|
]
|
@@ -126,15 +126,15 @@ trampCall(
|
|
126
126
|
else
|
127
127
|
if (
|
128
128
|
begin
|
129
|
-
___lambda = lambda { |
|
129
|
+
___lambda = lambda { |___gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91374|
|
130
130
|
if (
|
131
131
|
begin
|
132
|
-
trampCall(
|
132
|
+
trampCall(___gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91374)
|
133
133
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
134
134
|
end
|
135
135
|
) then
|
136
136
|
begin
|
137
|
-
trampCall(
|
137
|
+
trampCall(___gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91374)
|
138
138
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
139
139
|
end
|
140
140
|
else
|
@@ -153,7 +153,7 @@ trampCall(
|
|
153
153
|
[
|
154
154
|
1 ,
|
155
155
|
begin
|
156
|
-
trampCall(
|
156
|
+
trampCall(___gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91367)
|
157
157
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
158
158
|
end
|
159
159
|
]
|
@@ -206,15 +206,15 @@ trampCall(
|
|
206
206
|
else
|
207
207
|
if (
|
208
208
|
begin
|
209
|
-
___lambda = lambda { |
|
209
|
+
___lambda = lambda { |___gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91375|
|
210
210
|
if (
|
211
211
|
begin
|
212
|
-
trampCall(
|
212
|
+
trampCall(___gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91375)
|
213
213
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
214
214
|
end
|
215
215
|
) then
|
216
216
|
begin
|
217
|
-
trampCall(
|
217
|
+
trampCall(___gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91375)
|
218
218
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
219
219
|
end
|
220
220
|
else
|
@@ -233,7 +233,7 @@ trampCall(
|
|
233
233
|
[
|
234
234
|
2 ,
|
235
235
|
begin
|
236
|
-
trampCall(
|
236
|
+
trampCall(___gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91367)
|
237
237
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
238
238
|
end
|
239
239
|
]
|
@@ -303,15 +303,15 @@ trampCall(
|
|
303
303
|
else
|
304
304
|
if (
|
305
305
|
begin
|
306
|
-
___lambda = lambda { |
|
306
|
+
___lambda = lambda { |___gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91376|
|
307
307
|
if (
|
308
308
|
begin
|
309
|
-
trampCall(
|
309
|
+
trampCall(___gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91376)
|
310
310
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
311
311
|
end
|
312
312
|
) then
|
313
313
|
begin
|
314
|
-
trampCall(
|
314
|
+
trampCall(___gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91376)
|
315
315
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
316
316
|
end
|
317
317
|
else
|
@@ -330,7 +330,7 @@ trampCall(
|
|
330
330
|
[
|
331
331
|
3 ,
|
332
332
|
begin
|
333
|
-
trampCall(
|
333
|
+
trampCall(___gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91367)
|
334
334
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
335
335
|
end
|
336
336
|
]
|
@@ -512,7 +512,7 @@ trampCall(
|
|
512
512
|
trampCall(
|
513
513
|
Proc.new { |_set|
|
514
514
|
begin
|
515
|
-
___lambda = lambda { |
|
515
|
+
___lambda = lambda { |__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91377|
|
516
516
|
if (
|
517
517
|
begin
|
518
518
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 282 );
|
@@ -543,9 +543,9 @@ trampCall(
|
|
543
543
|
else
|
544
544
|
begin
|
545
545
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
546
|
-
delayCall( '
|
546
|
+
delayCall( '__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91377', '_failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91377',
|
547
547
|
begin
|
548
|
-
trampCall(
|
548
|
+
trampCall(__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91377)
|
549
549
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
550
550
|
end ,
|
551
551
|
[
|
@@ -556,7 +556,7 @@ trampCall(
|
|
556
556
|
} ; ___lambda.call(
|
557
557
|
Proc.new { ||
|
558
558
|
begin
|
559
|
-
___lambda = lambda { |
|
559
|
+
___lambda = lambda { |__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91378|
|
560
560
|
if (
|
561
561
|
if (
|
562
562
|
begin
|
@@ -599,7 +599,7 @@ trampCall(
|
|
599
599
|
end
|
600
600
|
) then
|
601
601
|
begin
|
602
|
-
___lambda = lambda { |
|
602
|
+
___lambda = lambda { |__w__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91380|
|
603
603
|
begin
|
604
604
|
begin
|
605
605
|
___lambda = lambda { |_a|
|
@@ -623,7 +623,7 @@ trampCall(
|
|
623
623
|
end
|
624
624
|
end
|
625
625
|
} ; ___lambda.call(
|
626
|
-
|
626
|
+
__w__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91380
|
627
627
|
)
|
628
628
|
end
|
629
629
|
end
|
@@ -642,9 +642,9 @@ trampCall(
|
|
642
642
|
else
|
643
643
|
begin
|
644
644
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
645
|
-
delayCall( '
|
645
|
+
delayCall( '__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91378', '_failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91378',
|
646
646
|
begin
|
647
|
-
trampCall(
|
647
|
+
trampCall(__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91378)
|
648
648
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
649
649
|
end ,
|
650
650
|
[
|
@@ -655,7 +655,7 @@ trampCall(
|
|
655
655
|
} ; ___lambda.call(
|
656
656
|
Proc.new { ||
|
657
657
|
begin
|
658
|
-
___lambda = lambda { |
|
658
|
+
___lambda = lambda { |__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91379|
|
659
659
|
begin
|
660
660
|
if (
|
661
661
|
begin
|
@@ -669,7 +669,7 @@ trampCall(
|
|
669
669
|
end
|
670
670
|
) then
|
671
671
|
begin
|
672
|
-
___lambda = lambda { |
|
672
|
+
___lambda = lambda { |__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91449,__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91450|
|
673
673
|
begin
|
674
674
|
begin
|
675
675
|
___lambda = lambda { |_a|
|
@@ -685,7 +685,7 @@ trampCall(
|
|
685
685
|
begin
|
686
686
|
embedBacktraceInfo( "", 1 );
|
687
687
|
_pair_QUMARK(
|
688
|
-
|
688
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91450
|
689
689
|
)
|
690
690
|
end
|
691
691
|
)
|
@@ -699,7 +699,7 @@ trampCall(
|
|
699
699
|
begin
|
700
700
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 37 );
|
701
701
|
_cdr(
|
702
|
-
|
702
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91450
|
703
703
|
)
|
704
704
|
end
|
705
705
|
)
|
@@ -709,7 +709,7 @@ trampCall(
|
|
709
709
|
end
|
710
710
|
) then
|
711
711
|
begin
|
712
|
-
___lambda = lambda { |
|
712
|
+
___lambda = lambda { |__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91579|
|
713
713
|
begin
|
714
714
|
begin
|
715
715
|
___lambda = lambda { |_b|
|
@@ -758,7 +758,7 @@ trampCall(
|
|
758
758
|
end
|
759
759
|
end
|
760
760
|
} ; ___lambda.call(
|
761
|
-
|
761
|
+
__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91579
|
762
762
|
)
|
763
763
|
end
|
764
764
|
end
|
@@ -766,7 +766,7 @@ trampCall(
|
|
766
766
|
begin
|
767
767
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 35 );
|
768
768
|
_car(
|
769
|
-
|
769
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91450
|
770
770
|
)
|
771
771
|
end
|
772
772
|
)
|
@@ -774,9 +774,9 @@ trampCall(
|
|
774
774
|
else
|
775
775
|
begin
|
776
776
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
777
|
-
delayCall( '
|
777
|
+
delayCall( '__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91379', '_failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91379',
|
778
778
|
begin
|
779
|
-
trampCall(
|
779
|
+
trampCall(__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91379)
|
780
780
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
781
781
|
end ,
|
782
782
|
[
|
@@ -785,7 +785,7 @@ trampCall(
|
|
785
785
|
end
|
786
786
|
end
|
787
787
|
} ; ___lambda.call(
|
788
|
-
|
788
|
+
__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91449
|
789
789
|
)
|
790
790
|
end
|
791
791
|
end
|
@@ -813,9 +813,9 @@ trampCall(
|
|
813
813
|
else
|
814
814
|
begin
|
815
815
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
816
|
-
delayCall( '
|
816
|
+
delayCall( '__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91379', '_failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91379',
|
817
817
|
begin
|
818
|
-
trampCall(
|
818
|
+
trampCall(__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91379)
|
819
819
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
820
820
|
end ,
|
821
821
|
[
|
@@ -827,7 +827,7 @@ trampCall(
|
|
827
827
|
} ; ___lambda.call(
|
828
828
|
Proc.new { ||
|
829
829
|
begin
|
830
|
-
___lambda = lambda { |
|
830
|
+
___lambda = lambda { |__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91381|
|
831
831
|
begin
|
832
832
|
if (
|
833
833
|
begin
|
@@ -841,7 +841,7 @@ trampCall(
|
|
841
841
|
end
|
842
842
|
) then
|
843
843
|
begin
|
844
|
-
___lambda = lambda { |
|
844
|
+
___lambda = lambda { |__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91487,__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91488|
|
845
845
|
begin
|
846
846
|
begin
|
847
847
|
___lambda = lambda { |_a|
|
@@ -850,12 +850,12 @@ trampCall(
|
|
850
850
|
begin
|
851
851
|
embedBacktraceInfo( "", 1 );
|
852
852
|
_pair_QUMARK(
|
853
|
-
|
853
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91488
|
854
854
|
)
|
855
855
|
end
|
856
856
|
) then
|
857
857
|
begin
|
858
|
-
___lambda = lambda { |
|
858
|
+
___lambda = lambda { |__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91646,__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91647|
|
859
859
|
begin
|
860
860
|
begin
|
861
861
|
___lambda = lambda { |_b|
|
@@ -871,7 +871,7 @@ trampCall(
|
|
871
871
|
begin
|
872
872
|
embedBacktraceInfo( "", 1 );
|
873
873
|
_pair_QUMARK(
|
874
|
-
|
874
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91647
|
875
875
|
)
|
876
876
|
end
|
877
877
|
)
|
@@ -885,7 +885,7 @@ trampCall(
|
|
885
885
|
begin
|
886
886
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 37 );
|
887
887
|
_cdr(
|
888
|
-
|
888
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91647
|
889
889
|
)
|
890
890
|
end
|
891
891
|
)
|
@@ -895,7 +895,7 @@ trampCall(
|
|
895
895
|
end
|
896
896
|
) then
|
897
897
|
begin
|
898
|
-
___lambda = lambda { |
|
898
|
+
___lambda = lambda { |__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91678|
|
899
899
|
begin
|
900
900
|
begin
|
901
901
|
___lambda = lambda { |_c|
|
@@ -1085,7 +1085,7 @@ trampCall(
|
|
1085
1085
|
end
|
1086
1086
|
end
|
1087
1087
|
} ; ___lambda.call(
|
1088
|
-
|
1088
|
+
__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91678
|
1089
1089
|
)
|
1090
1090
|
end
|
1091
1091
|
end
|
@@ -1093,7 +1093,7 @@ trampCall(
|
|
1093
1093
|
begin
|
1094
1094
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 35 );
|
1095
1095
|
_car(
|
1096
|
-
|
1096
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91647
|
1097
1097
|
)
|
1098
1098
|
end
|
1099
1099
|
)
|
@@ -1101,9 +1101,9 @@ trampCall(
|
|
1101
1101
|
else
|
1102
1102
|
begin
|
1103
1103
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
1104
|
-
delayCall( '
|
1104
|
+
delayCall( '__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91381', '_failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91381',
|
1105
1105
|
begin
|
1106
|
-
trampCall(
|
1106
|
+
trampCall(__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91381)
|
1107
1107
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
1108
1108
|
end ,
|
1109
1109
|
[
|
@@ -1112,7 +1112,7 @@ trampCall(
|
|
1112
1112
|
end
|
1113
1113
|
end
|
1114
1114
|
} ; ___lambda.call(
|
1115
|
-
|
1115
|
+
__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91646
|
1116
1116
|
)
|
1117
1117
|
end
|
1118
1118
|
end
|
@@ -1120,13 +1120,13 @@ trampCall(
|
|
1120
1120
|
begin
|
1121
1121
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 35 );
|
1122
1122
|
_car(
|
1123
|
-
|
1123
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91488
|
1124
1124
|
)
|
1125
1125
|
end ,
|
1126
1126
|
begin
|
1127
1127
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 37 );
|
1128
1128
|
_cdr(
|
1129
|
-
|
1129
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91488
|
1130
1130
|
)
|
1131
1131
|
end
|
1132
1132
|
)
|
@@ -1134,9 +1134,9 @@ trampCall(
|
|
1134
1134
|
else
|
1135
1135
|
begin
|
1136
1136
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
1137
|
-
delayCall( '
|
1137
|
+
delayCall( '__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91381', '_failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91381',
|
1138
1138
|
begin
|
1139
|
-
trampCall(
|
1139
|
+
trampCall(__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91381)
|
1140
1140
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
1141
1141
|
end ,
|
1142
1142
|
[
|
@@ -1146,7 +1146,7 @@ trampCall(
|
|
1146
1146
|
end
|
1147
1147
|
end
|
1148
1148
|
} ; ___lambda.call(
|
1149
|
-
|
1149
|
+
__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91487
|
1150
1150
|
)
|
1151
1151
|
end
|
1152
1152
|
end
|
@@ -1174,9 +1174,9 @@ trampCall(
|
|
1174
1174
|
else
|
1175
1175
|
begin
|
1176
1176
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
1177
|
-
delayCall( '
|
1177
|
+
delayCall( '__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91381', '_failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91381',
|
1178
1178
|
begin
|
1179
|
-
trampCall(
|
1179
|
+
trampCall(__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91381)
|
1180
1180
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
1181
1181
|
end ,
|
1182
1182
|
[
|
@@ -1188,7 +1188,7 @@ trampCall(
|
|
1188
1188
|
} ; ___lambda.call(
|
1189
1189
|
Proc.new { ||
|
1190
1190
|
begin
|
1191
|
-
___lambda = lambda { |
|
1191
|
+
___lambda = lambda { |__failure__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91448|
|
1192
1192
|
begin
|
1193
1193
|
begin
|
1194
1194
|
___lambda = lambda { |_else|
|
@@ -1310,7 +1310,7 @@ trampCall(
|
|
1310
1310
|
begin raise RuntimeError,
|
1311
1311
|
"Error: match: no matching pattern"
|
1312
1312
|
rescue => __e
|
1313
|
-
__e.set_backtrace( [":
|
1313
|
+
__e.set_backtrace( ["./lib/nendo/experimental.nnd:168"] + __e.backtrace )
|
1314
1314
|
raise __e
|
1315
1315
|
end
|
1316
1316
|
}
|
@@ -1340,7 +1340,7 @@ trampCall(
|
|
1340
1340
|
@global_lisp_binding['_permutations_ASMARK'] = self.method( :_permutations_ASMARK_METHOD )
|
1341
1341
|
@_permutations_ASMARK =
|
1342
1342
|
trampCall(
|
1343
|
-
Proc.new { |_set,*__rest__|
|
1343
|
+
Proc.new { |_set,*__rest__| ___gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91709 = __rest__[0] ;
|
1344
1344
|
begin
|
1345
1345
|
___lambda = lambda { |_eq|
|
1346
1346
|
if (
|
@@ -1352,7 +1352,7 @@ trampCall(
|
|
1352
1352
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 55 );
|
1353
1353
|
_length(
|
1354
1354
|
begin
|
1355
|
-
trampCall(
|
1355
|
+
trampCall(___gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91709)
|
1356
1356
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
1357
1357
|
end
|
1358
1358
|
)
|
@@ -1377,7 +1377,7 @@ trampCall(
|
|
1377
1377
|
[
|
1378
1378
|
0 ,
|
1379
1379
|
begin
|
1380
|
-
trampCall(
|
1380
|
+
trampCall(___gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91709)
|
1381
1381
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
1382
1382
|
end
|
1383
1383
|
]
|
@@ -1394,7 +1394,7 @@ trampCall(
|
|
1394
1394
|
trampCall(
|
1395
1395
|
Proc.new { |_set|
|
1396
1396
|
begin
|
1397
|
-
___lambda = lambda { |
|
1397
|
+
___lambda = lambda { |__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91710|
|
1398
1398
|
if (
|
1399
1399
|
begin
|
1400
1400
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 70 );
|
@@ -1425,9 +1425,9 @@ trampCall(
|
|
1425
1425
|
else
|
1426
1426
|
begin
|
1427
1427
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
1428
|
-
trampCall( callProcedure( '
|
1428
|
+
trampCall( callProcedure( '__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91710', '_failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91710',
|
1429
1429
|
begin
|
1430
|
-
trampCall(
|
1430
|
+
trampCall(__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91710)
|
1431
1431
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
1432
1432
|
end ,
|
1433
1433
|
[
|
@@ -1438,7 +1438,7 @@ trampCall(
|
|
1438
1438
|
} ; ___lambda.call(
|
1439
1439
|
Proc.new { ||
|
1440
1440
|
begin
|
1441
|
-
___lambda = lambda { |
|
1441
|
+
___lambda = lambda { |__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91711|
|
1442
1442
|
if (
|
1443
1443
|
if (
|
1444
1444
|
begin
|
@@ -1481,7 +1481,7 @@ trampCall(
|
|
1481
1481
|
end
|
1482
1482
|
) then
|
1483
1483
|
begin
|
1484
|
-
___lambda = lambda { |
|
1484
|
+
___lambda = lambda { |__w__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91713|
|
1485
1485
|
begin
|
1486
1486
|
begin
|
1487
1487
|
___lambda = lambda { |_a|
|
@@ -1505,7 +1505,7 @@ trampCall(
|
|
1505
1505
|
end
|
1506
1506
|
end
|
1507
1507
|
} ; ___lambda.call(
|
1508
|
-
|
1508
|
+
__w__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91713
|
1509
1509
|
)
|
1510
1510
|
end
|
1511
1511
|
end
|
@@ -1524,9 +1524,9 @@ trampCall(
|
|
1524
1524
|
else
|
1525
1525
|
begin
|
1526
1526
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
1527
|
-
trampCall( callProcedure( '
|
1527
|
+
trampCall( callProcedure( '__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91711', '_failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91711',
|
1528
1528
|
begin
|
1529
|
-
trampCall(
|
1529
|
+
trampCall(__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91711)
|
1530
1530
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
1531
1531
|
end ,
|
1532
1532
|
[
|
@@ -1537,7 +1537,7 @@ trampCall(
|
|
1537
1537
|
} ; ___lambda.call(
|
1538
1538
|
Proc.new { ||
|
1539
1539
|
begin
|
1540
|
-
___lambda = lambda { |
|
1540
|
+
___lambda = lambda { |__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91712|
|
1541
1541
|
begin
|
1542
1542
|
if (
|
1543
1543
|
begin
|
@@ -1551,7 +1551,7 @@ trampCall(
|
|
1551
1551
|
end
|
1552
1552
|
) then
|
1553
1553
|
begin
|
1554
|
-
___lambda = lambda { |
|
1554
|
+
___lambda = lambda { |__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91781,__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91782|
|
1555
1555
|
begin
|
1556
1556
|
begin
|
1557
1557
|
___lambda = lambda { |_a|
|
@@ -1567,7 +1567,7 @@ trampCall(
|
|
1567
1567
|
begin
|
1568
1568
|
embedBacktraceInfo( "", 1 );
|
1569
1569
|
_pair_QUMARK(
|
1570
|
-
|
1570
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91782
|
1571
1571
|
)
|
1572
1572
|
end
|
1573
1573
|
)
|
@@ -1581,7 +1581,7 @@ trampCall(
|
|
1581
1581
|
begin
|
1582
1582
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 75 );
|
1583
1583
|
_cdr(
|
1584
|
-
|
1584
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91782
|
1585
1585
|
)
|
1586
1586
|
end
|
1587
1587
|
)
|
@@ -1591,7 +1591,7 @@ trampCall(
|
|
1591
1591
|
end
|
1592
1592
|
) then
|
1593
1593
|
begin
|
1594
|
-
___lambda = lambda { |
|
1594
|
+
___lambda = lambda { |__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91846|
|
1595
1595
|
begin
|
1596
1596
|
begin
|
1597
1597
|
___lambda = lambda { |_b|
|
@@ -1672,7 +1672,7 @@ trampCall(
|
|
1672
1672
|
end
|
1673
1673
|
end
|
1674
1674
|
} ; ___lambda.call(
|
1675
|
-
|
1675
|
+
__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91846
|
1676
1676
|
)
|
1677
1677
|
end
|
1678
1678
|
end
|
@@ -1680,7 +1680,7 @@ trampCall(
|
|
1680
1680
|
begin
|
1681
1681
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 76 );
|
1682
1682
|
_car(
|
1683
|
-
|
1683
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91782
|
1684
1684
|
)
|
1685
1685
|
end
|
1686
1686
|
)
|
@@ -1688,9 +1688,9 @@ trampCall(
|
|
1688
1688
|
else
|
1689
1689
|
begin
|
1690
1690
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
1691
|
-
trampCall( callProcedure( '
|
1691
|
+
trampCall( callProcedure( '__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91712', '_failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91712',
|
1692
1692
|
begin
|
1693
|
-
trampCall(
|
1693
|
+
trampCall(__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91712)
|
1694
1694
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
1695
1695
|
end ,
|
1696
1696
|
[
|
@@ -1699,7 +1699,7 @@ trampCall(
|
|
1699
1699
|
end
|
1700
1700
|
end
|
1701
1701
|
} ; ___lambda.call(
|
1702
|
-
|
1702
|
+
__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91781
|
1703
1703
|
)
|
1704
1704
|
end
|
1705
1705
|
end
|
@@ -1727,9 +1727,9 @@ trampCall(
|
|
1727
1727
|
else
|
1728
1728
|
begin
|
1729
1729
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
1730
|
-
trampCall( callProcedure( '
|
1730
|
+
trampCall( callProcedure( '__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91712', '_failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91712',
|
1731
1731
|
begin
|
1732
|
-
trampCall(
|
1732
|
+
trampCall(__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91712)
|
1733
1733
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
1734
1734
|
end ,
|
1735
1735
|
[
|
@@ -1741,7 +1741,7 @@ trampCall(
|
|
1741
1741
|
} ; ___lambda.call(
|
1742
1742
|
Proc.new { ||
|
1743
1743
|
begin
|
1744
|
-
___lambda = lambda { |
|
1744
|
+
___lambda = lambda { |__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91714|
|
1745
1745
|
begin
|
1746
1746
|
begin
|
1747
1747
|
___lambda = lambda { |_else|
|
@@ -2032,7 +2032,7 @@ trampCall(
|
|
2032
2032
|
begin raise RuntimeError,
|
2033
2033
|
"Error: match: no matching pattern"
|
2034
2034
|
rescue => __e
|
2035
|
-
__e.set_backtrace( [":
|
2035
|
+
__e.set_backtrace( ["./lib/nendo/experimental.nnd:168"] + __e.backtrace )
|
2036
2036
|
raise __e
|
2037
2037
|
end
|
2038
2038
|
}
|
@@ -2728,7 +2728,7 @@ trampCall(
|
|
2728
2728
|
trampCall(
|
2729
2729
|
Proc.new { |_proc,_set|
|
2730
2730
|
begin
|
2731
|
-
___lambda = lambda { |
|
2731
|
+
___lambda = lambda { |__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91877|
|
2732
2732
|
if (
|
2733
2733
|
begin
|
2734
2734
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 70 );
|
@@ -2746,9 +2746,9 @@ trampCall(
|
|
2746
2746
|
else
|
2747
2747
|
begin
|
2748
2748
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
2749
|
-
delayCall( '
|
2749
|
+
delayCall( '__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91877', '_failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91877',
|
2750
2750
|
begin
|
2751
|
-
trampCall(
|
2751
|
+
trampCall(__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91877)
|
2752
2752
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
2753
2753
|
end ,
|
2754
2754
|
[
|
@@ -2759,7 +2759,7 @@ trampCall(
|
|
2759
2759
|
} ; ___lambda.call(
|
2760
2760
|
Proc.new { ||
|
2761
2761
|
begin
|
2762
|
-
___lambda = lambda { |
|
2762
|
+
___lambda = lambda { |__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91878|
|
2763
2763
|
if (
|
2764
2764
|
if (
|
2765
2765
|
begin
|
@@ -2802,7 +2802,7 @@ trampCall(
|
|
2802
2802
|
end
|
2803
2803
|
) then
|
2804
2804
|
begin
|
2805
|
-
___lambda = lambda { |
|
2805
|
+
___lambda = lambda { |__w__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91880|
|
2806
2806
|
begin
|
2807
2807
|
begin
|
2808
2808
|
___lambda = lambda { |_x|
|
@@ -2824,7 +2824,7 @@ trampCall(
|
|
2824
2824
|
end
|
2825
2825
|
end
|
2826
2826
|
} ; ___lambda.call(
|
2827
|
-
|
2827
|
+
__w__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91880
|
2828
2828
|
)
|
2829
2829
|
end
|
2830
2830
|
end
|
@@ -2843,9 +2843,9 @@ trampCall(
|
|
2843
2843
|
else
|
2844
2844
|
begin
|
2845
2845
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
2846
|
-
delayCall( '
|
2846
|
+
delayCall( '__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91878', '_failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91878',
|
2847
2847
|
begin
|
2848
|
-
trampCall(
|
2848
|
+
trampCall(__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91878)
|
2849
2849
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
2850
2850
|
end ,
|
2851
2851
|
[
|
@@ -2856,7 +2856,7 @@ trampCall(
|
|
2856
2856
|
} ; ___lambda.call(
|
2857
2857
|
Proc.new { ||
|
2858
2858
|
begin
|
2859
|
-
___lambda = lambda { |
|
2859
|
+
___lambda = lambda { |__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91879|
|
2860
2860
|
begin
|
2861
2861
|
if (
|
2862
2862
|
begin
|
@@ -2870,7 +2870,7 @@ trampCall(
|
|
2870
2870
|
end
|
2871
2871
|
) then
|
2872
2872
|
begin
|
2873
|
-
___lambda = lambda { |
|
2873
|
+
___lambda = lambda { |__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91949,__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91950|
|
2874
2874
|
begin
|
2875
2875
|
begin
|
2876
2876
|
___lambda = lambda { |_x1|
|
@@ -2886,7 +2886,7 @@ trampCall(
|
|
2886
2886
|
begin
|
2887
2887
|
embedBacktraceInfo( "", 1 );
|
2888
2888
|
_pair_QUMARK(
|
2889
|
-
|
2889
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91950
|
2890
2890
|
)
|
2891
2891
|
end
|
2892
2892
|
)
|
@@ -2900,7 +2900,7 @@ trampCall(
|
|
2900
2900
|
begin
|
2901
2901
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 75 );
|
2902
2902
|
_cdr(
|
2903
|
-
|
2903
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91950
|
2904
2904
|
)
|
2905
2905
|
end
|
2906
2906
|
)
|
@@ -2910,7 +2910,7 @@ trampCall(
|
|
2910
2910
|
end
|
2911
2911
|
) then
|
2912
2912
|
begin
|
2913
|
-
___lambda = lambda { |
|
2913
|
+
___lambda = lambda { |__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92093|
|
2914
2914
|
begin
|
2915
2915
|
begin
|
2916
2916
|
___lambda = lambda { |_x2|
|
@@ -2977,7 +2977,7 @@ trampCall(
|
|
2977
2977
|
end
|
2978
2978
|
end
|
2979
2979
|
} ; ___lambda.call(
|
2980
|
-
|
2980
|
+
__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92093
|
2981
2981
|
)
|
2982
2982
|
end
|
2983
2983
|
end
|
@@ -2985,7 +2985,7 @@ trampCall(
|
|
2985
2985
|
begin
|
2986
2986
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 76 );
|
2987
2987
|
_car(
|
2988
|
-
|
2988
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91950
|
2989
2989
|
)
|
2990
2990
|
end
|
2991
2991
|
)
|
@@ -2993,9 +2993,9 @@ trampCall(
|
|
2993
2993
|
else
|
2994
2994
|
begin
|
2995
2995
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
2996
|
-
delayCall( '
|
2996
|
+
delayCall( '__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91879', '_failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91879',
|
2997
2997
|
begin
|
2998
|
-
trampCall(
|
2998
|
+
trampCall(__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91879)
|
2999
2999
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
3000
3000
|
end ,
|
3001
3001
|
[
|
@@ -3004,7 +3004,7 @@ trampCall(
|
|
3004
3004
|
end
|
3005
3005
|
end
|
3006
3006
|
} ; ___lambda.call(
|
3007
|
-
|
3007
|
+
__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91949
|
3008
3008
|
)
|
3009
3009
|
end
|
3010
3010
|
end
|
@@ -3032,9 +3032,9 @@ trampCall(
|
|
3032
3032
|
else
|
3033
3033
|
begin
|
3034
3034
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
3035
|
-
delayCall( '
|
3035
|
+
delayCall( '__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91879', '_failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91879',
|
3036
3036
|
begin
|
3037
|
-
trampCall(
|
3037
|
+
trampCall(__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91879)
|
3038
3038
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
3039
3039
|
end ,
|
3040
3040
|
[
|
@@ -3046,7 +3046,7 @@ trampCall(
|
|
3046
3046
|
} ; ___lambda.call(
|
3047
3047
|
Proc.new { ||
|
3048
3048
|
begin
|
3049
|
-
___lambda = lambda { |
|
3049
|
+
___lambda = lambda { |__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91881|
|
3050
3050
|
begin
|
3051
3051
|
if (
|
3052
3052
|
begin
|
@@ -3060,7 +3060,7 @@ trampCall(
|
|
3060
3060
|
end
|
3061
3061
|
) then
|
3062
3062
|
begin
|
3063
|
-
___lambda = lambda { |
|
3063
|
+
___lambda = lambda { |__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91988,__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91989|
|
3064
3064
|
begin
|
3065
3065
|
begin
|
3066
3066
|
___lambda = lambda { |_x1|
|
@@ -3069,12 +3069,12 @@ trampCall(
|
|
3069
3069
|
begin
|
3070
3070
|
embedBacktraceInfo( "", 1 );
|
3071
3071
|
_pair_QUMARK(
|
3072
|
-
|
3072
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91989
|
3073
3073
|
)
|
3074
3074
|
end
|
3075
3075
|
) then
|
3076
3076
|
begin
|
3077
|
-
___lambda = lambda { |
|
3077
|
+
___lambda = lambda { |__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92215,__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92216|
|
3078
3078
|
begin
|
3079
3079
|
begin
|
3080
3080
|
___lambda = lambda { |_x2|
|
@@ -3090,7 +3090,7 @@ trampCall(
|
|
3090
3090
|
begin
|
3091
3091
|
embedBacktraceInfo( "", 1 );
|
3092
3092
|
_pair_QUMARK(
|
3093
|
-
|
3093
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92216
|
3094
3094
|
)
|
3095
3095
|
end
|
3096
3096
|
)
|
@@ -3104,7 +3104,7 @@ trampCall(
|
|
3104
3104
|
begin
|
3105
3105
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 75 );
|
3106
3106
|
_cdr(
|
3107
|
-
|
3107
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92216
|
3108
3108
|
)
|
3109
3109
|
end
|
3110
3110
|
)
|
@@ -3114,7 +3114,7 @@ trampCall(
|
|
3114
3114
|
end
|
3115
3115
|
) then
|
3116
3116
|
begin
|
3117
|
-
___lambda = lambda { |
|
3117
|
+
___lambda = lambda { |__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92315|
|
3118
3118
|
begin
|
3119
3119
|
begin
|
3120
3120
|
___lambda = lambda { |_x3|
|
@@ -3150,7 +3150,7 @@ trampCall(
|
|
3150
3150
|
end
|
3151
3151
|
end
|
3152
3152
|
} ; ___lambda.call(
|
3153
|
-
|
3153
|
+
__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92315
|
3154
3154
|
)
|
3155
3155
|
end
|
3156
3156
|
end
|
@@ -3158,7 +3158,7 @@ trampCall(
|
|
3158
3158
|
begin
|
3159
3159
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 76 );
|
3160
3160
|
_car(
|
3161
|
-
|
3161
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92216
|
3162
3162
|
)
|
3163
3163
|
end
|
3164
3164
|
)
|
@@ -3166,9 +3166,9 @@ trampCall(
|
|
3166
3166
|
else
|
3167
3167
|
begin
|
3168
3168
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
3169
|
-
delayCall( '
|
3169
|
+
delayCall( '__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91881', '_failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91881',
|
3170
3170
|
begin
|
3171
|
-
trampCall(
|
3171
|
+
trampCall(__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91881)
|
3172
3172
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
3173
3173
|
end ,
|
3174
3174
|
[
|
@@ -3177,7 +3177,7 @@ trampCall(
|
|
3177
3177
|
end
|
3178
3178
|
end
|
3179
3179
|
} ; ___lambda.call(
|
3180
|
-
|
3180
|
+
__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92215
|
3181
3181
|
)
|
3182
3182
|
end
|
3183
3183
|
end
|
@@ -3185,13 +3185,13 @@ trampCall(
|
|
3185
3185
|
begin
|
3186
3186
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 76 );
|
3187
3187
|
_car(
|
3188
|
-
|
3188
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91989
|
3189
3189
|
)
|
3190
3190
|
end ,
|
3191
3191
|
begin
|
3192
3192
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 75 );
|
3193
3193
|
_cdr(
|
3194
|
-
|
3194
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91989
|
3195
3195
|
)
|
3196
3196
|
end
|
3197
3197
|
)
|
@@ -3199,9 +3199,9 @@ trampCall(
|
|
3199
3199
|
else
|
3200
3200
|
begin
|
3201
3201
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
3202
|
-
delayCall( '
|
3202
|
+
delayCall( '__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91881', '_failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91881',
|
3203
3203
|
begin
|
3204
|
-
trampCall(
|
3204
|
+
trampCall(__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91881)
|
3205
3205
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
3206
3206
|
end ,
|
3207
3207
|
[
|
@@ -3211,7 +3211,7 @@ trampCall(
|
|
3211
3211
|
end
|
3212
3212
|
end
|
3213
3213
|
} ; ___lambda.call(
|
3214
|
-
|
3214
|
+
__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91988
|
3215
3215
|
)
|
3216
3216
|
end
|
3217
3217
|
end
|
@@ -3239,9 +3239,9 @@ trampCall(
|
|
3239
3239
|
else
|
3240
3240
|
begin
|
3241
3241
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
3242
|
-
delayCall( '
|
3242
|
+
delayCall( '__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91881', '_failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91881',
|
3243
3243
|
begin
|
3244
|
-
trampCall(
|
3244
|
+
trampCall(__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_91881)
|
3245
3245
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
3246
3246
|
end ,
|
3247
3247
|
[
|
@@ -3253,7 +3253,7 @@ trampCall(
|
|
3253
3253
|
} ; ___lambda.call(
|
3254
3254
|
Proc.new { ||
|
3255
3255
|
begin
|
3256
|
-
___lambda = lambda { |
|
3256
|
+
___lambda = lambda { |__failure__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91948|
|
3257
3257
|
begin
|
3258
3258
|
if (
|
3259
3259
|
begin
|
@@ -3267,7 +3267,7 @@ trampCall(
|
|
3267
3267
|
end
|
3268
3268
|
) then
|
3269
3269
|
begin
|
3270
|
-
___lambda = lambda { |
|
3270
|
+
___lambda = lambda { |__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92056,__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92057|
|
3271
3271
|
begin
|
3272
3272
|
begin
|
3273
3273
|
___lambda = lambda { |_x1|
|
@@ -3276,12 +3276,12 @@ trampCall(
|
|
3276
3276
|
begin
|
3277
3277
|
embedBacktraceInfo( "", 1 );
|
3278
3278
|
_pair_QUMARK(
|
3279
|
-
|
3279
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92057
|
3280
3280
|
)
|
3281
3281
|
end
|
3282
3282
|
) then
|
3283
3283
|
begin
|
3284
|
-
___lambda = lambda { |
|
3284
|
+
___lambda = lambda { |__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92253,__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92254|
|
3285
3285
|
begin
|
3286
3286
|
begin
|
3287
3287
|
___lambda = lambda { |_x2|
|
@@ -3290,12 +3290,12 @@ trampCall(
|
|
3290
3290
|
begin
|
3291
3291
|
embedBacktraceInfo( "", 1 );
|
3292
3292
|
_pair_QUMARK(
|
3293
|
-
|
3293
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92254
|
3294
3294
|
)
|
3295
3295
|
end
|
3296
3296
|
) then
|
3297
3297
|
begin
|
3298
|
-
___lambda = lambda { |
|
3298
|
+
___lambda = lambda { |__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92382,__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92383|
|
3299
3299
|
begin
|
3300
3300
|
begin
|
3301
3301
|
___lambda = lambda { |_x3|
|
@@ -3311,7 +3311,7 @@ trampCall(
|
|
3311
3311
|
begin
|
3312
3312
|
embedBacktraceInfo( "", 1 );
|
3313
3313
|
_pair_QUMARK(
|
3314
|
-
|
3314
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92383
|
3315
3315
|
)
|
3316
3316
|
end
|
3317
3317
|
)
|
@@ -3325,7 +3325,7 @@ trampCall(
|
|
3325
3325
|
begin
|
3326
3326
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 75 );
|
3327
3327
|
_cdr(
|
3328
|
-
|
3328
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92383
|
3329
3329
|
)
|
3330
3330
|
end
|
3331
3331
|
)
|
@@ -3335,7 +3335,7 @@ trampCall(
|
|
3335
3335
|
end
|
3336
3336
|
) then
|
3337
3337
|
begin
|
3338
|
-
___lambda = lambda { |
|
3338
|
+
___lambda = lambda { |__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92414|
|
3339
3339
|
begin
|
3340
3340
|
begin
|
3341
3341
|
___lambda = lambda { |_x4|
|
@@ -3375,7 +3375,7 @@ trampCall(
|
|
3375
3375
|
end
|
3376
3376
|
end
|
3377
3377
|
} ; ___lambda.call(
|
3378
|
-
|
3378
|
+
__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92414
|
3379
3379
|
)
|
3380
3380
|
end
|
3381
3381
|
end
|
@@ -3383,7 +3383,7 @@ trampCall(
|
|
3383
3383
|
begin
|
3384
3384
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 76 );
|
3385
3385
|
_car(
|
3386
|
-
|
3386
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92383
|
3387
3387
|
)
|
3388
3388
|
end
|
3389
3389
|
)
|
@@ -3391,9 +3391,9 @@ trampCall(
|
|
3391
3391
|
else
|
3392
3392
|
begin
|
3393
3393
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
3394
|
-
delayCall( '
|
3394
|
+
delayCall( '__failure__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91948', '_failure__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91948',
|
3395
3395
|
begin
|
3396
|
-
trampCall(
|
3396
|
+
trampCall(__failure__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91948)
|
3397
3397
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
3398
3398
|
end ,
|
3399
3399
|
[
|
@@ -3402,7 +3402,7 @@ trampCall(
|
|
3402
3402
|
end
|
3403
3403
|
end
|
3404
3404
|
} ; ___lambda.call(
|
3405
|
-
|
3405
|
+
__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92382
|
3406
3406
|
)
|
3407
3407
|
end
|
3408
3408
|
end
|
@@ -3410,13 +3410,13 @@ trampCall(
|
|
3410
3410
|
begin
|
3411
3411
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 76 );
|
3412
3412
|
_car(
|
3413
|
-
|
3413
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92254
|
3414
3414
|
)
|
3415
3415
|
end ,
|
3416
3416
|
begin
|
3417
3417
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 75 );
|
3418
3418
|
_cdr(
|
3419
|
-
|
3419
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92254
|
3420
3420
|
)
|
3421
3421
|
end
|
3422
3422
|
)
|
@@ -3424,9 +3424,9 @@ trampCall(
|
|
3424
3424
|
else
|
3425
3425
|
begin
|
3426
3426
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
3427
|
-
delayCall( '
|
3427
|
+
delayCall( '__failure__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91948', '_failure__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91948',
|
3428
3428
|
begin
|
3429
|
-
trampCall(
|
3429
|
+
trampCall(__failure__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91948)
|
3430
3430
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
3431
3431
|
end ,
|
3432
3432
|
[
|
@@ -3436,7 +3436,7 @@ trampCall(
|
|
3436
3436
|
end
|
3437
3437
|
end
|
3438
3438
|
} ; ___lambda.call(
|
3439
|
-
|
3439
|
+
__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92253
|
3440
3440
|
)
|
3441
3441
|
end
|
3442
3442
|
end
|
@@ -3444,13 +3444,13 @@ trampCall(
|
|
3444
3444
|
begin
|
3445
3445
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 76 );
|
3446
3446
|
_car(
|
3447
|
-
|
3447
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92057
|
3448
3448
|
)
|
3449
3449
|
end ,
|
3450
3450
|
begin
|
3451
3451
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 75 );
|
3452
3452
|
_cdr(
|
3453
|
-
|
3453
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92057
|
3454
3454
|
)
|
3455
3455
|
end
|
3456
3456
|
)
|
@@ -3458,9 +3458,9 @@ trampCall(
|
|
3458
3458
|
else
|
3459
3459
|
begin
|
3460
3460
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
3461
|
-
delayCall( '
|
3461
|
+
delayCall( '__failure__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91948', '_failure__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91948',
|
3462
3462
|
begin
|
3463
|
-
trampCall(
|
3463
|
+
trampCall(__failure__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91948)
|
3464
3464
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
3465
3465
|
end ,
|
3466
3466
|
[
|
@@ -3470,7 +3470,7 @@ trampCall(
|
|
3470
3470
|
end
|
3471
3471
|
end
|
3472
3472
|
} ; ___lambda.call(
|
3473
|
-
|
3473
|
+
__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92056
|
3474
3474
|
)
|
3475
3475
|
end
|
3476
3476
|
end
|
@@ -3498,9 +3498,9 @@ trampCall(
|
|
3498
3498
|
else
|
3499
3499
|
begin
|
3500
3500
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
3501
|
-
delayCall( '
|
3501
|
+
delayCall( '__failure__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91948', '_failure__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91948',
|
3502
3502
|
begin
|
3503
|
-
trampCall(
|
3503
|
+
trampCall(__failure__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91948)
|
3504
3504
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
3505
3505
|
end ,
|
3506
3506
|
[
|
@@ -3512,7 +3512,7 @@ trampCall(
|
|
3512
3512
|
} ; ___lambda.call(
|
3513
3513
|
Proc.new { ||
|
3514
3514
|
begin
|
3515
|
-
___lambda = lambda { |
|
3515
|
+
___lambda = lambda { |__failure__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_91987|
|
3516
3516
|
begin
|
3517
3517
|
begin
|
3518
3518
|
___lambda = lambda { |_else|
|
@@ -3561,7 +3561,7 @@ trampCall(
|
|
3561
3561
|
begin raise RuntimeError,
|
3562
3562
|
"Error: match: no matching pattern"
|
3563
3563
|
rescue => __e
|
3564
|
-
__e.set_backtrace( [":
|
3564
|
+
__e.set_backtrace( ["./lib/nendo/experimental.nnd:168"] + __e.backtrace )
|
3565
3565
|
raise __e
|
3566
3566
|
end
|
3567
3567
|
}
|
@@ -3594,7 +3594,7 @@ trampCall(
|
|
3594
3594
|
@global_lisp_binding['_permutations_ASMARK_MIMARKfor_MIMARKeach'] = self.method( :_permutations_ASMARK_MIMARKfor_MIMARKeach_METHOD )
|
3595
3595
|
@_permutations_ASMARK_MIMARKfor_MIMARKeach =
|
3596
3596
|
trampCall(
|
3597
|
-
Proc.new { |_proc,_set,*__rest__|
|
3597
|
+
Proc.new { |_proc,_set,*__rest__| ___gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92445 = __rest__[0] ;
|
3598
3598
|
begin
|
3599
3599
|
___lambda = lambda { |_eq|
|
3600
3600
|
if (
|
@@ -3606,7 +3606,7 @@ trampCall(
|
|
3606
3606
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 110 );
|
3607
3607
|
_length(
|
3608
3608
|
begin
|
3609
|
-
trampCall(
|
3609
|
+
trampCall(___gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92445)
|
3610
3610
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
3611
3611
|
end
|
3612
3612
|
)
|
@@ -3631,7 +3631,7 @@ trampCall(
|
|
3631
3631
|
[
|
3632
3632
|
0 ,
|
3633
3633
|
begin
|
3634
|
-
trampCall(
|
3634
|
+
trampCall(___gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92445)
|
3635
3635
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
3636
3636
|
end
|
3637
3637
|
]
|
@@ -3648,7 +3648,7 @@ trampCall(
|
|
3648
3648
|
trampCall(
|
3649
3649
|
Proc.new { |_proc,_set|
|
3650
3650
|
begin
|
3651
|
-
___lambda = lambda { |
|
3651
|
+
___lambda = lambda { |__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92446|
|
3652
3652
|
if (
|
3653
3653
|
begin
|
3654
3654
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 123 );
|
@@ -3666,9 +3666,9 @@ trampCall(
|
|
3666
3666
|
else
|
3667
3667
|
begin
|
3668
3668
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
3669
|
-
trampCall( callProcedure( '
|
3669
|
+
trampCall( callProcedure( '__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92446', '_failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92446',
|
3670
3670
|
begin
|
3671
|
-
trampCall(
|
3671
|
+
trampCall(__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92446)
|
3672
3672
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
3673
3673
|
end ,
|
3674
3674
|
[
|
@@ -3679,7 +3679,7 @@ trampCall(
|
|
3679
3679
|
} ; ___lambda.call(
|
3680
3680
|
Proc.new { ||
|
3681
3681
|
begin
|
3682
|
-
___lambda = lambda { |
|
3682
|
+
___lambda = lambda { |__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92447|
|
3683
3683
|
if (
|
3684
3684
|
if (
|
3685
3685
|
begin
|
@@ -3722,7 +3722,7 @@ trampCall(
|
|
3722
3722
|
end
|
3723
3723
|
) then
|
3724
3724
|
begin
|
3725
|
-
___lambda = lambda { |
|
3725
|
+
___lambda = lambda { |__w__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92449|
|
3726
3726
|
begin
|
3727
3727
|
begin
|
3728
3728
|
___lambda = lambda { |_a|
|
@@ -3744,7 +3744,7 @@ trampCall(
|
|
3744
3744
|
end
|
3745
3745
|
end
|
3746
3746
|
} ; ___lambda.call(
|
3747
|
-
|
3747
|
+
__w__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92449
|
3748
3748
|
)
|
3749
3749
|
end
|
3750
3750
|
end
|
@@ -3763,9 +3763,9 @@ trampCall(
|
|
3763
3763
|
else
|
3764
3764
|
begin
|
3765
3765
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
3766
|
-
trampCall( callProcedure( '
|
3766
|
+
trampCall( callProcedure( '__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92447', '_failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92447',
|
3767
3767
|
begin
|
3768
|
-
trampCall(
|
3768
|
+
trampCall(__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92447)
|
3769
3769
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
3770
3770
|
end ,
|
3771
3771
|
[
|
@@ -3776,7 +3776,7 @@ trampCall(
|
|
3776
3776
|
} ; ___lambda.call(
|
3777
3777
|
Proc.new { ||
|
3778
3778
|
begin
|
3779
|
-
___lambda = lambda { |
|
3779
|
+
___lambda = lambda { |__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92448|
|
3780
3780
|
begin
|
3781
3781
|
if (
|
3782
3782
|
begin
|
@@ -3790,7 +3790,7 @@ trampCall(
|
|
3790
3790
|
end
|
3791
3791
|
) then
|
3792
3792
|
begin
|
3793
|
-
___lambda = lambda { |
|
3793
|
+
___lambda = lambda { |__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92517,__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92518|
|
3794
3794
|
begin
|
3795
3795
|
begin
|
3796
3796
|
___lambda = lambda { |_a|
|
@@ -3806,7 +3806,7 @@ trampCall(
|
|
3806
3806
|
begin
|
3807
3807
|
embedBacktraceInfo( "", 1 );
|
3808
3808
|
_pair_QUMARK(
|
3809
|
-
|
3809
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92518
|
3810
3810
|
)
|
3811
3811
|
end
|
3812
3812
|
)
|
@@ -3820,7 +3820,7 @@ trampCall(
|
|
3820
3820
|
begin
|
3821
3821
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 127 );
|
3822
3822
|
_cdr(
|
3823
|
-
|
3823
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92518
|
3824
3824
|
)
|
3825
3825
|
end
|
3826
3826
|
)
|
@@ -3830,7 +3830,7 @@ trampCall(
|
|
3830
3830
|
end
|
3831
3831
|
) then
|
3832
3832
|
begin
|
3833
|
-
___lambda = lambda { |
|
3833
|
+
___lambda = lambda { |__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92582|
|
3834
3834
|
begin
|
3835
3835
|
begin
|
3836
3836
|
___lambda = lambda { |_b|
|
@@ -3930,7 +3930,7 @@ trampCall(
|
|
3930
3930
|
end
|
3931
3931
|
end
|
3932
3932
|
} ; ___lambda.call(
|
3933
|
-
|
3933
|
+
__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92582
|
3934
3934
|
)
|
3935
3935
|
end
|
3936
3936
|
end
|
@@ -3938,7 +3938,7 @@ trampCall(
|
|
3938
3938
|
begin
|
3939
3939
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 127 );
|
3940
3940
|
_car(
|
3941
|
-
|
3941
|
+
__x__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92518
|
3942
3942
|
)
|
3943
3943
|
end
|
3944
3944
|
)
|
@@ -3946,9 +3946,9 @@ trampCall(
|
|
3946
3946
|
else
|
3947
3947
|
begin
|
3948
3948
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
3949
|
-
trampCall( callProcedure( '
|
3949
|
+
trampCall( callProcedure( '__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92448', '_failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92448',
|
3950
3950
|
begin
|
3951
|
-
trampCall(
|
3951
|
+
trampCall(__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92448)
|
3952
3952
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
3953
3953
|
end ,
|
3954
3954
|
[
|
@@ -3957,7 +3957,7 @@ trampCall(
|
|
3957
3957
|
end
|
3958
3958
|
end
|
3959
3959
|
} ; ___lambda.call(
|
3960
|
-
|
3960
|
+
__w__gensym__16b2635cc60d2744f1ec64942b9115d129949ee3_92517
|
3961
3961
|
)
|
3962
3962
|
end
|
3963
3963
|
end
|
@@ -3985,9 +3985,9 @@ trampCall(
|
|
3985
3985
|
else
|
3986
3986
|
begin
|
3987
3987
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
3988
|
-
trampCall( callProcedure( '
|
3988
|
+
trampCall( callProcedure( '__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92448', '_failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92448',
|
3989
3989
|
begin
|
3990
|
-
trampCall(
|
3990
|
+
trampCall(__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92448)
|
3991
3991
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
3992
3992
|
end ,
|
3993
3993
|
[
|
@@ -3999,7 +3999,7 @@ trampCall(
|
|
3999
3999
|
} ; ___lambda.call(
|
4000
4000
|
Proc.new { ||
|
4001
4001
|
begin
|
4002
|
-
___lambda = lambda { |
|
4002
|
+
___lambda = lambda { |__failure__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92450|
|
4003
4003
|
begin
|
4004
4004
|
begin
|
4005
4005
|
___lambda = lambda { |_else|
|
@@ -4251,7 +4251,7 @@ trampCall(
|
|
4251
4251
|
begin raise RuntimeError,
|
4252
4252
|
"Error: match: no matching pattern"
|
4253
4253
|
rescue => __e
|
4254
|
-
__e.set_backtrace( [":
|
4254
|
+
__e.set_backtrace( ["./lib/nendo/experimental.nnd:168"] + __e.backtrace )
|
4255
4255
|
raise __e
|
4256
4256
|
end
|
4257
4257
|
}
|
@@ -4373,8 +4373,8 @@ trampCall(
|
|
4373
4373
|
end ,
|
4374
4374
|
[
|
4375
4375
|
begin
|
4376
|
-
___lambda = lambda { |
|
4377
|
-
Proc.new { |
|
4376
|
+
___lambda = lambda { |__tmp__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92615|
|
4377
|
+
Proc.new { |__tmp__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92616,__tmp__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92617|
|
4378
4378
|
begin
|
4379
4379
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 139 );
|
4380
4380
|
trampCall( self._acons_METHOD( 'acons',
|
@@ -4385,9 +4385,9 @@ trampCall(
|
|
4385
4385
|
rescue => __e ; __e.set_backtrace( ["./lib/util/combinations.nnd:139"] + __e.backtrace ) ; raise __e
|
4386
4386
|
end ,
|
4387
4387
|
[
|
4388
|
-
|
4389
|
-
|
4390
|
-
|
4388
|
+
__tmp__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92615 ,
|
4389
|
+
__tmp__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92616 ,
|
4390
|
+
__tmp__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92617
|
4391
4391
|
]
|
4392
4392
|
))
|
4393
4393
|
end
|
@@ -4465,7 +4465,7 @@ trampCall(
|
|
4465
4465
|
@global_lisp_binding['_combinations_ASMARK'] = self.method( :_combinations_ASMARK_METHOD )
|
4466
4466
|
@_combinations_ASMARK =
|
4467
4467
|
trampCall(
|
4468
|
-
Proc.new { |_set,_n,*__rest__|
|
4468
|
+
Proc.new { |_set,_n,*__rest__| ___gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92618 = __rest__[0] ;
|
4469
4469
|
begin
|
4470
4470
|
___lambda = lambda { |_eq|
|
4471
4471
|
if (
|
@@ -4477,7 +4477,7 @@ trampCall(
|
|
4477
4477
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 110 );
|
4478
4478
|
_length(
|
4479
4479
|
begin
|
4480
|
-
trampCall(
|
4480
|
+
trampCall(___gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92618)
|
4481
4481
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
4482
4482
|
end
|
4483
4483
|
)
|
@@ -4502,7 +4502,7 @@ trampCall(
|
|
4502
4502
|
[
|
4503
4503
|
0 ,
|
4504
4504
|
begin
|
4505
|
-
trampCall(
|
4505
|
+
trampCall(___gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92618)
|
4506
4506
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
4507
4507
|
end
|
4508
4508
|
]
|
@@ -4705,8 +4705,8 @@ trampCall(
|
|
4705
4705
|
end ,
|
4706
4706
|
[
|
4707
4707
|
begin
|
4708
|
-
___lambda = lambda { |
|
4709
|
-
Proc.new { |
|
4708
|
+
___lambda = lambda { |__tmp__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92622|
|
4709
|
+
Proc.new { |__tmp__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92623,__tmp__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92624|
|
4710
4710
|
begin
|
4711
4711
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 157 );
|
4712
4712
|
trampCall( self._acons_METHOD( 'acons',
|
@@ -4717,9 +4717,9 @@ trampCall(
|
|
4717
4717
|
rescue => __e ; __e.set_backtrace( ["./lib/util/combinations.nnd:157"] + __e.backtrace ) ; raise __e
|
4718
4718
|
end ,
|
4719
4719
|
[
|
4720
|
-
|
4721
|
-
|
4722
|
-
|
4720
|
+
__tmp__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92622 ,
|
4721
|
+
__tmp__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92623 ,
|
4722
|
+
__tmp__gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92624
|
4723
4723
|
]
|
4724
4724
|
))
|
4725
4725
|
end
|
@@ -5006,7 +5006,7 @@ trampCall(
|
|
5006
5006
|
@global_lisp_binding['_combinations_ASMARK_MIMARKfor_MIMARKeach'] = self.method( :_combinations_ASMARK_MIMARKfor_MIMARKeach_METHOD )
|
5007
5007
|
@_combinations_ASMARK_MIMARKfor_MIMARKeach =
|
5008
5008
|
trampCall(
|
5009
|
-
Proc.new { |_proc,_set,_n,*__rest__|
|
5009
|
+
Proc.new { |_proc,_set,_n,*__rest__| ___gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92625 = __rest__[0] ;
|
5010
5010
|
begin
|
5011
5011
|
___lambda = lambda { |_eq|
|
5012
5012
|
if (
|
@@ -5018,7 +5018,7 @@ trampCall(
|
|
5018
5018
|
embedBacktraceInfo( "./lib/util/combinations.nnd", 110 );
|
5019
5019
|
_length(
|
5020
5020
|
begin
|
5021
|
-
trampCall(
|
5021
|
+
trampCall(___gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92625)
|
5022
5022
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
5023
5023
|
end
|
5024
5024
|
)
|
@@ -5043,7 +5043,7 @@ trampCall(
|
|
5043
5043
|
[
|
5044
5044
|
0 ,
|
5045
5045
|
begin
|
5046
|
-
trampCall(
|
5046
|
+
trampCall(___gensym__b9d6aeda230459e5cf994edb81d822212fdcaf01_92625)
|
5047
5047
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
5048
5048
|
end
|
5049
5049
|
]
|