nendo 0.6.0 → 0.6.1
Sign up to get free protection for your applications and to get access to all the features.
- data/lib/init.nnd +18 -0
- data/lib/init.nndc +3458 -3078
- data/lib/nendo/experimental.nnd +23 -2
- data/lib/nendo/experimental.nndc +2122 -276
- data/lib/nendo/test.nndc +116 -4
- data/lib/rfc/json.nndc +6 -6
- data/lib/ruby/core.rb +1 -1
- data/lib/ruby/printer.rb +6 -0
- data/lib/ruby/types.rb +4 -1
- 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.nndc +294 -294
- data/lib/util/match.nndc +5551 -5551
- data/test/nendo_spec.rb +33 -0
- data/test/syntax_spec.rb +31 -7
- metadata +5 -5
data/lib/nendo/experimental.nnd
CHANGED
|
@@ -135,14 +135,15 @@
|
|
|
135
135
|
;; guard for Exceptions
|
|
136
136
|
(define-syntax %guard-var
|
|
137
137
|
(syntax-rules (=> ...)
|
|
138
|
-
((%guard-
|
|
138
|
+
((%guard-var (var clauses ...))
|
|
139
139
|
var)))
|
|
140
140
|
|
|
141
141
|
(define-syntax %guard-clause
|
|
142
142
|
(syntax-rules (=> ...)
|
|
143
143
|
((%guard-clause (var clauses ...))
|
|
144
144
|
(cond
|
|
145
|
-
clauses ...
|
|
145
|
+
clauses ...
|
|
146
|
+
(#t (raise var))))))
|
|
146
147
|
|
|
147
148
|
(define-syntax guard
|
|
148
149
|
(syntax-rules ()
|
|
@@ -176,3 +177,23 @@
|
|
|
176
177
|
cleanup))))))
|
|
177
178
|
|
|
178
179
|
|
|
180
|
+
;; syntax check enabled version of let1
|
|
181
|
+
(define nendo-syntax-error SyntaxError)
|
|
182
|
+
(define-syntax let1
|
|
183
|
+
(syntax-rules (%let)
|
|
184
|
+
((let1)
|
|
185
|
+
(raise nendo-syntax-error "let1 requires (let1 var expr body ...) form."))
|
|
186
|
+
((let1 var)
|
|
187
|
+
(raise nendo-syntax-error "let1 requires (let1 var expr body ...) form."))
|
|
188
|
+
((let1 var expr)
|
|
189
|
+
(raise nendo-syntax-error "let1 requires (let1 var expr body ...) form."))
|
|
190
|
+
((let1 (var) expr body ...)
|
|
191
|
+
(raise nendo-syntax-error "let1 requires (let1 var expr body ...) form."))
|
|
192
|
+
((let1 (var expr) body ...)
|
|
193
|
+
(raise nendo-syntax-error "let1 requires (let1 var expr body ...) form."))
|
|
194
|
+
((let1 ((var expr)) body ...)
|
|
195
|
+
(raise nendo-syntax-error "let1 requires (let1 var expr body ...) form."))
|
|
196
|
+
((let1 () body ...)
|
|
197
|
+
(raise nendo-syntax-error "let1 requires (let1 var expr body ...) form."))
|
|
198
|
+
((let1 var expr body ...)
|
|
199
|
+
(%let ((var expr)) body ...))))
|
data/lib/nendo/experimental.nndc
CHANGED
|
@@ -999,13 +999,13 @@ trampCall(
|
|
|
999
999
|
end
|
|
1000
1000
|
} ; ___lambda.call(
|
|
1001
1001
|
begin
|
|
1002
|
-
___lambda = lambda { |
|
|
1002
|
+
___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30162|
|
|
1003
1003
|
if (
|
|
1004
1004
|
begin
|
|
1005
1005
|
embedBacktraceInfo( "", 1 );
|
|
1006
1006
|
_null_QUMARK(
|
|
1007
1007
|
begin
|
|
1008
|
-
trampCall(
|
|
1008
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30162)
|
|
1009
1009
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
1010
1010
|
end
|
|
1011
1011
|
)
|
|
@@ -1024,7 +1024,7 @@ trampCall(
|
|
|
1024
1024
|
end ,
|
|
1025
1025
|
[
|
|
1026
1026
|
begin
|
|
1027
|
-
trampCall(
|
|
1027
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30162)
|
|
1028
1028
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
1029
1029
|
end
|
|
1030
1030
|
]
|
|
@@ -1080,69 +1080,69 @@ trampCall(
|
|
|
1080
1080
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
1081
1081
|
end ,
|
|
1082
1082
|
[
|
|
1083
|
-
Proc.new { |
|
|
1083
|
+
Proc.new { |__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30167,__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168,__compare__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30169|
|
|
1084
1084
|
begin
|
|
1085
|
-
___lambda = lambda { |
|
|
1085
|
+
___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30191|
|
|
1086
1086
|
if (
|
|
1087
1087
|
begin
|
|
1088
|
-
trampCall(
|
|
1088
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30191)
|
|
1089
1089
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
1090
1090
|
end
|
|
1091
1091
|
) then
|
|
1092
1092
|
begin
|
|
1093
|
-
trampCall(
|
|
1093
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30191)
|
|
1094
1094
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
1095
1095
|
end
|
|
1096
1096
|
else
|
|
1097
1097
|
begin
|
|
1098
|
-
___lambda = lambda { |
|
|
1098
|
+
___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30192|
|
|
1099
1099
|
if (
|
|
1100
1100
|
begin
|
|
1101
|
-
trampCall(
|
|
1101
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30192)
|
|
1102
1102
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
1103
1103
|
end
|
|
1104
1104
|
) then
|
|
1105
1105
|
begin
|
|
1106
|
-
trampCall(
|
|
1106
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30192)
|
|
1107
1107
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
1108
1108
|
end
|
|
1109
1109
|
else
|
|
1110
1110
|
begin
|
|
1111
|
-
___lambda = lambda { |
|
|
1111
|
+
___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30193|
|
|
1112
1112
|
if (
|
|
1113
1113
|
begin
|
|
1114
|
-
trampCall(
|
|
1114
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30193)
|
|
1115
1115
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
1116
1116
|
end
|
|
1117
1117
|
) then
|
|
1118
1118
|
begin
|
|
1119
|
-
trampCall(
|
|
1119
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30193)
|
|
1120
1120
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
1121
1121
|
end
|
|
1122
1122
|
else
|
|
1123
1123
|
begin
|
|
1124
|
-
___lambda = lambda { |
|
|
1124
|
+
___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30194|
|
|
1125
1125
|
if (
|
|
1126
1126
|
begin
|
|
1127
|
-
trampCall(
|
|
1127
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30194)
|
|
1128
1128
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
1129
1129
|
end
|
|
1130
1130
|
) then
|
|
1131
1131
|
begin
|
|
1132
|
-
trampCall(
|
|
1132
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30194)
|
|
1133
1133
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
1134
1134
|
end
|
|
1135
1135
|
else
|
|
1136
1136
|
begin
|
|
1137
|
-
___lambda = lambda { |
|
|
1137
|
+
___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30195|
|
|
1138
1138
|
if (
|
|
1139
1139
|
begin
|
|
1140
|
-
trampCall(
|
|
1140
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30195)
|
|
1141
1141
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
1142
1142
|
end
|
|
1143
1143
|
) then
|
|
1144
1144
|
begin
|
|
1145
|
-
trampCall(
|
|
1145
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30195)
|
|
1146
1146
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
1147
1147
|
end
|
|
1148
1148
|
else
|
|
@@ -1162,7 +1162,7 @@ trampCall(
|
|
|
1162
1162
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
1163
1163
|
end ,
|
|
1164
1164
|
[
|
|
1165
|
-
|
|
1165
|
+
__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30167
|
|
1166
1166
|
]
|
|
1167
1167
|
))
|
|
1168
1168
|
end
|
|
@@ -1176,7 +1176,7 @@ trampCall(
|
|
|
1176
1176
|
end
|
|
1177
1177
|
} ; ___lambda.call(
|
|
1178
1178
|
begin
|
|
1179
|
-
___lambda = lambda { |
|
|
1179
|
+
___lambda = lambda { |__v__10__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30184|
|
|
1180
1180
|
if (
|
|
1181
1181
|
begin
|
|
1182
1182
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
@@ -1188,7 +1188,7 @@ trampCall(
|
|
|
1188
1188
|
begin
|
|
1189
1189
|
embedBacktraceInfo( "", 1 );
|
|
1190
1190
|
_pair_QUMARK(
|
|
1191
|
-
|
|
1191
|
+
__v__10__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30184
|
|
1192
1192
|
)
|
|
1193
1193
|
end
|
|
1194
1194
|
)
|
|
@@ -1197,11 +1197,11 @@ trampCall(
|
|
|
1197
1197
|
end
|
|
1198
1198
|
) then
|
|
1199
1199
|
begin
|
|
1200
|
-
___lambda = lambda { |
|
|
1200
|
+
___lambda = lambda { |__v__11__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30185|
|
|
1201
1201
|
begin
|
|
1202
1202
|
___lambda = lambda { |_exc|
|
|
1203
1203
|
begin
|
|
1204
|
-
___lambda = lambda { |
|
|
1204
|
+
___lambda = lambda { |__v__12__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30186|
|
|
1205
1205
|
if (
|
|
1206
1206
|
begin
|
|
1207
1207
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
@@ -1213,7 +1213,7 @@ trampCall(
|
|
|
1213
1213
|
begin
|
|
1214
1214
|
embedBacktraceInfo( "", 1 );
|
|
1215
1215
|
_pair_QUMARK(
|
|
1216
|
-
|
|
1216
|
+
__v__12__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30186
|
|
1217
1217
|
)
|
|
1218
1218
|
end
|
|
1219
1219
|
)
|
|
@@ -1222,11 +1222,11 @@ trampCall(
|
|
|
1222
1222
|
end
|
|
1223
1223
|
) then
|
|
1224
1224
|
begin
|
|
1225
|
-
___lambda = lambda { |
|
|
1225
|
+
___lambda = lambda { |__v__13__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30187|
|
|
1226
1226
|
begin
|
|
1227
1227
|
___lambda = lambda { |_mes|
|
|
1228
1228
|
begin
|
|
1229
|
-
___lambda = lambda { |
|
|
1229
|
+
___lambda = lambda { |__v__14__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30188|
|
|
1230
1230
|
if (
|
|
1231
1231
|
begin
|
|
1232
1232
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
@@ -1238,7 +1238,7 @@ trampCall(
|
|
|
1238
1238
|
begin
|
|
1239
1239
|
embedBacktraceInfo( "", 1 );
|
|
1240
1240
|
_pair_QUMARK(
|
|
1241
|
-
|
|
1241
|
+
__v__14__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30188
|
|
1242
1242
|
)
|
|
1243
1243
|
end
|
|
1244
1244
|
)
|
|
@@ -1247,11 +1247,11 @@ trampCall(
|
|
|
1247
1247
|
end
|
|
1248
1248
|
) then
|
|
1249
1249
|
begin
|
|
1250
|
-
___lambda = lambda { |
|
|
1250
|
+
___lambda = lambda { |__v__15__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189|
|
|
1251
1251
|
begin
|
|
1252
1252
|
___lambda = lambda { |_backtrace|
|
|
1253
1253
|
begin
|
|
1254
|
-
___lambda = lambda { |
|
|
1254
|
+
___lambda = lambda { |__v__16__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30190|
|
|
1255
1255
|
if (
|
|
1256
1256
|
begin
|
|
1257
1257
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
@@ -1263,7 +1263,7 @@ trampCall(
|
|
|
1263
1263
|
begin
|
|
1264
1264
|
embedBacktraceInfo( "", 1 );
|
|
1265
1265
|
_null_QUMARK(
|
|
1266
|
-
|
|
1266
|
+
__v__16__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30190
|
|
1267
1267
|
)
|
|
1268
1268
|
end
|
|
1269
1269
|
)
|
|
@@ -1276,9 +1276,9 @@ trampCall(
|
|
|
1276
1276
|
_cons(
|
|
1277
1277
|
begin
|
|
1278
1278
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
1279
|
-
trampCall( callProcedure( '
|
|
1279
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168',
|
|
1280
1280
|
begin
|
|
1281
|
-
trampCall(
|
|
1281
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168)
|
|
1282
1282
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
1283
1283
|
end ,
|
|
1284
1284
|
[
|
|
@@ -1323,20 +1323,20 @@ trampCall(
|
|
|
1323
1323
|
begin
|
|
1324
1324
|
embedBacktraceInfo( "", 1 );
|
|
1325
1325
|
_cdr(
|
|
1326
|
-
|
|
1326
|
+
__v__14__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30188
|
|
1327
1327
|
)
|
|
1328
1328
|
end
|
|
1329
1329
|
)
|
|
1330
1330
|
end
|
|
1331
1331
|
} ; ___lambda.call(
|
|
1332
|
-
|
|
1332
|
+
__v__15__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189
|
|
1333
1333
|
)
|
|
1334
1334
|
end
|
|
1335
1335
|
} ; ___lambda.call(
|
|
1336
1336
|
begin
|
|
1337
1337
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
|
|
1338
1338
|
_car(
|
|
1339
|
-
|
|
1339
|
+
__v__14__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30188
|
|
1340
1340
|
)
|
|
1341
1341
|
end
|
|
1342
1342
|
)
|
|
@@ -1348,20 +1348,20 @@ trampCall(
|
|
|
1348
1348
|
begin
|
|
1349
1349
|
embedBacktraceInfo( "", 1 );
|
|
1350
1350
|
_cdr(
|
|
1351
|
-
|
|
1351
|
+
__v__12__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30186
|
|
1352
1352
|
)
|
|
1353
1353
|
end
|
|
1354
1354
|
)
|
|
1355
1355
|
end
|
|
1356
1356
|
} ; ___lambda.call(
|
|
1357
|
-
|
|
1357
|
+
__v__13__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30187
|
|
1358
1358
|
)
|
|
1359
1359
|
end
|
|
1360
1360
|
} ; ___lambda.call(
|
|
1361
1361
|
begin
|
|
1362
1362
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
|
|
1363
1363
|
_car(
|
|
1364
|
-
|
|
1364
|
+
__v__12__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30186
|
|
1365
1365
|
)
|
|
1366
1366
|
end
|
|
1367
1367
|
)
|
|
@@ -1373,20 +1373,20 @@ trampCall(
|
|
|
1373
1373
|
begin
|
|
1374
1374
|
embedBacktraceInfo( "", 1 );
|
|
1375
1375
|
_cdr(
|
|
1376
|
-
|
|
1376
|
+
__v__10__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30184
|
|
1377
1377
|
)
|
|
1378
1378
|
end
|
|
1379
1379
|
)
|
|
1380
1380
|
end
|
|
1381
1381
|
} ; ___lambda.call(
|
|
1382
|
-
|
|
1382
|
+
__v__11__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30185
|
|
1383
1383
|
)
|
|
1384
1384
|
end
|
|
1385
1385
|
} ; ___lambda.call(
|
|
1386
1386
|
begin
|
|
1387
1387
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
|
|
1388
1388
|
_car(
|
|
1389
|
-
|
|
1389
|
+
__v__10__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30184
|
|
1390
1390
|
)
|
|
1391
1391
|
end
|
|
1392
1392
|
)
|
|
@@ -1398,7 +1398,7 @@ trampCall(
|
|
|
1398
1398
|
begin
|
|
1399
1399
|
embedBacktraceInfo( "", 1 );
|
|
1400
1400
|
_cdr(
|
|
1401
|
-
|
|
1401
|
+
__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30167
|
|
1402
1402
|
)
|
|
1403
1403
|
end
|
|
1404
1404
|
)
|
|
@@ -1408,7 +1408,7 @@ trampCall(
|
|
|
1408
1408
|
end
|
|
1409
1409
|
} ; ___lambda.call(
|
|
1410
1410
|
begin
|
|
1411
|
-
___lambda = lambda { |
|
|
1411
|
+
___lambda = lambda { |__v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30179|
|
|
1412
1412
|
if (
|
|
1413
1413
|
begin
|
|
1414
1414
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
@@ -1420,7 +1420,7 @@ trampCall(
|
|
|
1420
1420
|
begin
|
|
1421
1421
|
embedBacktraceInfo( "", 1 );
|
|
1422
1422
|
_pair_QUMARK(
|
|
1423
|
-
|
|
1423
|
+
__v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30179
|
|
1424
1424
|
)
|
|
1425
1425
|
end
|
|
1426
1426
|
)
|
|
@@ -1429,11 +1429,11 @@ trampCall(
|
|
|
1429
1429
|
end
|
|
1430
1430
|
) then
|
|
1431
1431
|
begin
|
|
1432
|
-
___lambda = lambda { |
|
|
1432
|
+
___lambda = lambda { |__v__6__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30180|
|
|
1433
1433
|
begin
|
|
1434
1434
|
___lambda = lambda { |_exc|
|
|
1435
1435
|
begin
|
|
1436
|
-
___lambda = lambda { |
|
|
1436
|
+
___lambda = lambda { |__v__7__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30181|
|
|
1437
1437
|
if (
|
|
1438
1438
|
begin
|
|
1439
1439
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
@@ -1445,7 +1445,7 @@ trampCall(
|
|
|
1445
1445
|
begin
|
|
1446
1446
|
embedBacktraceInfo( "", 1 );
|
|
1447
1447
|
_pair_QUMARK(
|
|
1448
|
-
|
|
1448
|
+
__v__7__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30181
|
|
1449
1449
|
)
|
|
1450
1450
|
end
|
|
1451
1451
|
)
|
|
@@ -1454,11 +1454,11 @@ trampCall(
|
|
|
1454
1454
|
end
|
|
1455
1455
|
) then
|
|
1456
1456
|
begin
|
|
1457
|
-
___lambda = lambda { |
|
|
1457
|
+
___lambda = lambda { |__v__8__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30182|
|
|
1458
1458
|
begin
|
|
1459
1459
|
___lambda = lambda { |_mes|
|
|
1460
1460
|
begin
|
|
1461
|
-
___lambda = lambda { |
|
|
1461
|
+
___lambda = lambda { |__v__9__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30183|
|
|
1462
1462
|
if (
|
|
1463
1463
|
begin
|
|
1464
1464
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
@@ -1470,7 +1470,7 @@ trampCall(
|
|
|
1470
1470
|
begin
|
|
1471
1471
|
embedBacktraceInfo( "", 1 );
|
|
1472
1472
|
_null_QUMARK(
|
|
1473
|
-
|
|
1473
|
+
__v__9__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30183
|
|
1474
1474
|
)
|
|
1475
1475
|
end
|
|
1476
1476
|
)
|
|
@@ -1483,9 +1483,9 @@ trampCall(
|
|
|
1483
1483
|
_cons(
|
|
1484
1484
|
begin
|
|
1485
1485
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
1486
|
-
trampCall( callProcedure( '
|
|
1486
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168',
|
|
1487
1487
|
begin
|
|
1488
|
-
trampCall(
|
|
1488
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168)
|
|
1489
1489
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
1490
1490
|
end ,
|
|
1491
1491
|
[
|
|
@@ -1515,9 +1515,9 @@ trampCall(
|
|
|
1515
1515
|
_cons(
|
|
1516
1516
|
begin
|
|
1517
1517
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
1518
|
-
trampCall( callProcedure( '
|
|
1518
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168',
|
|
1519
1519
|
begin
|
|
1520
|
-
trampCall(
|
|
1520
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168)
|
|
1521
1521
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
1522
1522
|
end ,
|
|
1523
1523
|
[
|
|
@@ -1537,9 +1537,9 @@ trampCall(
|
|
|
1537
1537
|
_cons(
|
|
1538
1538
|
begin
|
|
1539
1539
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
1540
|
-
trampCall( callProcedure( '
|
|
1540
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168',
|
|
1541
1541
|
begin
|
|
1542
|
-
trampCall(
|
|
1542
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168)
|
|
1543
1543
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
1544
1544
|
end ,
|
|
1545
1545
|
[
|
|
@@ -1558,9 +1558,9 @@ trampCall(
|
|
|
1558
1558
|
_cons(
|
|
1559
1559
|
begin
|
|
1560
1560
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
1561
|
-
trampCall( callProcedure( '
|
|
1561
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168',
|
|
1562
1562
|
begin
|
|
1563
|
-
trampCall(
|
|
1563
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168)
|
|
1564
1564
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
1565
1565
|
end ,
|
|
1566
1566
|
[
|
|
@@ -1605,20 +1605,20 @@ trampCall(
|
|
|
1605
1605
|
begin
|
|
1606
1606
|
embedBacktraceInfo( "", 1 );
|
|
1607
1607
|
_cdr(
|
|
1608
|
-
|
|
1608
|
+
__v__7__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30181
|
|
1609
1609
|
)
|
|
1610
1610
|
end
|
|
1611
1611
|
)
|
|
1612
1612
|
end
|
|
1613
1613
|
} ; ___lambda.call(
|
|
1614
|
-
|
|
1614
|
+
__v__8__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30182
|
|
1615
1615
|
)
|
|
1616
1616
|
end
|
|
1617
1617
|
} ; ___lambda.call(
|
|
1618
1618
|
begin
|
|
1619
1619
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
|
|
1620
1620
|
_car(
|
|
1621
|
-
|
|
1621
|
+
__v__7__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30181
|
|
1622
1622
|
)
|
|
1623
1623
|
end
|
|
1624
1624
|
)
|
|
@@ -1630,20 +1630,20 @@ trampCall(
|
|
|
1630
1630
|
begin
|
|
1631
1631
|
embedBacktraceInfo( "", 1 );
|
|
1632
1632
|
_cdr(
|
|
1633
|
-
|
|
1633
|
+
__v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30179
|
|
1634
1634
|
)
|
|
1635
1635
|
end
|
|
1636
1636
|
)
|
|
1637
1637
|
end
|
|
1638
1638
|
} ; ___lambda.call(
|
|
1639
|
-
|
|
1639
|
+
__v__6__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30180
|
|
1640
1640
|
)
|
|
1641
1641
|
end
|
|
1642
1642
|
} ; ___lambda.call(
|
|
1643
1643
|
begin
|
|
1644
1644
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
|
|
1645
1645
|
_car(
|
|
1646
|
-
|
|
1646
|
+
__v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30179
|
|
1647
1647
|
)
|
|
1648
1648
|
end
|
|
1649
1649
|
)
|
|
@@ -1655,7 +1655,7 @@ trampCall(
|
|
|
1655
1655
|
begin
|
|
1656
1656
|
embedBacktraceInfo( "", 1 );
|
|
1657
1657
|
_cdr(
|
|
1658
|
-
|
|
1658
|
+
__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30167
|
|
1659
1659
|
)
|
|
1660
1660
|
end
|
|
1661
1661
|
)
|
|
@@ -1665,7 +1665,7 @@ trampCall(
|
|
|
1665
1665
|
end
|
|
1666
1666
|
} ; ___lambda.call(
|
|
1667
1667
|
begin
|
|
1668
|
-
___lambda = lambda { |
|
|
1668
|
+
___lambda = lambda { |__v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30176|
|
|
1669
1669
|
if (
|
|
1670
1670
|
begin
|
|
1671
1671
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
@@ -1677,7 +1677,7 @@ trampCall(
|
|
|
1677
1677
|
begin
|
|
1678
1678
|
embedBacktraceInfo( "", 1 );
|
|
1679
1679
|
_pair_QUMARK(
|
|
1680
|
-
|
|
1680
|
+
__v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30176
|
|
1681
1681
|
)
|
|
1682
1682
|
end
|
|
1683
1683
|
)
|
|
@@ -1686,11 +1686,11 @@ trampCall(
|
|
|
1686
1686
|
end
|
|
1687
1687
|
) then
|
|
1688
1688
|
begin
|
|
1689
|
-
___lambda = lambda { |
|
|
1689
|
+
___lambda = lambda { |__v__3__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30177|
|
|
1690
1690
|
begin
|
|
1691
1691
|
___lambda = lambda { |_exc|
|
|
1692
1692
|
begin
|
|
1693
|
-
___lambda = lambda { |
|
|
1693
|
+
___lambda = lambda { |__v__4__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30178|
|
|
1694
1694
|
if (
|
|
1695
1695
|
begin
|
|
1696
1696
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
@@ -1702,7 +1702,7 @@ trampCall(
|
|
|
1702
1702
|
begin
|
|
1703
1703
|
embedBacktraceInfo( "", 1 );
|
|
1704
1704
|
_null_QUMARK(
|
|
1705
|
-
|
|
1705
|
+
__v__4__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30178
|
|
1706
1706
|
)
|
|
1707
1707
|
end
|
|
1708
1708
|
)
|
|
@@ -1715,9 +1715,9 @@ trampCall(
|
|
|
1715
1715
|
_cons(
|
|
1716
1716
|
begin
|
|
1717
1717
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
1718
|
-
trampCall( callProcedure( '
|
|
1718
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168',
|
|
1719
1719
|
begin
|
|
1720
|
-
trampCall(
|
|
1720
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168)
|
|
1721
1721
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
1722
1722
|
end ,
|
|
1723
1723
|
[
|
|
@@ -1740,9 +1740,9 @@ trampCall(
|
|
|
1740
1740
|
_cons(
|
|
1741
1741
|
begin
|
|
1742
1742
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
1743
|
-
trampCall( callProcedure( '
|
|
1743
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168',
|
|
1744
1744
|
begin
|
|
1745
|
-
trampCall(
|
|
1745
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168)
|
|
1746
1746
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
1747
1747
|
end ,
|
|
1748
1748
|
[
|
|
@@ -1762,9 +1762,9 @@ trampCall(
|
|
|
1762
1762
|
_cons(
|
|
1763
1763
|
begin
|
|
1764
1764
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
1765
|
-
trampCall( callProcedure( '
|
|
1765
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168',
|
|
1766
1766
|
begin
|
|
1767
|
-
trampCall(
|
|
1767
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168)
|
|
1768
1768
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
1769
1769
|
end ,
|
|
1770
1770
|
[
|
|
@@ -1783,9 +1783,9 @@ trampCall(
|
|
|
1783
1783
|
_cons(
|
|
1784
1784
|
begin
|
|
1785
1785
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
1786
|
-
trampCall( callProcedure( '
|
|
1786
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168',
|
|
1787
1787
|
begin
|
|
1788
|
-
trampCall(
|
|
1788
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168)
|
|
1789
1789
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
1790
1790
|
end ,
|
|
1791
1791
|
[
|
|
@@ -1822,9 +1822,9 @@ trampCall(
|
|
|
1822
1822
|
_cons(
|
|
1823
1823
|
begin
|
|
1824
1824
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
1825
|
-
trampCall( callProcedure( '
|
|
1825
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168',
|
|
1826
1826
|
begin
|
|
1827
|
-
trampCall(
|
|
1827
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168)
|
|
1828
1828
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
1829
1829
|
end ,
|
|
1830
1830
|
[
|
|
@@ -1844,9 +1844,9 @@ trampCall(
|
|
|
1844
1844
|
_cons(
|
|
1845
1845
|
begin
|
|
1846
1846
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
1847
|
-
trampCall( callProcedure( '
|
|
1847
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168',
|
|
1848
1848
|
begin
|
|
1849
|
-
trampCall(
|
|
1849
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168)
|
|
1850
1850
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
1851
1851
|
end ,
|
|
1852
1852
|
[
|
|
@@ -1865,9 +1865,9 @@ trampCall(
|
|
|
1865
1865
|
_cons(
|
|
1866
1866
|
begin
|
|
1867
1867
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
1868
|
-
trampCall( callProcedure( '
|
|
1868
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168',
|
|
1869
1869
|
begin
|
|
1870
|
-
trampCall(
|
|
1870
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168)
|
|
1871
1871
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
1872
1872
|
end ,
|
|
1873
1873
|
[
|
|
@@ -1912,20 +1912,20 @@ trampCall(
|
|
|
1912
1912
|
begin
|
|
1913
1913
|
embedBacktraceInfo( "", 1 );
|
|
1914
1914
|
_cdr(
|
|
1915
|
-
|
|
1915
|
+
__v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30176
|
|
1916
1916
|
)
|
|
1917
1917
|
end
|
|
1918
1918
|
)
|
|
1919
1919
|
end
|
|
1920
1920
|
} ; ___lambda.call(
|
|
1921
|
-
|
|
1921
|
+
__v__3__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30177
|
|
1922
1922
|
)
|
|
1923
1923
|
end
|
|
1924
1924
|
} ; ___lambda.call(
|
|
1925
1925
|
begin
|
|
1926
1926
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
|
|
1927
1927
|
_car(
|
|
1928
|
-
|
|
1928
|
+
__v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30176
|
|
1929
1929
|
)
|
|
1930
1930
|
end
|
|
1931
1931
|
)
|
|
@@ -1937,7 +1937,7 @@ trampCall(
|
|
|
1937
1937
|
begin
|
|
1938
1938
|
embedBacktraceInfo( "", 1 );
|
|
1939
1939
|
_cdr(
|
|
1940
|
-
|
|
1940
|
+
__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30167
|
|
1941
1941
|
)
|
|
1942
1942
|
end
|
|
1943
1943
|
)
|
|
@@ -1947,7 +1947,7 @@ trampCall(
|
|
|
1947
1947
|
end
|
|
1948
1948
|
} ; ___lambda.call(
|
|
1949
1949
|
begin
|
|
1950
|
-
___lambda = lambda { |
|
|
1950
|
+
___lambda = lambda { |__v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30175|
|
|
1951
1951
|
if (
|
|
1952
1952
|
begin
|
|
1953
1953
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
@@ -1959,7 +1959,7 @@ trampCall(
|
|
|
1959
1959
|
begin
|
|
1960
1960
|
embedBacktraceInfo( "", 1 );
|
|
1961
1961
|
_null_QUMARK(
|
|
1962
|
-
|
|
1962
|
+
__v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30175
|
|
1963
1963
|
)
|
|
1964
1964
|
end
|
|
1965
1965
|
)
|
|
@@ -1972,9 +1972,9 @@ trampCall(
|
|
|
1972
1972
|
_cons(
|
|
1973
1973
|
begin
|
|
1974
1974
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
1975
|
-
trampCall( callProcedure( '
|
|
1975
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168',
|
|
1976
1976
|
begin
|
|
1977
|
-
trampCall(
|
|
1977
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168)
|
|
1978
1978
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
1979
1979
|
end ,
|
|
1980
1980
|
[
|
|
@@ -1998,7 +1998,7 @@ trampCall(
|
|
|
1998
1998
|
begin
|
|
1999
1999
|
embedBacktraceInfo( "", 1 );
|
|
2000
2000
|
_cdr(
|
|
2001
|
-
|
|
2001
|
+
__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30167
|
|
2002
2002
|
)
|
|
2003
2003
|
end
|
|
2004
2004
|
)
|
|
@@ -2030,30 +2030,30 @@ trampCall(
|
|
|
2030
2030
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
2031
2031
|
end ,
|
|
2032
2032
|
[
|
|
2033
|
-
Proc.new { |
|
|
2033
|
+
Proc.new { |__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30196,__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30197,__compare__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30198|
|
|
2034
2034
|
begin
|
|
2035
|
-
___lambda = lambda { |
|
|
2035
|
+
___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30209|
|
|
2036
2036
|
if (
|
|
2037
2037
|
begin
|
|
2038
|
-
trampCall(
|
|
2038
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30209)
|
|
2039
2039
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
2040
2040
|
end
|
|
2041
2041
|
) then
|
|
2042
2042
|
begin
|
|
2043
|
-
trampCall(
|
|
2043
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30209)
|
|
2044
2044
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
2045
2045
|
end
|
|
2046
2046
|
else
|
|
2047
2047
|
begin
|
|
2048
|
-
___lambda = lambda { |
|
|
2048
|
+
___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30210|
|
|
2049
2049
|
if (
|
|
2050
2050
|
begin
|
|
2051
|
-
trampCall(
|
|
2051
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30210)
|
|
2052
2052
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
2053
2053
|
end
|
|
2054
2054
|
) then
|
|
2055
2055
|
begin
|
|
2056
|
-
trampCall(
|
|
2056
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30210)
|
|
2057
2057
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
2058
2058
|
end
|
|
2059
2059
|
else
|
|
@@ -2073,7 +2073,7 @@ trampCall(
|
|
|
2073
2073
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
2074
2074
|
end ,
|
|
2075
2075
|
[
|
|
2076
|
-
|
|
2076
|
+
__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30196
|
|
2077
2077
|
]
|
|
2078
2078
|
))
|
|
2079
2079
|
end
|
|
@@ -2087,7 +2087,7 @@ trampCall(
|
|
|
2087
2087
|
end
|
|
2088
2088
|
} ; ___lambda.call(
|
|
2089
2089
|
begin
|
|
2090
|
-
___lambda = lambda { |
|
|
2090
|
+
___lambda = lambda { |__v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30204|
|
|
2091
2091
|
if (
|
|
2092
2092
|
begin
|
|
2093
2093
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
@@ -2099,7 +2099,7 @@ trampCall(
|
|
|
2099
2099
|
begin
|
|
2100
2100
|
embedBacktraceInfo( "", 1 );
|
|
2101
2101
|
_pair_QUMARK(
|
|
2102
|
-
|
|
2102
|
+
__v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30204
|
|
2103
2103
|
)
|
|
2104
2104
|
end
|
|
2105
2105
|
)
|
|
@@ -2108,7 +2108,7 @@ trampCall(
|
|
|
2108
2108
|
end
|
|
2109
2109
|
) then
|
|
2110
2110
|
begin
|
|
2111
|
-
___lambda = lambda { |
|
|
2111
|
+
___lambda = lambda { |__v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30205|
|
|
2112
2112
|
if (
|
|
2113
2113
|
begin
|
|
2114
2114
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
@@ -2120,7 +2120,7 @@ trampCall(
|
|
|
2120
2120
|
begin
|
|
2121
2121
|
embedBacktraceInfo( "", 1 );
|
|
2122
2122
|
_pair_QUMARK(
|
|
2123
|
-
|
|
2123
|
+
__v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30205
|
|
2124
2124
|
)
|
|
2125
2125
|
end
|
|
2126
2126
|
)
|
|
@@ -2129,11 +2129,11 @@ trampCall(
|
|
|
2129
2129
|
end
|
|
2130
2130
|
) then
|
|
2131
2131
|
begin
|
|
2132
|
-
___lambda = lambda { |
|
|
2132
|
+
___lambda = lambda { |__v__3__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30206|
|
|
2133
2133
|
begin
|
|
2134
2134
|
___lambda = lambda { |_var|
|
|
2135
2135
|
begin
|
|
2136
|
-
___lambda = lambda { |
|
|
2136
|
+
___lambda = lambda { |__v__4__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30207|
|
|
2137
2137
|
if (
|
|
2138
2138
|
begin
|
|
2139
2139
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
@@ -2152,7 +2152,7 @@ trampCall(
|
|
|
2152
2152
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
2153
2153
|
end ,
|
|
2154
2154
|
[
|
|
2155
|
-
|
|
2155
|
+
__v__4__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30207
|
|
2156
2156
|
]
|
|
2157
2157
|
))
|
|
2158
2158
|
end
|
|
@@ -2164,7 +2164,7 @@ trampCall(
|
|
|
2164
2164
|
begin
|
|
2165
2165
|
___lambda = lambda { |_clauses|
|
|
2166
2166
|
begin
|
|
2167
|
-
___lambda = lambda { |
|
|
2167
|
+
___lambda = lambda { |__v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30208|
|
|
2168
2168
|
if (
|
|
2169
2169
|
begin
|
|
2170
2170
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
@@ -2176,7 +2176,7 @@ trampCall(
|
|
|
2176
2176
|
begin
|
|
2177
2177
|
embedBacktraceInfo( "", 1 );
|
|
2178
2178
|
_null_QUMARK(
|
|
2179
|
-
|
|
2179
|
+
__v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30208
|
|
2180
2180
|
)
|
|
2181
2181
|
end
|
|
2182
2182
|
)
|
|
@@ -2195,13 +2195,13 @@ trampCall(
|
|
|
2195
2195
|
begin
|
|
2196
2196
|
embedBacktraceInfo( "", 1 );
|
|
2197
2197
|
_cdr(
|
|
2198
|
-
|
|
2198
|
+
__v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30204
|
|
2199
2199
|
)
|
|
2200
2200
|
end
|
|
2201
2201
|
)
|
|
2202
2202
|
end
|
|
2203
2203
|
} ; ___lambda.call(
|
|
2204
|
-
|
|
2204
|
+
__v__4__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30207
|
|
2205
2205
|
)
|
|
2206
2206
|
end
|
|
2207
2207
|
else
|
|
@@ -2211,20 +2211,20 @@ trampCall(
|
|
|
2211
2211
|
begin
|
|
2212
2212
|
embedBacktraceInfo( "", 1 );
|
|
2213
2213
|
_cdr(
|
|
2214
|
-
|
|
2214
|
+
__v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30205
|
|
2215
2215
|
)
|
|
2216
2216
|
end
|
|
2217
2217
|
)
|
|
2218
2218
|
end
|
|
2219
2219
|
} ; ___lambda.call(
|
|
2220
|
-
|
|
2220
|
+
__v__3__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30206
|
|
2221
2221
|
)
|
|
2222
2222
|
end
|
|
2223
2223
|
} ; ___lambda.call(
|
|
2224
2224
|
begin
|
|
2225
2225
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
|
|
2226
2226
|
_car(
|
|
2227
|
-
|
|
2227
|
+
__v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30205
|
|
2228
2228
|
)
|
|
2229
2229
|
end
|
|
2230
2230
|
)
|
|
@@ -2236,7 +2236,7 @@ trampCall(
|
|
|
2236
2236
|
begin
|
|
2237
2237
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
|
|
2238
2238
|
_car(
|
|
2239
|
-
|
|
2239
|
+
__v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30204
|
|
2240
2240
|
)
|
|
2241
2241
|
end
|
|
2242
2242
|
)
|
|
@@ -2248,7 +2248,7 @@ trampCall(
|
|
|
2248
2248
|
begin
|
|
2249
2249
|
embedBacktraceInfo( "", 1 );
|
|
2250
2250
|
_cdr(
|
|
2251
|
-
|
|
2251
|
+
__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30196
|
|
2252
2252
|
)
|
|
2253
2253
|
end
|
|
2254
2254
|
)
|
|
@@ -2280,30 +2280,30 @@ trampCall(
|
|
|
2280
2280
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
2281
2281
|
end ,
|
|
2282
2282
|
[
|
|
2283
|
-
Proc.new { |
|
|
2283
|
+
Proc.new { |__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30211,__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30212,__compare__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30213|
|
|
2284
2284
|
begin
|
|
2285
|
-
___lambda = lambda { |
|
|
2285
|
+
___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30224|
|
|
2286
2286
|
if (
|
|
2287
2287
|
begin
|
|
2288
|
-
trampCall(
|
|
2288
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30224)
|
|
2289
2289
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
2290
2290
|
end
|
|
2291
2291
|
) then
|
|
2292
2292
|
begin
|
|
2293
|
-
trampCall(
|
|
2293
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30224)
|
|
2294
2294
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
2295
2295
|
end
|
|
2296
2296
|
else
|
|
2297
2297
|
begin
|
|
2298
|
-
___lambda = lambda { |
|
|
2298
|
+
___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30225|
|
|
2299
2299
|
if (
|
|
2300
2300
|
begin
|
|
2301
|
-
trampCall(
|
|
2301
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30225)
|
|
2302
2302
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
2303
2303
|
end
|
|
2304
2304
|
) then
|
|
2305
2305
|
begin
|
|
2306
|
-
trampCall(
|
|
2306
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30225)
|
|
2307
2307
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
2308
2308
|
end
|
|
2309
2309
|
else
|
|
@@ -2323,7 +2323,7 @@ trampCall(
|
|
|
2323
2323
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
2324
2324
|
end ,
|
|
2325
2325
|
[
|
|
2326
|
-
|
|
2326
|
+
__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30211
|
|
2327
2327
|
]
|
|
2328
2328
|
))
|
|
2329
2329
|
end
|
|
@@ -2337,7 +2337,7 @@ trampCall(
|
|
|
2337
2337
|
end
|
|
2338
2338
|
} ; ___lambda.call(
|
|
2339
2339
|
begin
|
|
2340
|
-
___lambda = lambda { |
|
|
2340
|
+
___lambda = lambda { |__v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30219|
|
|
2341
2341
|
if (
|
|
2342
2342
|
begin
|
|
2343
2343
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
@@ -2349,7 +2349,7 @@ trampCall(
|
|
|
2349
2349
|
begin
|
|
2350
2350
|
embedBacktraceInfo( "", 1 );
|
|
2351
2351
|
_pair_QUMARK(
|
|
2352
|
-
|
|
2352
|
+
__v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30219
|
|
2353
2353
|
)
|
|
2354
2354
|
end
|
|
2355
2355
|
)
|
|
@@ -2358,7 +2358,7 @@ trampCall(
|
|
|
2358
2358
|
end
|
|
2359
2359
|
) then
|
|
2360
2360
|
begin
|
|
2361
|
-
___lambda = lambda { |
|
|
2361
|
+
___lambda = lambda { |__v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30220|
|
|
2362
2362
|
if (
|
|
2363
2363
|
begin
|
|
2364
2364
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
@@ -2370,7 +2370,7 @@ trampCall(
|
|
|
2370
2370
|
begin
|
|
2371
2371
|
embedBacktraceInfo( "", 1 );
|
|
2372
2372
|
_pair_QUMARK(
|
|
2373
|
-
|
|
2373
|
+
__v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30220
|
|
2374
2374
|
)
|
|
2375
2375
|
end
|
|
2376
2376
|
)
|
|
@@ -2379,11 +2379,11 @@ trampCall(
|
|
|
2379
2379
|
end
|
|
2380
2380
|
) then
|
|
2381
2381
|
begin
|
|
2382
|
-
___lambda = lambda { |
|
|
2382
|
+
___lambda = lambda { |__v__3__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30221|
|
|
2383
2383
|
begin
|
|
2384
2384
|
___lambda = lambda { |_var|
|
|
2385
2385
|
begin
|
|
2386
|
-
___lambda = lambda { |
|
|
2386
|
+
___lambda = lambda { |__v__4__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30222|
|
|
2387
2387
|
if (
|
|
2388
2388
|
begin
|
|
2389
2389
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
@@ -2402,7 +2402,7 @@ trampCall(
|
|
|
2402
2402
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
2403
2403
|
end ,
|
|
2404
2404
|
[
|
|
2405
|
-
|
|
2405
|
+
__v__4__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30222
|
|
2406
2406
|
]
|
|
2407
2407
|
))
|
|
2408
2408
|
end
|
|
@@ -2414,7 +2414,7 @@ trampCall(
|
|
|
2414
2414
|
begin
|
|
2415
2415
|
___lambda = lambda { |_clauses|
|
|
2416
2416
|
begin
|
|
2417
|
-
___lambda = lambda { |
|
|
2417
|
+
___lambda = lambda { |__v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30223|
|
|
2418
2418
|
if (
|
|
2419
2419
|
begin
|
|
2420
2420
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
@@ -2426,7 +2426,7 @@ trampCall(
|
|
|
2426
2426
|
begin
|
|
2427
2427
|
embedBacktraceInfo( "", 1 );
|
|
2428
2428
|
_null_QUMARK(
|
|
2429
|
-
|
|
2429
|
+
__v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30223
|
|
2430
2430
|
)
|
|
2431
2431
|
end
|
|
2432
2432
|
)
|
|
@@ -2439,9 +2439,9 @@ trampCall(
|
|
|
2439
2439
|
_cons(
|
|
2440
2440
|
begin
|
|
2441
2441
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
2442
|
-
trampCall( callProcedure( '
|
|
2442
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30212', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30212',
|
|
2443
2443
|
begin
|
|
2444
|
-
trampCall(
|
|
2444
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30212)
|
|
2445
2445
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
2446
2446
|
end ,
|
|
2447
2447
|
[
|
|
@@ -2450,24 +2450,82 @@ trampCall(
|
|
|
2450
2450
|
))
|
|
2451
2451
|
end ,
|
|
2452
2452
|
begin
|
|
2453
|
-
embedBacktraceInfo( "
|
|
2454
|
-
trampCall( self.
|
|
2453
|
+
embedBacktraceInfo( "", 1 );
|
|
2454
|
+
trampCall( self._append_METHOD( 'append',
|
|
2455
2455
|
begin
|
|
2456
|
-
if @global_lisp_binding.has_key?('
|
|
2457
|
-
trampCall(@
|
|
2458
|
-
else raise NameError.new( "Error: undefined variable
|
|
2459
|
-
rescue => __e ; __e.set_backtrace( ["
|
|
2456
|
+
if @global_lisp_binding.has_key?('_append') then
|
|
2457
|
+
trampCall(@_append)
|
|
2458
|
+
else raise NameError.new( "Error: undefined variable _append", "_append" ) end
|
|
2459
|
+
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
2460
2460
|
end ,
|
|
2461
2461
|
[
|
|
2462
|
-
Proc.new { |_clauses|
|
|
2463
|
-
begin
|
|
2464
|
-
trampCall(_clauses)
|
|
2465
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:145"] + __e.backtrace ) ; raise __e
|
|
2466
|
-
end
|
|
2467
|
-
} ,
|
|
2468
2462
|
begin
|
|
2469
|
-
|
|
2470
|
-
|
|
2463
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 91 );
|
|
2464
|
+
trampCall( self._map_METHOD( 'map',
|
|
2465
|
+
begin
|
|
2466
|
+
if @global_lisp_binding.has_key?('_map') then
|
|
2467
|
+
trampCall(@_map)
|
|
2468
|
+
else raise NameError.new( "Error: undefined variable _map", "_map" ) end
|
|
2469
|
+
rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:91"] + __e.backtrace ) ; raise __e
|
|
2470
|
+
end ,
|
|
2471
|
+
[
|
|
2472
|
+
Proc.new { |_clauses|
|
|
2473
|
+
begin
|
|
2474
|
+
trampCall(_clauses)
|
|
2475
|
+
rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:145"] + __e.backtrace ) ; raise __e
|
|
2476
|
+
end
|
|
2477
|
+
} ,
|
|
2478
|
+
begin
|
|
2479
|
+
trampCall(_clauses)
|
|
2480
|
+
rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:145"] + __e.backtrace ) ; raise __e
|
|
2481
|
+
end
|
|
2482
|
+
]
|
|
2483
|
+
))
|
|
2484
|
+
end ,
|
|
2485
|
+
begin
|
|
2486
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
2487
|
+
_cons(
|
|
2488
|
+
begin
|
|
2489
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
2490
|
+
_cons(
|
|
2491
|
+
true ,
|
|
2492
|
+
begin
|
|
2493
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
2494
|
+
_cons(
|
|
2495
|
+
begin
|
|
2496
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
2497
|
+
_cons(
|
|
2498
|
+
begin
|
|
2499
|
+
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
2500
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30212', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30212',
|
|
2501
|
+
begin
|
|
2502
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30212)
|
|
2503
|
+
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
2504
|
+
end ,
|
|
2505
|
+
[
|
|
2506
|
+
:"raise"
|
|
2507
|
+
]
|
|
2508
|
+
))
|
|
2509
|
+
end ,
|
|
2510
|
+
begin
|
|
2511
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
2512
|
+
_cons(
|
|
2513
|
+
begin
|
|
2514
|
+
trampCall(_var)
|
|
2515
|
+
rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:146"] + __e.backtrace ) ; raise __e
|
|
2516
|
+
end ,
|
|
2517
|
+
Cell.new()
|
|
2518
|
+
)
|
|
2519
|
+
end
|
|
2520
|
+
)
|
|
2521
|
+
end ,
|
|
2522
|
+
Cell.new()
|
|
2523
|
+
)
|
|
2524
|
+
end
|
|
2525
|
+
)
|
|
2526
|
+
end ,
|
|
2527
|
+
Cell.new()
|
|
2528
|
+
)
|
|
2471
2529
|
end
|
|
2472
2530
|
]
|
|
2473
2531
|
))
|
|
@@ -2481,13 +2539,13 @@ trampCall(
|
|
|
2481
2539
|
begin
|
|
2482
2540
|
embedBacktraceInfo( "", 1 );
|
|
2483
2541
|
_cdr(
|
|
2484
|
-
|
|
2542
|
+
__v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30219
|
|
2485
2543
|
)
|
|
2486
2544
|
end
|
|
2487
2545
|
)
|
|
2488
2546
|
end
|
|
2489
2547
|
} ; ___lambda.call(
|
|
2490
|
-
|
|
2548
|
+
__v__4__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30222
|
|
2491
2549
|
)
|
|
2492
2550
|
end
|
|
2493
2551
|
else
|
|
@@ -2497,20 +2555,20 @@ trampCall(
|
|
|
2497
2555
|
begin
|
|
2498
2556
|
embedBacktraceInfo( "", 1 );
|
|
2499
2557
|
_cdr(
|
|
2500
|
-
|
|
2558
|
+
__v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30220
|
|
2501
2559
|
)
|
|
2502
2560
|
end
|
|
2503
2561
|
)
|
|
2504
2562
|
end
|
|
2505
2563
|
} ; ___lambda.call(
|
|
2506
|
-
|
|
2564
|
+
__v__3__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30221
|
|
2507
2565
|
)
|
|
2508
2566
|
end
|
|
2509
2567
|
} ; ___lambda.call(
|
|
2510
2568
|
begin
|
|
2511
2569
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
|
|
2512
2570
|
_car(
|
|
2513
|
-
|
|
2571
|
+
__v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30220
|
|
2514
2572
|
)
|
|
2515
2573
|
end
|
|
2516
2574
|
)
|
|
@@ -2522,7 +2580,7 @@ trampCall(
|
|
|
2522
2580
|
begin
|
|
2523
2581
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
|
|
2524
2582
|
_car(
|
|
2525
|
-
|
|
2583
|
+
__v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30219
|
|
2526
2584
|
)
|
|
2527
2585
|
end
|
|
2528
2586
|
)
|
|
@@ -2534,7 +2592,7 @@ trampCall(
|
|
|
2534
2592
|
begin
|
|
2535
2593
|
embedBacktraceInfo( "", 1 );
|
|
2536
2594
|
_cdr(
|
|
2537
|
-
|
|
2595
|
+
__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30211
|
|
2538
2596
|
)
|
|
2539
2597
|
end
|
|
2540
2598
|
)
|
|
@@ -2566,56 +2624,56 @@ trampCall(
|
|
|
2566
2624
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
2567
2625
|
end ,
|
|
2568
2626
|
[
|
|
2569
|
-
Proc.new { |
|
|
2627
|
+
Proc.new { |__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30226,__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30227,__compare__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30228|
|
|
2570
2628
|
begin
|
|
2571
|
-
___lambda = lambda { |
|
|
2629
|
+
___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30241|
|
|
2572
2630
|
if (
|
|
2573
2631
|
begin
|
|
2574
|
-
trampCall(
|
|
2632
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30241)
|
|
2575
2633
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
2576
2634
|
end
|
|
2577
2635
|
) then
|
|
2578
2636
|
begin
|
|
2579
|
-
trampCall(
|
|
2637
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30241)
|
|
2580
2638
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
2581
2639
|
end
|
|
2582
2640
|
else
|
|
2583
2641
|
begin
|
|
2584
|
-
___lambda = lambda { |
|
|
2642
|
+
___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30242|
|
|
2585
2643
|
if (
|
|
2586
2644
|
begin
|
|
2587
|
-
trampCall(
|
|
2645
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30242)
|
|
2588
2646
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
2589
2647
|
end
|
|
2590
2648
|
) then
|
|
2591
2649
|
begin
|
|
2592
|
-
trampCall(
|
|
2650
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30242)
|
|
2593
2651
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
2594
2652
|
end
|
|
2595
2653
|
else
|
|
2596
2654
|
begin
|
|
2597
|
-
___lambda = lambda { |
|
|
2655
|
+
___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30243|
|
|
2598
2656
|
if (
|
|
2599
2657
|
begin
|
|
2600
|
-
trampCall(
|
|
2658
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30243)
|
|
2601
2659
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
2602
2660
|
end
|
|
2603
2661
|
) then
|
|
2604
2662
|
begin
|
|
2605
|
-
trampCall(
|
|
2663
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30243)
|
|
2606
2664
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
2607
2665
|
end
|
|
2608
2666
|
else
|
|
2609
2667
|
begin
|
|
2610
|
-
___lambda = lambda { |
|
|
2668
|
+
___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30244|
|
|
2611
2669
|
if (
|
|
2612
2670
|
begin
|
|
2613
|
-
trampCall(
|
|
2671
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30244)
|
|
2614
2672
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
2615
2673
|
end
|
|
2616
2674
|
) then
|
|
2617
2675
|
begin
|
|
2618
|
-
trampCall(
|
|
2676
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30244)
|
|
2619
2677
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
2620
2678
|
end
|
|
2621
2679
|
else
|
|
@@ -2635,13 +2693,13 @@ trampCall(
|
|
|
2635
2693
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
2636
2694
|
end ,
|
|
2637
2695
|
[
|
|
2638
|
-
|
|
2696
|
+
__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30226
|
|
2639
2697
|
]
|
|
2640
2698
|
))
|
|
2641
2699
|
end
|
|
2642
2700
|
)
|
|
2643
2701
|
rescue => __e
|
|
2644
|
-
__e.set_backtrace( ["./lib/nendo/experimental.nnd:
|
|
2702
|
+
__e.set_backtrace( ["./lib/nendo/experimental.nnd:153"] + __e.backtrace )
|
|
2645
2703
|
raise __e
|
|
2646
2704
|
end
|
|
2647
2705
|
)
|
|
@@ -2649,7 +2707,7 @@ trampCall(
|
|
|
2649
2707
|
end
|
|
2650
2708
|
} ; ___lambda.call(
|
|
2651
2709
|
begin
|
|
2652
|
-
___lambda = lambda { |
|
|
2710
|
+
___lambda = lambda { |__v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30238|
|
|
2653
2711
|
if (
|
|
2654
2712
|
begin
|
|
2655
2713
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
@@ -2661,7 +2719,7 @@ trampCall(
|
|
|
2661
2719
|
begin
|
|
2662
2720
|
embedBacktraceInfo( "", 1 );
|
|
2663
2721
|
_pair_QUMARK(
|
|
2664
|
-
|
|
2722
|
+
__v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30238
|
|
2665
2723
|
)
|
|
2666
2724
|
end
|
|
2667
2725
|
)
|
|
@@ -2670,11 +2728,11 @@ trampCall(
|
|
|
2670
2728
|
end
|
|
2671
2729
|
) then
|
|
2672
2730
|
begin
|
|
2673
|
-
___lambda = lambda { |
|
|
2731
|
+
___lambda = lambda { |__v__6__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30239|
|
|
2674
2732
|
begin
|
|
2675
2733
|
___lambda = lambda { |_var_MIMARKclauses|
|
|
2676
2734
|
begin
|
|
2677
|
-
___lambda = lambda { |
|
|
2735
|
+
___lambda = lambda { |__v__7__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30240|
|
|
2678
2736
|
if (
|
|
2679
2737
|
begin
|
|
2680
2738
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
@@ -2693,7 +2751,7 @@ trampCall(
|
|
|
2693
2751
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
2694
2752
|
end ,
|
|
2695
2753
|
[
|
|
2696
|
-
|
|
2754
|
+
__v__7__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30240
|
|
2697
2755
|
]
|
|
2698
2756
|
))
|
|
2699
2757
|
end
|
|
@@ -2709,9 +2767,9 @@ trampCall(
|
|
|
2709
2767
|
_cons(
|
|
2710
2768
|
begin
|
|
2711
2769
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
2712
|
-
trampCall( callProcedure( '
|
|
2770
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30227', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30227',
|
|
2713
2771
|
begin
|
|
2714
|
-
trampCall(
|
|
2772
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30227)
|
|
2715
2773
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
2716
2774
|
end ,
|
|
2717
2775
|
[
|
|
@@ -2727,9 +2785,9 @@ trampCall(
|
|
|
2727
2785
|
_cons(
|
|
2728
2786
|
begin
|
|
2729
2787
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
2730
|
-
trampCall( callProcedure( '
|
|
2788
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30227', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30227',
|
|
2731
2789
|
begin
|
|
2732
|
-
trampCall(
|
|
2790
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30227)
|
|
2733
2791
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
2734
2792
|
end ,
|
|
2735
2793
|
[
|
|
@@ -2742,7 +2800,7 @@ trampCall(
|
|
|
2742
2800
|
_cons(
|
|
2743
2801
|
begin
|
|
2744
2802
|
trampCall(_var_MIMARKclauses)
|
|
2745
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:
|
|
2803
|
+
rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:159"] + __e.backtrace ) ; raise __e
|
|
2746
2804
|
end ,
|
|
2747
2805
|
Cell.new()
|
|
2748
2806
|
)
|
|
@@ -2757,9 +2815,9 @@ trampCall(
|
|
|
2757
2815
|
_cons(
|
|
2758
2816
|
begin
|
|
2759
2817
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
2760
|
-
trampCall( callProcedure( '
|
|
2818
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30227', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30227',
|
|
2761
2819
|
begin
|
|
2762
|
-
trampCall(
|
|
2820
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30227)
|
|
2763
2821
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
2764
2822
|
end ,
|
|
2765
2823
|
[
|
|
@@ -2772,7 +2830,7 @@ trampCall(
|
|
|
2772
2830
|
_cons(
|
|
2773
2831
|
begin
|
|
2774
2832
|
trampCall(_var_MIMARKclauses)
|
|
2775
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:
|
|
2833
|
+
rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:159"] + __e.backtrace ) ; raise __e
|
|
2776
2834
|
end ,
|
|
2777
2835
|
Cell.new()
|
|
2778
2836
|
)
|
|
@@ -2792,12 +2850,12 @@ trampCall(
|
|
|
2792
2850
|
Proc.new { |_body|
|
|
2793
2851
|
begin
|
|
2794
2852
|
trampCall(_body)
|
|
2795
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:
|
|
2853
|
+
rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:160"] + __e.backtrace ) ; raise __e
|
|
2796
2854
|
end
|
|
2797
2855
|
} ,
|
|
2798
2856
|
begin
|
|
2799
2857
|
trampCall(_body)
|
|
2800
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:
|
|
2858
|
+
rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:160"] + __e.backtrace ) ; raise __e
|
|
2801
2859
|
end
|
|
2802
2860
|
]
|
|
2803
2861
|
))
|
|
@@ -2809,7 +2867,7 @@ trampCall(
|
|
|
2809
2867
|
)
|
|
2810
2868
|
end
|
|
2811
2869
|
} ; ___lambda.call(
|
|
2812
|
-
|
|
2870
|
+
__v__7__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30240
|
|
2813
2871
|
)
|
|
2814
2872
|
end
|
|
2815
2873
|
else
|
|
@@ -2819,20 +2877,20 @@ trampCall(
|
|
|
2819
2877
|
begin
|
|
2820
2878
|
embedBacktraceInfo( "", 1 );
|
|
2821
2879
|
_cdr(
|
|
2822
|
-
|
|
2880
|
+
__v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30238
|
|
2823
2881
|
)
|
|
2824
2882
|
end
|
|
2825
2883
|
)
|
|
2826
2884
|
end
|
|
2827
2885
|
} ; ___lambda.call(
|
|
2828
|
-
|
|
2886
|
+
__v__6__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30239
|
|
2829
2887
|
)
|
|
2830
2888
|
end
|
|
2831
2889
|
} ; ___lambda.call(
|
|
2832
2890
|
begin
|
|
2833
2891
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
|
|
2834
2892
|
_car(
|
|
2835
|
-
|
|
2893
|
+
__v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30238
|
|
2836
2894
|
)
|
|
2837
2895
|
end
|
|
2838
2896
|
)
|
|
@@ -2844,7 +2902,7 @@ trampCall(
|
|
|
2844
2902
|
begin
|
|
2845
2903
|
embedBacktraceInfo( "", 1 );
|
|
2846
2904
|
_cdr(
|
|
2847
|
-
|
|
2905
|
+
__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30226
|
|
2848
2906
|
)
|
|
2849
2907
|
end
|
|
2850
2908
|
)
|
|
@@ -2854,7 +2912,7 @@ trampCall(
|
|
|
2854
2912
|
end
|
|
2855
2913
|
} ; ___lambda.call(
|
|
2856
2914
|
begin
|
|
2857
|
-
___lambda = lambda { |
|
|
2915
|
+
___lambda = lambda { |__v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30235|
|
|
2858
2916
|
if (
|
|
2859
2917
|
begin
|
|
2860
2918
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
@@ -2866,7 +2924,7 @@ trampCall(
|
|
|
2866
2924
|
begin
|
|
2867
2925
|
embedBacktraceInfo( "", 1 );
|
|
2868
2926
|
_pair_QUMARK(
|
|
2869
|
-
|
|
2927
|
+
__v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30235
|
|
2870
2928
|
)
|
|
2871
2929
|
end
|
|
2872
2930
|
)
|
|
@@ -2875,11 +2933,11 @@ trampCall(
|
|
|
2875
2933
|
end
|
|
2876
2934
|
) then
|
|
2877
2935
|
begin
|
|
2878
|
-
___lambda = lambda { |
|
|
2936
|
+
___lambda = lambda { |__v__3__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30236|
|
|
2879
2937
|
begin
|
|
2880
2938
|
___lambda = lambda { |_var_MIMARKclauses|
|
|
2881
2939
|
begin
|
|
2882
|
-
___lambda = lambda { |
|
|
2940
|
+
___lambda = lambda { |__v__4__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30237|
|
|
2883
2941
|
if (
|
|
2884
2942
|
begin
|
|
2885
2943
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
@@ -2891,7 +2949,7 @@ trampCall(
|
|
|
2891
2949
|
begin
|
|
2892
2950
|
embedBacktraceInfo( "", 1 );
|
|
2893
2951
|
_null_QUMARK(
|
|
2894
|
-
|
|
2952
|
+
__v__4__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30237
|
|
2895
2953
|
)
|
|
2896
2954
|
end
|
|
2897
2955
|
)
|
|
@@ -2904,9 +2962,9 @@ trampCall(
|
|
|
2904
2962
|
_cons(
|
|
2905
2963
|
begin
|
|
2906
2964
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
2907
|
-
trampCall( callProcedure( '
|
|
2965
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30227', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30227',
|
|
2908
2966
|
begin
|
|
2909
|
-
trampCall(
|
|
2967
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30227)
|
|
2910
2968
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
2911
2969
|
end ,
|
|
2912
2970
|
[
|
|
@@ -2930,20 +2988,20 @@ trampCall(
|
|
|
2930
2988
|
begin
|
|
2931
2989
|
embedBacktraceInfo( "", 1 );
|
|
2932
2990
|
_cdr(
|
|
2933
|
-
|
|
2991
|
+
__v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30235
|
|
2934
2992
|
)
|
|
2935
2993
|
end
|
|
2936
2994
|
)
|
|
2937
2995
|
end
|
|
2938
2996
|
} ; ___lambda.call(
|
|
2939
|
-
|
|
2997
|
+
__v__3__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30236
|
|
2940
2998
|
)
|
|
2941
2999
|
end
|
|
2942
3000
|
} ; ___lambda.call(
|
|
2943
3001
|
begin
|
|
2944
3002
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
|
|
2945
3003
|
_car(
|
|
2946
|
-
|
|
3004
|
+
__v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30235
|
|
2947
3005
|
)
|
|
2948
3006
|
end
|
|
2949
3007
|
)
|
|
@@ -2955,7 +3013,7 @@ trampCall(
|
|
|
2955
3013
|
begin
|
|
2956
3014
|
embedBacktraceInfo( "", 1 );
|
|
2957
3015
|
_cdr(
|
|
2958
|
-
|
|
3016
|
+
__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30226
|
|
2959
3017
|
)
|
|
2960
3018
|
end
|
|
2961
3019
|
)
|
|
@@ -2965,7 +3023,7 @@ trampCall(
|
|
|
2965
3023
|
end
|
|
2966
3024
|
} ; ___lambda.call(
|
|
2967
3025
|
begin
|
|
2968
|
-
___lambda = lambda { |
|
|
3026
|
+
___lambda = lambda { |__v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30234|
|
|
2969
3027
|
if (
|
|
2970
3028
|
begin
|
|
2971
3029
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
@@ -2977,7 +3035,7 @@ trampCall(
|
|
|
2977
3035
|
begin
|
|
2978
3036
|
embedBacktraceInfo( "", 1 );
|
|
2979
3037
|
_null_QUMARK(
|
|
2980
|
-
|
|
3038
|
+
__v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30234
|
|
2981
3039
|
)
|
|
2982
3040
|
end
|
|
2983
3041
|
)
|
|
@@ -2990,9 +3048,9 @@ trampCall(
|
|
|
2990
3048
|
_cons(
|
|
2991
3049
|
begin
|
|
2992
3050
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
2993
|
-
trampCall( callProcedure( '
|
|
3051
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30227', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30227',
|
|
2994
3052
|
begin
|
|
2995
|
-
trampCall(
|
|
3053
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30227)
|
|
2996
3054
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
2997
3055
|
end ,
|
|
2998
3056
|
[
|
|
@@ -3016,7 +3074,7 @@ trampCall(
|
|
|
3016
3074
|
begin
|
|
3017
3075
|
embedBacktraceInfo( "", 1 );
|
|
3018
3076
|
_cdr(
|
|
3019
|
-
|
|
3077
|
+
__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30226
|
|
3020
3078
|
)
|
|
3021
3079
|
end
|
|
3022
3080
|
)
|
|
@@ -3048,56 +3106,56 @@ trampCall(
|
|
|
3048
3106
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
3049
3107
|
end ,
|
|
3050
3108
|
[
|
|
3051
|
-
Proc.new { |
|
|
3109
|
+
Proc.new { |__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30245,__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246,__compare__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30247|
|
|
3052
3110
|
begin
|
|
3053
|
-
___lambda = lambda { |
|
|
3111
|
+
___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30262|
|
|
3054
3112
|
if (
|
|
3055
3113
|
begin
|
|
3056
|
-
trampCall(
|
|
3114
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30262)
|
|
3057
3115
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
3058
3116
|
end
|
|
3059
3117
|
) then
|
|
3060
3118
|
begin
|
|
3061
|
-
trampCall(
|
|
3119
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30262)
|
|
3062
3120
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
3063
3121
|
end
|
|
3064
3122
|
else
|
|
3065
3123
|
begin
|
|
3066
|
-
___lambda = lambda { |
|
|
3124
|
+
___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30263|
|
|
3067
3125
|
if (
|
|
3068
3126
|
begin
|
|
3069
|
-
trampCall(
|
|
3127
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30263)
|
|
3070
3128
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
3071
3129
|
end
|
|
3072
3130
|
) then
|
|
3073
3131
|
begin
|
|
3074
|
-
trampCall(
|
|
3132
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30263)
|
|
3075
3133
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
3076
3134
|
end
|
|
3077
3135
|
else
|
|
3078
3136
|
begin
|
|
3079
|
-
___lambda = lambda { |
|
|
3137
|
+
___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30264|
|
|
3080
3138
|
if (
|
|
3081
3139
|
begin
|
|
3082
|
-
trampCall(
|
|
3140
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30264)
|
|
3083
3141
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
3084
3142
|
end
|
|
3085
3143
|
) then
|
|
3086
3144
|
begin
|
|
3087
|
-
trampCall(
|
|
3145
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30264)
|
|
3088
3146
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
3089
3147
|
end
|
|
3090
3148
|
else
|
|
3091
3149
|
begin
|
|
3092
|
-
___lambda = lambda { |
|
|
3150
|
+
___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30265|
|
|
3093
3151
|
if (
|
|
3094
3152
|
begin
|
|
3095
|
-
trampCall(
|
|
3153
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30265)
|
|
3096
3154
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
3097
3155
|
end
|
|
3098
3156
|
) then
|
|
3099
3157
|
begin
|
|
3100
|
-
trampCall(
|
|
3158
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30265)
|
|
3101
3159
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
3102
3160
|
end
|
|
3103
3161
|
else
|
|
@@ -3117,13 +3175,13 @@ trampCall(
|
|
|
3117
3175
|
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
3118
3176
|
end ,
|
|
3119
3177
|
[
|
|
3120
|
-
|
|
3178
|
+
__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30245
|
|
3121
3179
|
]
|
|
3122
3180
|
))
|
|
3123
3181
|
end
|
|
3124
3182
|
)
|
|
3125
3183
|
rescue => __e
|
|
3126
|
-
__e.set_backtrace( ["./lib/nendo/experimental.nnd:
|
|
3184
|
+
__e.set_backtrace( ["./lib/nendo/experimental.nnd:169"] + __e.backtrace )
|
|
3127
3185
|
raise __e
|
|
3128
3186
|
end
|
|
3129
3187
|
)
|
|
@@ -3131,7 +3189,7 @@ trampCall(
|
|
|
3131
3189
|
end
|
|
3132
3190
|
} ; ___lambda.call(
|
|
3133
3191
|
begin
|
|
3134
|
-
___lambda = lambda { |
|
|
3192
|
+
___lambda = lambda { |__v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30257|
|
|
3135
3193
|
if (
|
|
3136
3194
|
begin
|
|
3137
3195
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
@@ -3143,7 +3201,7 @@ trampCall(
|
|
|
3143
3201
|
begin
|
|
3144
3202
|
embedBacktraceInfo( "", 1 );
|
|
3145
3203
|
_pair_QUMARK(
|
|
3146
|
-
|
|
3204
|
+
__v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30257
|
|
3147
3205
|
)
|
|
3148
3206
|
end
|
|
3149
3207
|
)
|
|
@@ -3152,11 +3210,11 @@ trampCall(
|
|
|
3152
3210
|
end
|
|
3153
3211
|
) then
|
|
3154
3212
|
begin
|
|
3155
|
-
___lambda = lambda { |
|
|
3213
|
+
___lambda = lambda { |__v__6__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30258|
|
|
3156
3214
|
begin
|
|
3157
3215
|
___lambda = lambda { |_body|
|
|
3158
3216
|
begin
|
|
3159
|
-
___lambda = lambda { |
|
|
3217
|
+
___lambda = lambda { |__v__7__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30259|
|
|
3160
3218
|
if (
|
|
3161
3219
|
begin
|
|
3162
3220
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
@@ -3168,7 +3226,7 @@ trampCall(
|
|
|
3168
3226
|
begin
|
|
3169
3227
|
embedBacktraceInfo( "", 1 );
|
|
3170
3228
|
_pair_QUMARK(
|
|
3171
|
-
|
|
3229
|
+
__v__7__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30259
|
|
3172
3230
|
)
|
|
3173
3231
|
end
|
|
3174
3232
|
)
|
|
@@ -3177,11 +3235,11 @@ trampCall(
|
|
|
3177
3235
|
end
|
|
3178
3236
|
) then
|
|
3179
3237
|
begin
|
|
3180
|
-
___lambda = lambda { |
|
|
3238
|
+
___lambda = lambda { |__v__8__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30260|
|
|
3181
3239
|
begin
|
|
3182
3240
|
___lambda = lambda { |_cleanup|
|
|
3183
3241
|
begin
|
|
3184
|
-
___lambda = lambda { |
|
|
3242
|
+
___lambda = lambda { |__v__9__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30261|
|
|
3185
3243
|
if (
|
|
3186
3244
|
begin
|
|
3187
3245
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
@@ -3193,7 +3251,7 @@ trampCall(
|
|
|
3193
3251
|
begin
|
|
3194
3252
|
embedBacktraceInfo( "", 1 );
|
|
3195
3253
|
_null_QUMARK(
|
|
3196
|
-
|
|
3254
|
+
__v__9__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30261
|
|
3197
3255
|
)
|
|
3198
3256
|
end
|
|
3199
3257
|
)
|
|
@@ -3206,9 +3264,9 @@ trampCall(
|
|
|
3206
3264
|
_cons(
|
|
3207
3265
|
begin
|
|
3208
3266
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
3209
|
-
trampCall( callProcedure( '
|
|
3267
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246',
|
|
3210
3268
|
begin
|
|
3211
|
-
trampCall(
|
|
3269
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246)
|
|
3212
3270
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
3213
3271
|
end ,
|
|
3214
3272
|
[
|
|
@@ -3221,9 +3279,9 @@ trampCall(
|
|
|
3221
3279
|
_cons(
|
|
3222
3280
|
begin
|
|
3223
3281
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
3224
|
-
trampCall( callProcedure( '
|
|
3282
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246',
|
|
3225
3283
|
begin
|
|
3226
|
-
trampCall(
|
|
3284
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246)
|
|
3227
3285
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
3228
3286
|
end ,
|
|
3229
3287
|
[
|
|
@@ -3243,9 +3301,9 @@ trampCall(
|
|
|
3243
3301
|
_cons(
|
|
3244
3302
|
begin
|
|
3245
3303
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
3246
|
-
trampCall( callProcedure( '
|
|
3304
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246',
|
|
3247
3305
|
begin
|
|
3248
|
-
trampCall(
|
|
3306
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246)
|
|
3249
3307
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
3250
3308
|
end ,
|
|
3251
3309
|
[
|
|
@@ -3261,9 +3319,9 @@ trampCall(
|
|
|
3261
3319
|
_cons(
|
|
3262
3320
|
begin
|
|
3263
3321
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
3264
|
-
trampCall( callProcedure( '
|
|
3322
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246',
|
|
3265
3323
|
begin
|
|
3266
|
-
trampCall(
|
|
3324
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246)
|
|
3267
3325
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
3268
3326
|
end ,
|
|
3269
3327
|
[
|
|
@@ -3286,9 +3344,9 @@ trampCall(
|
|
|
3286
3344
|
_cons(
|
|
3287
3345
|
begin
|
|
3288
3346
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
3289
|
-
trampCall( callProcedure( '
|
|
3347
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246',
|
|
3290
3348
|
begin
|
|
3291
|
-
trampCall(
|
|
3349
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246)
|
|
3292
3350
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
3293
3351
|
end ,
|
|
3294
3352
|
[
|
|
@@ -3301,16 +3359,16 @@ trampCall(
|
|
|
3301
3359
|
_cons(
|
|
3302
3360
|
begin
|
|
3303
3361
|
trampCall(_cleanup)
|
|
3304
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:
|
|
3362
|
+
rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:177"] + __e.backtrace ) ; raise __e
|
|
3305
3363
|
end ,
|
|
3306
3364
|
begin
|
|
3307
3365
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
3308
3366
|
_cons(
|
|
3309
3367
|
begin
|
|
3310
3368
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
3311
|
-
trampCall( callProcedure( '
|
|
3369
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246',
|
|
3312
3370
|
begin
|
|
3313
|
-
trampCall(
|
|
3371
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246)
|
|
3314
3372
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
3315
3373
|
end ,
|
|
3316
3374
|
[
|
|
@@ -3343,9 +3401,9 @@ trampCall(
|
|
|
3343
3401
|
_cons(
|
|
3344
3402
|
begin
|
|
3345
3403
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
3346
|
-
trampCall( callProcedure( '
|
|
3404
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246',
|
|
3347
3405
|
begin
|
|
3348
|
-
trampCall(
|
|
3406
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246)
|
|
3349
3407
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
3350
3408
|
end ,
|
|
3351
3409
|
[
|
|
@@ -3361,9 +3419,9 @@ trampCall(
|
|
|
3361
3419
|
_cons(
|
|
3362
3420
|
begin
|
|
3363
3421
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
3364
|
-
trampCall( callProcedure( '
|
|
3422
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246',
|
|
3365
3423
|
begin
|
|
3366
|
-
trampCall(
|
|
3424
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246)
|
|
3367
3425
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
3368
3426
|
end ,
|
|
3369
3427
|
[
|
|
@@ -3376,9 +3434,9 @@ trampCall(
|
|
|
3376
3434
|
_cons(
|
|
3377
3435
|
begin
|
|
3378
3436
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
3379
|
-
trampCall( callProcedure( '
|
|
3437
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246',
|
|
3380
3438
|
begin
|
|
3381
|
-
trampCall(
|
|
3439
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246)
|
|
3382
3440
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
3383
3441
|
end ,
|
|
3384
3442
|
[
|
|
@@ -3391,7 +3449,7 @@ trampCall(
|
|
|
3391
3449
|
_cons(
|
|
3392
3450
|
begin
|
|
3393
3451
|
trampCall(_body)
|
|
3394
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:
|
|
3452
|
+
rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:176"] + __e.backtrace ) ; raise __e
|
|
3395
3453
|
end ,
|
|
3396
3454
|
Cell.new()
|
|
3397
3455
|
)
|
|
@@ -3405,7 +3463,7 @@ trampCall(
|
|
|
3405
3463
|
_cons(
|
|
3406
3464
|
begin
|
|
3407
3465
|
trampCall(_cleanup)
|
|
3408
|
-
rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:
|
|
3466
|
+
rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:177"] + __e.backtrace ) ; raise __e
|
|
3409
3467
|
end ,
|
|
3410
3468
|
Cell.new()
|
|
3411
3469
|
)
|
|
@@ -3437,20 +3495,20 @@ trampCall(
|
|
|
3437
3495
|
begin
|
|
3438
3496
|
embedBacktraceInfo( "", 1 );
|
|
3439
3497
|
_cdr(
|
|
3440
|
-
|
|
3498
|
+
__v__7__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30259
|
|
3441
3499
|
)
|
|
3442
3500
|
end
|
|
3443
3501
|
)
|
|
3444
3502
|
end
|
|
3445
3503
|
} ; ___lambda.call(
|
|
3446
|
-
|
|
3504
|
+
__v__8__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30260
|
|
3447
3505
|
)
|
|
3448
3506
|
end
|
|
3449
3507
|
} ; ___lambda.call(
|
|
3450
3508
|
begin
|
|
3451
3509
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
|
|
3452
3510
|
_car(
|
|
3453
|
-
|
|
3511
|
+
__v__7__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30259
|
|
3454
3512
|
)
|
|
3455
3513
|
end
|
|
3456
3514
|
)
|
|
@@ -3462,20 +3520,20 @@ trampCall(
|
|
|
3462
3520
|
begin
|
|
3463
3521
|
embedBacktraceInfo( "", 1 );
|
|
3464
3522
|
_cdr(
|
|
3465
|
-
|
|
3523
|
+
__v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30257
|
|
3466
3524
|
)
|
|
3467
3525
|
end
|
|
3468
3526
|
)
|
|
3469
3527
|
end
|
|
3470
3528
|
} ; ___lambda.call(
|
|
3471
|
-
|
|
3529
|
+
__v__6__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30258
|
|
3472
3530
|
)
|
|
3473
3531
|
end
|
|
3474
3532
|
} ; ___lambda.call(
|
|
3475
3533
|
begin
|
|
3476
3534
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
|
|
3477
3535
|
_car(
|
|
3478
|
-
|
|
3536
|
+
__v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30257
|
|
3479
3537
|
)
|
|
3480
3538
|
end
|
|
3481
3539
|
)
|
|
@@ -3487,7 +3545,7 @@ trampCall(
|
|
|
3487
3545
|
begin
|
|
3488
3546
|
embedBacktraceInfo( "", 1 );
|
|
3489
3547
|
_cdr(
|
|
3490
|
-
|
|
3548
|
+
__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30245
|
|
3491
3549
|
)
|
|
3492
3550
|
end
|
|
3493
3551
|
)
|
|
@@ -3497,7 +3555,7 @@ trampCall(
|
|
|
3497
3555
|
end
|
|
3498
3556
|
} ; ___lambda.call(
|
|
3499
3557
|
begin
|
|
3500
|
-
___lambda = lambda { |
|
|
3558
|
+
___lambda = lambda { |__v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30254|
|
|
3501
3559
|
if (
|
|
3502
3560
|
begin
|
|
3503
3561
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
@@ -3509,7 +3567,7 @@ trampCall(
|
|
|
3509
3567
|
begin
|
|
3510
3568
|
embedBacktraceInfo( "", 1 );
|
|
3511
3569
|
_pair_QUMARK(
|
|
3512
|
-
|
|
3570
|
+
__v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30254
|
|
3513
3571
|
)
|
|
3514
3572
|
end
|
|
3515
3573
|
)
|
|
@@ -3518,11 +3576,11 @@ trampCall(
|
|
|
3518
3576
|
end
|
|
3519
3577
|
) then
|
|
3520
3578
|
begin
|
|
3521
|
-
___lambda = lambda { |
|
|
3579
|
+
___lambda = lambda { |__v__3__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30255|
|
|
3522
3580
|
begin
|
|
3523
3581
|
___lambda = lambda { |_body|
|
|
3524
3582
|
begin
|
|
3525
|
-
___lambda = lambda { |
|
|
3583
|
+
___lambda = lambda { |__v__4__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30256|
|
|
3526
3584
|
if (
|
|
3527
3585
|
begin
|
|
3528
3586
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
@@ -3534,7 +3592,7 @@ trampCall(
|
|
|
3534
3592
|
begin
|
|
3535
3593
|
embedBacktraceInfo( "", 1 );
|
|
3536
3594
|
_null_QUMARK(
|
|
3537
|
-
|
|
3595
|
+
__v__4__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30256
|
|
3538
3596
|
)
|
|
3539
3597
|
end
|
|
3540
3598
|
)
|
|
@@ -3547,9 +3605,9 @@ trampCall(
|
|
|
3547
3605
|
_cons(
|
|
3548
3606
|
begin
|
|
3549
3607
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
3550
|
-
trampCall( callProcedure( '
|
|
3608
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246',
|
|
3551
3609
|
begin
|
|
3552
|
-
trampCall(
|
|
3610
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246)
|
|
3553
3611
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
3554
3612
|
end ,
|
|
3555
3613
|
[
|
|
@@ -3573,20 +3631,20 @@ trampCall(
|
|
|
3573
3631
|
begin
|
|
3574
3632
|
embedBacktraceInfo( "", 1 );
|
|
3575
3633
|
_cdr(
|
|
3576
|
-
|
|
3634
|
+
__v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30254
|
|
3577
3635
|
)
|
|
3578
3636
|
end
|
|
3579
3637
|
)
|
|
3580
3638
|
end
|
|
3581
3639
|
} ; ___lambda.call(
|
|
3582
|
-
|
|
3640
|
+
__v__3__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30255
|
|
3583
3641
|
)
|
|
3584
3642
|
end
|
|
3585
3643
|
} ; ___lambda.call(
|
|
3586
3644
|
begin
|
|
3587
3645
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
|
|
3588
3646
|
_car(
|
|
3589
|
-
|
|
3647
|
+
__v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30254
|
|
3590
3648
|
)
|
|
3591
3649
|
end
|
|
3592
3650
|
)
|
|
@@ -3598,7 +3656,7 @@ trampCall(
|
|
|
3598
3656
|
begin
|
|
3599
3657
|
embedBacktraceInfo( "", 1 );
|
|
3600
3658
|
_cdr(
|
|
3601
|
-
|
|
3659
|
+
__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30245
|
|
3602
3660
|
)
|
|
3603
3661
|
end
|
|
3604
3662
|
)
|
|
@@ -3608,7 +3666,7 @@ trampCall(
|
|
|
3608
3666
|
end
|
|
3609
3667
|
} ; ___lambda.call(
|
|
3610
3668
|
begin
|
|
3611
|
-
___lambda = lambda { |
|
|
3669
|
+
___lambda = lambda { |__v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30253|
|
|
3612
3670
|
if (
|
|
3613
3671
|
begin
|
|
3614
3672
|
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
@@ -3620,7 +3678,7 @@ trampCall(
|
|
|
3620
3678
|
begin
|
|
3621
3679
|
embedBacktraceInfo( "", 1 );
|
|
3622
3680
|
_null_QUMARK(
|
|
3623
|
-
|
|
3681
|
+
__v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30253
|
|
3624
3682
|
)
|
|
3625
3683
|
end
|
|
3626
3684
|
)
|
|
@@ -3633,9 +3691,9 @@ trampCall(
|
|
|
3633
3691
|
_cons(
|
|
3634
3692
|
begin
|
|
3635
3693
|
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
3636
|
-
trampCall( callProcedure( '
|
|
3694
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246',
|
|
3637
3695
|
begin
|
|
3638
|
-
trampCall(
|
|
3696
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246)
|
|
3639
3697
|
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
3640
3698
|
end ,
|
|
3641
3699
|
[
|
|
@@ -3659,7 +3717,1795 @@ trampCall(
|
|
|
3659
3717
|
begin
|
|
3660
3718
|
embedBacktraceInfo( "", 1 );
|
|
3661
3719
|
_cdr(
|
|
3662
|
-
|
|
3720
|
+
__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30245
|
|
3721
|
+
)
|
|
3722
|
+
end
|
|
3723
|
+
)
|
|
3724
|
+
end
|
|
3725
|
+
)
|
|
3726
|
+
end
|
|
3727
|
+
}
|
|
3728
|
+
]
|
|
3729
|
+
))
|
|
3730
|
+
end
|
|
3731
|
+
)
|
|
3732
|
+
end
|
|
3733
|
+
)
|
|
3734
|
+
#--------------------
|
|
3735
|
+
|
|
3736
|
+
trampCall(
|
|
3737
|
+
begin
|
|
3738
|
+
def self._nendo_MIMARKsyntax_MIMARKerror_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_nendo_MIMARKsyntax_MIMARKerror', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
|
|
3739
|
+
@global_lisp_binding['_nendo_MIMARKsyntax_MIMARKerror'] = self.method( :_nendo_MIMARKsyntax_MIMARKerror_METHOD )
|
|
3740
|
+
@_nendo_MIMARKsyntax_MIMARKerror =
|
|
3741
|
+
trampCall(
|
|
3742
|
+
begin
|
|
3743
|
+
trampCall(SyntaxError)
|
|
3744
|
+
rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:181"] + __e.backtrace ) ; raise __e
|
|
3745
|
+
end
|
|
3746
|
+
)
|
|
3747
|
+
end
|
|
3748
|
+
)
|
|
3749
|
+
#--------------------
|
|
3750
|
+
|
|
3751
|
+
trampCall(
|
|
3752
|
+
begin
|
|
3753
|
+
def self._let1_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_let1', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
|
|
3754
|
+
@global_lisp_binding['_let1'] = self.method( :_let1_METHOD )
|
|
3755
|
+
@_let1 =
|
|
3756
|
+
trampCall(
|
|
3757
|
+
begin
|
|
3758
|
+
embedBacktraceInfo( "", 1 );
|
|
3759
|
+
trampCall( self._er_MIMARKmacro_MIMARKtransformer_METHOD( 'er-macro-transformer',
|
|
3760
|
+
begin
|
|
3761
|
+
if @global_lisp_binding.has_key?('_er_MIMARKmacro_MIMARKtransformer') then
|
|
3762
|
+
trampCall(@_er_MIMARKmacro_MIMARKtransformer)
|
|
3763
|
+
else raise NameError.new( "Error: undefined variable _er_MIMARKmacro_MIMARKtransformer", "_er_MIMARKmacro_MIMARKtransformer" ) end
|
|
3764
|
+
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
3765
|
+
end ,
|
|
3766
|
+
[
|
|
3767
|
+
Proc.new { |__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30266,__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267,__compare__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30268|
|
|
3768
|
+
begin
|
|
3769
|
+
___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30314|
|
|
3770
|
+
if (
|
|
3771
|
+
begin
|
|
3772
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30314)
|
|
3773
|
+
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
3774
|
+
end
|
|
3775
|
+
) then
|
|
3776
|
+
begin
|
|
3777
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30314)
|
|
3778
|
+
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
3779
|
+
end
|
|
3780
|
+
else
|
|
3781
|
+
begin
|
|
3782
|
+
___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30315|
|
|
3783
|
+
if (
|
|
3784
|
+
begin
|
|
3785
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30315)
|
|
3786
|
+
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
3787
|
+
end
|
|
3788
|
+
) then
|
|
3789
|
+
begin
|
|
3790
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30315)
|
|
3791
|
+
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
3792
|
+
end
|
|
3793
|
+
else
|
|
3794
|
+
begin
|
|
3795
|
+
___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30316|
|
|
3796
|
+
if (
|
|
3797
|
+
begin
|
|
3798
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30316)
|
|
3799
|
+
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
3800
|
+
end
|
|
3801
|
+
) then
|
|
3802
|
+
begin
|
|
3803
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30316)
|
|
3804
|
+
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
3805
|
+
end
|
|
3806
|
+
else
|
|
3807
|
+
begin
|
|
3808
|
+
___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30317|
|
|
3809
|
+
if (
|
|
3810
|
+
begin
|
|
3811
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30317)
|
|
3812
|
+
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
3813
|
+
end
|
|
3814
|
+
) then
|
|
3815
|
+
begin
|
|
3816
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30317)
|
|
3817
|
+
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
3818
|
+
end
|
|
3819
|
+
else
|
|
3820
|
+
begin
|
|
3821
|
+
___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30318|
|
|
3822
|
+
if (
|
|
3823
|
+
begin
|
|
3824
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30318)
|
|
3825
|
+
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
3826
|
+
end
|
|
3827
|
+
) then
|
|
3828
|
+
begin
|
|
3829
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30318)
|
|
3830
|
+
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
3831
|
+
end
|
|
3832
|
+
else
|
|
3833
|
+
begin
|
|
3834
|
+
___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30319|
|
|
3835
|
+
if (
|
|
3836
|
+
begin
|
|
3837
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30319)
|
|
3838
|
+
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
3839
|
+
end
|
|
3840
|
+
) then
|
|
3841
|
+
begin
|
|
3842
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30319)
|
|
3843
|
+
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
3844
|
+
end
|
|
3845
|
+
else
|
|
3846
|
+
begin
|
|
3847
|
+
___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30320|
|
|
3848
|
+
if (
|
|
3849
|
+
begin
|
|
3850
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30320)
|
|
3851
|
+
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
3852
|
+
end
|
|
3853
|
+
) then
|
|
3854
|
+
begin
|
|
3855
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30320)
|
|
3856
|
+
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
3857
|
+
end
|
|
3858
|
+
else
|
|
3859
|
+
begin
|
|
3860
|
+
___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30321|
|
|
3861
|
+
if (
|
|
3862
|
+
begin
|
|
3863
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30321)
|
|
3864
|
+
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
3865
|
+
end
|
|
3866
|
+
) then
|
|
3867
|
+
begin
|
|
3868
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30321)
|
|
3869
|
+
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
3870
|
+
end
|
|
3871
|
+
else
|
|
3872
|
+
begin
|
|
3873
|
+
___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30322|
|
|
3874
|
+
if (
|
|
3875
|
+
begin
|
|
3876
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30322)
|
|
3877
|
+
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
3878
|
+
end
|
|
3879
|
+
) then
|
|
3880
|
+
begin
|
|
3881
|
+
trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30322)
|
|
3882
|
+
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
3883
|
+
end
|
|
3884
|
+
else
|
|
3885
|
+
false
|
|
3886
|
+
end
|
|
3887
|
+
} ; ___lambda.call(
|
|
3888
|
+
begin raise RuntimeError,
|
|
3889
|
+
"no expansion for" ' ' +
|
|
3890
|
+
_write_MIMARKto_MIMARKstring(
|
|
3891
|
+
begin
|
|
3892
|
+
embedBacktraceInfo( "", 1 );
|
|
3893
|
+
trampCall( self._strip_MIMARKsyntactic_MIMARKclosures_METHOD( 'strip-syntactic-closures',
|
|
3894
|
+
begin
|
|
3895
|
+
if @global_lisp_binding.has_key?('_strip_MIMARKsyntactic_MIMARKclosures') then
|
|
3896
|
+
trampCall(@_strip_MIMARKsyntactic_MIMARKclosures)
|
|
3897
|
+
else raise NameError.new( "Error: undefined variable _strip_MIMARKsyntactic_MIMARKclosures", "_strip_MIMARKsyntactic_MIMARKclosures" ) end
|
|
3898
|
+
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
3899
|
+
end ,
|
|
3900
|
+
[
|
|
3901
|
+
__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30266
|
|
3902
|
+
]
|
|
3903
|
+
))
|
|
3904
|
+
end
|
|
3905
|
+
)
|
|
3906
|
+
rescue => __e
|
|
3907
|
+
__e.set_backtrace( ["./lib/nendo/experimental.nnd:169"] + __e.backtrace )
|
|
3908
|
+
raise __e
|
|
3909
|
+
end
|
|
3910
|
+
)
|
|
3911
|
+
end
|
|
3912
|
+
end
|
|
3913
|
+
} ; ___lambda.call(
|
|
3914
|
+
begin
|
|
3915
|
+
___lambda = lambda { |__v__36__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30309|
|
|
3916
|
+
if (
|
|
3917
|
+
begin
|
|
3918
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
3919
|
+
_not(
|
|
3920
|
+
begin
|
|
3921
|
+
embedBacktraceInfo( "", 1 );
|
|
3922
|
+
_eq_QUMARK(
|
|
3923
|
+
false ,
|
|
3924
|
+
begin
|
|
3925
|
+
embedBacktraceInfo( "", 1 );
|
|
3926
|
+
_pair_QUMARK(
|
|
3927
|
+
__v__36__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30309
|
|
3928
|
+
)
|
|
3929
|
+
end
|
|
3930
|
+
)
|
|
3931
|
+
end
|
|
3932
|
+
)
|
|
3933
|
+
end
|
|
3934
|
+
) then
|
|
3935
|
+
begin
|
|
3936
|
+
___lambda = lambda { |__v__37__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30310|
|
|
3937
|
+
begin
|
|
3938
|
+
___lambda = lambda { |_var|
|
|
3939
|
+
begin
|
|
3940
|
+
___lambda = lambda { |__v__38__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30311|
|
|
3941
|
+
if (
|
|
3942
|
+
begin
|
|
3943
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
3944
|
+
_not(
|
|
3945
|
+
begin
|
|
3946
|
+
embedBacktraceInfo( "", 1 );
|
|
3947
|
+
_eq_QUMARK(
|
|
3948
|
+
false ,
|
|
3949
|
+
begin
|
|
3950
|
+
embedBacktraceInfo( "", 1 );
|
|
3951
|
+
_pair_QUMARK(
|
|
3952
|
+
__v__38__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30311
|
|
3953
|
+
)
|
|
3954
|
+
end
|
|
3955
|
+
)
|
|
3956
|
+
end
|
|
3957
|
+
)
|
|
3958
|
+
end
|
|
3959
|
+
) then
|
|
3960
|
+
begin
|
|
3961
|
+
___lambda = lambda { |__v__39__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30312|
|
|
3962
|
+
begin
|
|
3963
|
+
___lambda = lambda { |_expr|
|
|
3964
|
+
begin
|
|
3965
|
+
___lambda = lambda { |__v__40__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30313|
|
|
3966
|
+
if (
|
|
3967
|
+
begin
|
|
3968
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
3969
|
+
_not(
|
|
3970
|
+
begin
|
|
3971
|
+
embedBacktraceInfo( "", 1 );
|
|
3972
|
+
_eq_QUMARK(
|
|
3973
|
+
false ,
|
|
3974
|
+
begin
|
|
3975
|
+
embedBacktraceInfo( "", 1 );
|
|
3976
|
+
trampCall( self._list_QUMARK_METHOD( 'list?',
|
|
3977
|
+
begin
|
|
3978
|
+
if @global_lisp_binding.has_key?('_list_QUMARK') then
|
|
3979
|
+
trampCall(@_list_QUMARK)
|
|
3980
|
+
else raise NameError.new( "Error: undefined variable _list_QUMARK", "_list_QUMARK" ) end
|
|
3981
|
+
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
3982
|
+
end ,
|
|
3983
|
+
[
|
|
3984
|
+
__v__40__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30313
|
|
3985
|
+
]
|
|
3986
|
+
))
|
|
3987
|
+
end
|
|
3988
|
+
)
|
|
3989
|
+
end
|
|
3990
|
+
)
|
|
3991
|
+
end
|
|
3992
|
+
) then
|
|
3993
|
+
begin
|
|
3994
|
+
___lambda = lambda { |_body|
|
|
3995
|
+
begin
|
|
3996
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
3997
|
+
_cons(
|
|
3998
|
+
begin
|
|
3999
|
+
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
4000
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267',
|
|
4001
|
+
begin
|
|
4002
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267)
|
|
4003
|
+
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
4004
|
+
end ,
|
|
4005
|
+
[
|
|
4006
|
+
:"%let"
|
|
4007
|
+
]
|
|
4008
|
+
))
|
|
4009
|
+
end ,
|
|
4010
|
+
begin
|
|
4011
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
4012
|
+
_cons(
|
|
4013
|
+
begin
|
|
4014
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
4015
|
+
_cons(
|
|
4016
|
+
begin
|
|
4017
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
4018
|
+
_cons(
|
|
4019
|
+
begin
|
|
4020
|
+
trampCall(_var)
|
|
4021
|
+
rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:199"] + __e.backtrace ) ; raise __e
|
|
4022
|
+
end ,
|
|
4023
|
+
begin
|
|
4024
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
4025
|
+
_cons(
|
|
4026
|
+
begin
|
|
4027
|
+
trampCall(_expr)
|
|
4028
|
+
rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:199"] + __e.backtrace ) ; raise __e
|
|
4029
|
+
end ,
|
|
4030
|
+
Cell.new()
|
|
4031
|
+
)
|
|
4032
|
+
end
|
|
4033
|
+
)
|
|
4034
|
+
end ,
|
|
4035
|
+
Cell.new()
|
|
4036
|
+
)
|
|
4037
|
+
end ,
|
|
4038
|
+
begin
|
|
4039
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 91 );
|
|
4040
|
+
trampCall( self._map_METHOD( 'map',
|
|
4041
|
+
begin
|
|
4042
|
+
if @global_lisp_binding.has_key?('_map') then
|
|
4043
|
+
trampCall(@_map)
|
|
4044
|
+
else raise NameError.new( "Error: undefined variable _map", "_map" ) end
|
|
4045
|
+
rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:91"] + __e.backtrace ) ; raise __e
|
|
4046
|
+
end ,
|
|
4047
|
+
[
|
|
4048
|
+
Proc.new { |_body|
|
|
4049
|
+
begin
|
|
4050
|
+
trampCall(_body)
|
|
4051
|
+
rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:199"] + __e.backtrace ) ; raise __e
|
|
4052
|
+
end
|
|
4053
|
+
} ,
|
|
4054
|
+
begin
|
|
4055
|
+
trampCall(_body)
|
|
4056
|
+
rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:199"] + __e.backtrace ) ; raise __e
|
|
4057
|
+
end
|
|
4058
|
+
]
|
|
4059
|
+
))
|
|
4060
|
+
end
|
|
4061
|
+
)
|
|
4062
|
+
end
|
|
4063
|
+
)
|
|
4064
|
+
end
|
|
4065
|
+
} ; ___lambda.call(
|
|
4066
|
+
__v__40__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30313
|
|
4067
|
+
)
|
|
4068
|
+
end
|
|
4069
|
+
else
|
|
4070
|
+
false
|
|
4071
|
+
end
|
|
4072
|
+
} ; ___lambda.call(
|
|
4073
|
+
begin
|
|
4074
|
+
embedBacktraceInfo( "", 1 );
|
|
4075
|
+
_cdr(
|
|
4076
|
+
__v__38__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30311
|
|
4077
|
+
)
|
|
4078
|
+
end
|
|
4079
|
+
)
|
|
4080
|
+
end
|
|
4081
|
+
} ; ___lambda.call(
|
|
4082
|
+
__v__39__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30312
|
|
4083
|
+
)
|
|
4084
|
+
end
|
|
4085
|
+
} ; ___lambda.call(
|
|
4086
|
+
begin
|
|
4087
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
|
|
4088
|
+
_car(
|
|
4089
|
+
__v__38__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30311
|
|
4090
|
+
)
|
|
4091
|
+
end
|
|
4092
|
+
)
|
|
4093
|
+
end
|
|
4094
|
+
else
|
|
4095
|
+
false
|
|
4096
|
+
end
|
|
4097
|
+
} ; ___lambda.call(
|
|
4098
|
+
begin
|
|
4099
|
+
embedBacktraceInfo( "", 1 );
|
|
4100
|
+
_cdr(
|
|
4101
|
+
__v__36__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30309
|
|
4102
|
+
)
|
|
4103
|
+
end
|
|
4104
|
+
)
|
|
4105
|
+
end
|
|
4106
|
+
} ; ___lambda.call(
|
|
4107
|
+
__v__37__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30310
|
|
4108
|
+
)
|
|
4109
|
+
end
|
|
4110
|
+
} ; ___lambda.call(
|
|
4111
|
+
begin
|
|
4112
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
|
|
4113
|
+
_car(
|
|
4114
|
+
__v__36__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30309
|
|
4115
|
+
)
|
|
4116
|
+
end
|
|
4117
|
+
)
|
|
4118
|
+
end
|
|
4119
|
+
else
|
|
4120
|
+
false
|
|
4121
|
+
end
|
|
4122
|
+
} ; ___lambda.call(
|
|
4123
|
+
begin
|
|
4124
|
+
embedBacktraceInfo( "", 1 );
|
|
4125
|
+
_cdr(
|
|
4126
|
+
__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30266
|
|
4127
|
+
)
|
|
4128
|
+
end
|
|
4129
|
+
)
|
|
4130
|
+
end
|
|
4131
|
+
)
|
|
4132
|
+
end
|
|
4133
|
+
end
|
|
4134
|
+
} ; ___lambda.call(
|
|
4135
|
+
begin
|
|
4136
|
+
___lambda = lambda { |__v__33__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30306|
|
|
4137
|
+
if (
|
|
4138
|
+
begin
|
|
4139
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
4140
|
+
_not(
|
|
4141
|
+
begin
|
|
4142
|
+
embedBacktraceInfo( "", 1 );
|
|
4143
|
+
_eq_QUMARK(
|
|
4144
|
+
false ,
|
|
4145
|
+
begin
|
|
4146
|
+
embedBacktraceInfo( "", 1 );
|
|
4147
|
+
_pair_QUMARK(
|
|
4148
|
+
__v__33__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30306
|
|
4149
|
+
)
|
|
4150
|
+
end
|
|
4151
|
+
)
|
|
4152
|
+
end
|
|
4153
|
+
)
|
|
4154
|
+
end
|
|
4155
|
+
) then
|
|
4156
|
+
begin
|
|
4157
|
+
___lambda = lambda { |__v__34__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30307|
|
|
4158
|
+
if (
|
|
4159
|
+
begin
|
|
4160
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
4161
|
+
_not(
|
|
4162
|
+
begin
|
|
4163
|
+
embedBacktraceInfo( "", 1 );
|
|
4164
|
+
_eq_QUMARK(
|
|
4165
|
+
false ,
|
|
4166
|
+
begin
|
|
4167
|
+
embedBacktraceInfo( "", 1 );
|
|
4168
|
+
_null_QUMARK(
|
|
4169
|
+
__v__34__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30307
|
|
4170
|
+
)
|
|
4171
|
+
end
|
|
4172
|
+
)
|
|
4173
|
+
end
|
|
4174
|
+
)
|
|
4175
|
+
end
|
|
4176
|
+
) then
|
|
4177
|
+
begin
|
|
4178
|
+
___lambda = lambda { |__v__35__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30308|
|
|
4179
|
+
if (
|
|
4180
|
+
begin
|
|
4181
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
4182
|
+
_not(
|
|
4183
|
+
begin
|
|
4184
|
+
embedBacktraceInfo( "", 1 );
|
|
4185
|
+
_eq_QUMARK(
|
|
4186
|
+
false ,
|
|
4187
|
+
begin
|
|
4188
|
+
embedBacktraceInfo( "", 1 );
|
|
4189
|
+
trampCall( self._list_QUMARK_METHOD( 'list?',
|
|
4190
|
+
begin
|
|
4191
|
+
if @global_lisp_binding.has_key?('_list_QUMARK') then
|
|
4192
|
+
trampCall(@_list_QUMARK)
|
|
4193
|
+
else raise NameError.new( "Error: undefined variable _list_QUMARK", "_list_QUMARK" ) end
|
|
4194
|
+
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
4195
|
+
end ,
|
|
4196
|
+
[
|
|
4197
|
+
__v__35__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30308
|
|
4198
|
+
]
|
|
4199
|
+
))
|
|
4200
|
+
end
|
|
4201
|
+
)
|
|
4202
|
+
end
|
|
4203
|
+
)
|
|
4204
|
+
end
|
|
4205
|
+
) then
|
|
4206
|
+
begin
|
|
4207
|
+
___lambda = lambda { |_body|
|
|
4208
|
+
begin
|
|
4209
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
4210
|
+
_cons(
|
|
4211
|
+
begin
|
|
4212
|
+
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
4213
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267',
|
|
4214
|
+
begin
|
|
4215
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267)
|
|
4216
|
+
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
4217
|
+
end ,
|
|
4218
|
+
[
|
|
4219
|
+
:"raise"
|
|
4220
|
+
]
|
|
4221
|
+
))
|
|
4222
|
+
end ,
|
|
4223
|
+
begin
|
|
4224
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
4225
|
+
_cons(
|
|
4226
|
+
begin
|
|
4227
|
+
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
4228
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267',
|
|
4229
|
+
begin
|
|
4230
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267)
|
|
4231
|
+
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
4232
|
+
end ,
|
|
4233
|
+
[
|
|
4234
|
+
:"nendo-syntax-error"
|
|
4235
|
+
]
|
|
4236
|
+
))
|
|
4237
|
+
end ,
|
|
4238
|
+
begin
|
|
4239
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
4240
|
+
_cons(
|
|
4241
|
+
"let1 requires (let1 var expr body ...) form." ,
|
|
4242
|
+
Cell.new()
|
|
4243
|
+
)
|
|
4244
|
+
end
|
|
4245
|
+
)
|
|
4246
|
+
end
|
|
4247
|
+
)
|
|
4248
|
+
end
|
|
4249
|
+
} ; ___lambda.call(
|
|
4250
|
+
__v__35__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30308
|
|
4251
|
+
)
|
|
4252
|
+
end
|
|
4253
|
+
else
|
|
4254
|
+
false
|
|
4255
|
+
end
|
|
4256
|
+
} ; ___lambda.call(
|
|
4257
|
+
begin
|
|
4258
|
+
embedBacktraceInfo( "", 1 );
|
|
4259
|
+
_cdr(
|
|
4260
|
+
__v__33__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30306
|
|
4261
|
+
)
|
|
4262
|
+
end
|
|
4263
|
+
)
|
|
4264
|
+
end
|
|
4265
|
+
else
|
|
4266
|
+
false
|
|
4267
|
+
end
|
|
4268
|
+
} ; ___lambda.call(
|
|
4269
|
+
begin
|
|
4270
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
|
|
4271
|
+
_car(
|
|
4272
|
+
__v__33__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30306
|
|
4273
|
+
)
|
|
4274
|
+
end
|
|
4275
|
+
)
|
|
4276
|
+
end
|
|
4277
|
+
else
|
|
4278
|
+
false
|
|
4279
|
+
end
|
|
4280
|
+
} ; ___lambda.call(
|
|
4281
|
+
begin
|
|
4282
|
+
embedBacktraceInfo( "", 1 );
|
|
4283
|
+
_cdr(
|
|
4284
|
+
__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30266
|
|
4285
|
+
)
|
|
4286
|
+
end
|
|
4287
|
+
)
|
|
4288
|
+
end
|
|
4289
|
+
)
|
|
4290
|
+
end
|
|
4291
|
+
end
|
|
4292
|
+
} ; ___lambda.call(
|
|
4293
|
+
begin
|
|
4294
|
+
___lambda = lambda { |__v__24__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30297|
|
|
4295
|
+
if (
|
|
4296
|
+
begin
|
|
4297
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
4298
|
+
_not(
|
|
4299
|
+
begin
|
|
4300
|
+
embedBacktraceInfo( "", 1 );
|
|
4301
|
+
_eq_QUMARK(
|
|
4302
|
+
false ,
|
|
4303
|
+
begin
|
|
4304
|
+
embedBacktraceInfo( "", 1 );
|
|
4305
|
+
_pair_QUMARK(
|
|
4306
|
+
__v__24__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30297
|
|
4307
|
+
)
|
|
4308
|
+
end
|
|
4309
|
+
)
|
|
4310
|
+
end
|
|
4311
|
+
)
|
|
4312
|
+
end
|
|
4313
|
+
) then
|
|
4314
|
+
begin
|
|
4315
|
+
___lambda = lambda { |__v__25__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30298|
|
|
4316
|
+
if (
|
|
4317
|
+
begin
|
|
4318
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
4319
|
+
_not(
|
|
4320
|
+
begin
|
|
4321
|
+
embedBacktraceInfo( "", 1 );
|
|
4322
|
+
_eq_QUMARK(
|
|
4323
|
+
false ,
|
|
4324
|
+
begin
|
|
4325
|
+
embedBacktraceInfo( "", 1 );
|
|
4326
|
+
_pair_QUMARK(
|
|
4327
|
+
__v__25__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30298
|
|
4328
|
+
)
|
|
4329
|
+
end
|
|
4330
|
+
)
|
|
4331
|
+
end
|
|
4332
|
+
)
|
|
4333
|
+
end
|
|
4334
|
+
) then
|
|
4335
|
+
begin
|
|
4336
|
+
___lambda = lambda { |__v__26__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30299|
|
|
4337
|
+
if (
|
|
4338
|
+
begin
|
|
4339
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
4340
|
+
_not(
|
|
4341
|
+
begin
|
|
4342
|
+
embedBacktraceInfo( "", 1 );
|
|
4343
|
+
_eq_QUMARK(
|
|
4344
|
+
false ,
|
|
4345
|
+
begin
|
|
4346
|
+
embedBacktraceInfo( "", 1 );
|
|
4347
|
+
_pair_QUMARK(
|
|
4348
|
+
__v__26__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30299
|
|
4349
|
+
)
|
|
4350
|
+
end
|
|
4351
|
+
)
|
|
4352
|
+
end
|
|
4353
|
+
)
|
|
4354
|
+
end
|
|
4355
|
+
) then
|
|
4356
|
+
begin
|
|
4357
|
+
___lambda = lambda { |__v__27__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30300|
|
|
4358
|
+
begin
|
|
4359
|
+
___lambda = lambda { |_var|
|
|
4360
|
+
begin
|
|
4361
|
+
___lambda = lambda { |__v__28__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30301|
|
|
4362
|
+
if (
|
|
4363
|
+
begin
|
|
4364
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
4365
|
+
_not(
|
|
4366
|
+
begin
|
|
4367
|
+
embedBacktraceInfo( "", 1 );
|
|
4368
|
+
_eq_QUMARK(
|
|
4369
|
+
false ,
|
|
4370
|
+
begin
|
|
4371
|
+
embedBacktraceInfo( "", 1 );
|
|
4372
|
+
_pair_QUMARK(
|
|
4373
|
+
__v__28__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30301
|
|
4374
|
+
)
|
|
4375
|
+
end
|
|
4376
|
+
)
|
|
4377
|
+
end
|
|
4378
|
+
)
|
|
4379
|
+
end
|
|
4380
|
+
) then
|
|
4381
|
+
begin
|
|
4382
|
+
___lambda = lambda { |__v__29__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30302|
|
|
4383
|
+
begin
|
|
4384
|
+
___lambda = lambda { |_expr|
|
|
4385
|
+
begin
|
|
4386
|
+
___lambda = lambda { |__v__30__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30303|
|
|
4387
|
+
if (
|
|
4388
|
+
begin
|
|
4389
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
4390
|
+
_not(
|
|
4391
|
+
begin
|
|
4392
|
+
embedBacktraceInfo( "", 1 );
|
|
4393
|
+
_eq_QUMARK(
|
|
4394
|
+
false ,
|
|
4395
|
+
begin
|
|
4396
|
+
embedBacktraceInfo( "", 1 );
|
|
4397
|
+
_null_QUMARK(
|
|
4398
|
+
__v__30__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30303
|
|
4399
|
+
)
|
|
4400
|
+
end
|
|
4401
|
+
)
|
|
4402
|
+
end
|
|
4403
|
+
)
|
|
4404
|
+
end
|
|
4405
|
+
) then
|
|
4406
|
+
begin
|
|
4407
|
+
___lambda = lambda { |__v__31__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30304|
|
|
4408
|
+
if (
|
|
4409
|
+
begin
|
|
4410
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
4411
|
+
_not(
|
|
4412
|
+
begin
|
|
4413
|
+
embedBacktraceInfo( "", 1 );
|
|
4414
|
+
_eq_QUMARK(
|
|
4415
|
+
false ,
|
|
4416
|
+
begin
|
|
4417
|
+
embedBacktraceInfo( "", 1 );
|
|
4418
|
+
_null_QUMARK(
|
|
4419
|
+
__v__31__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30304
|
|
4420
|
+
)
|
|
4421
|
+
end
|
|
4422
|
+
)
|
|
4423
|
+
end
|
|
4424
|
+
)
|
|
4425
|
+
end
|
|
4426
|
+
) then
|
|
4427
|
+
begin
|
|
4428
|
+
___lambda = lambda { |__v__32__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30305|
|
|
4429
|
+
if (
|
|
4430
|
+
begin
|
|
4431
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
4432
|
+
_not(
|
|
4433
|
+
begin
|
|
4434
|
+
embedBacktraceInfo( "", 1 );
|
|
4435
|
+
_eq_QUMARK(
|
|
4436
|
+
false ,
|
|
4437
|
+
begin
|
|
4438
|
+
embedBacktraceInfo( "", 1 );
|
|
4439
|
+
trampCall( self._list_QUMARK_METHOD( 'list?',
|
|
4440
|
+
begin
|
|
4441
|
+
if @global_lisp_binding.has_key?('_list_QUMARK') then
|
|
4442
|
+
trampCall(@_list_QUMARK)
|
|
4443
|
+
else raise NameError.new( "Error: undefined variable _list_QUMARK", "_list_QUMARK" ) end
|
|
4444
|
+
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
4445
|
+
end ,
|
|
4446
|
+
[
|
|
4447
|
+
__v__32__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30305
|
|
4448
|
+
]
|
|
4449
|
+
))
|
|
4450
|
+
end
|
|
4451
|
+
)
|
|
4452
|
+
end
|
|
4453
|
+
)
|
|
4454
|
+
end
|
|
4455
|
+
) then
|
|
4456
|
+
begin
|
|
4457
|
+
___lambda = lambda { |_body|
|
|
4458
|
+
begin
|
|
4459
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
4460
|
+
_cons(
|
|
4461
|
+
begin
|
|
4462
|
+
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
4463
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267',
|
|
4464
|
+
begin
|
|
4465
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267)
|
|
4466
|
+
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
4467
|
+
end ,
|
|
4468
|
+
[
|
|
4469
|
+
:"raise"
|
|
4470
|
+
]
|
|
4471
|
+
))
|
|
4472
|
+
end ,
|
|
4473
|
+
begin
|
|
4474
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
4475
|
+
_cons(
|
|
4476
|
+
begin
|
|
4477
|
+
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
4478
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267',
|
|
4479
|
+
begin
|
|
4480
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267)
|
|
4481
|
+
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
4482
|
+
end ,
|
|
4483
|
+
[
|
|
4484
|
+
:"nendo-syntax-error"
|
|
4485
|
+
]
|
|
4486
|
+
))
|
|
4487
|
+
end ,
|
|
4488
|
+
begin
|
|
4489
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
4490
|
+
_cons(
|
|
4491
|
+
"let1 requires (let1 var expr body ...) form." ,
|
|
4492
|
+
Cell.new()
|
|
4493
|
+
)
|
|
4494
|
+
end
|
|
4495
|
+
)
|
|
4496
|
+
end
|
|
4497
|
+
)
|
|
4498
|
+
end
|
|
4499
|
+
} ; ___lambda.call(
|
|
4500
|
+
__v__32__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30305
|
|
4501
|
+
)
|
|
4502
|
+
end
|
|
4503
|
+
else
|
|
4504
|
+
false
|
|
4505
|
+
end
|
|
4506
|
+
} ; ___lambda.call(
|
|
4507
|
+
begin
|
|
4508
|
+
embedBacktraceInfo( "", 1 );
|
|
4509
|
+
_cdr(
|
|
4510
|
+
__v__24__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30297
|
|
4511
|
+
)
|
|
4512
|
+
end
|
|
4513
|
+
)
|
|
4514
|
+
end
|
|
4515
|
+
else
|
|
4516
|
+
false
|
|
4517
|
+
end
|
|
4518
|
+
} ; ___lambda.call(
|
|
4519
|
+
begin
|
|
4520
|
+
embedBacktraceInfo( "", 1 );
|
|
4521
|
+
_cdr(
|
|
4522
|
+
__v__25__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30298
|
|
4523
|
+
)
|
|
4524
|
+
end
|
|
4525
|
+
)
|
|
4526
|
+
end
|
|
4527
|
+
else
|
|
4528
|
+
false
|
|
4529
|
+
end
|
|
4530
|
+
} ; ___lambda.call(
|
|
4531
|
+
begin
|
|
4532
|
+
embedBacktraceInfo( "", 1 );
|
|
4533
|
+
_cdr(
|
|
4534
|
+
__v__28__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30301
|
|
4535
|
+
)
|
|
4536
|
+
end
|
|
4537
|
+
)
|
|
4538
|
+
end
|
|
4539
|
+
} ; ___lambda.call(
|
|
4540
|
+
__v__29__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30302
|
|
4541
|
+
)
|
|
4542
|
+
end
|
|
4543
|
+
} ; ___lambda.call(
|
|
4544
|
+
begin
|
|
4545
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
|
|
4546
|
+
_car(
|
|
4547
|
+
__v__28__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30301
|
|
4548
|
+
)
|
|
4549
|
+
end
|
|
4550
|
+
)
|
|
4551
|
+
end
|
|
4552
|
+
else
|
|
4553
|
+
false
|
|
4554
|
+
end
|
|
4555
|
+
} ; ___lambda.call(
|
|
4556
|
+
begin
|
|
4557
|
+
embedBacktraceInfo( "", 1 );
|
|
4558
|
+
_cdr(
|
|
4559
|
+
__v__26__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30299
|
|
4560
|
+
)
|
|
4561
|
+
end
|
|
4562
|
+
)
|
|
4563
|
+
end
|
|
4564
|
+
} ; ___lambda.call(
|
|
4565
|
+
__v__27__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30300
|
|
4566
|
+
)
|
|
4567
|
+
end
|
|
4568
|
+
} ; ___lambda.call(
|
|
4569
|
+
begin
|
|
4570
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
|
|
4571
|
+
_car(
|
|
4572
|
+
__v__26__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30299
|
|
4573
|
+
)
|
|
4574
|
+
end
|
|
4575
|
+
)
|
|
4576
|
+
end
|
|
4577
|
+
else
|
|
4578
|
+
false
|
|
4579
|
+
end
|
|
4580
|
+
} ; ___lambda.call(
|
|
4581
|
+
begin
|
|
4582
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
|
|
4583
|
+
_car(
|
|
4584
|
+
__v__25__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30298
|
|
4585
|
+
)
|
|
4586
|
+
end
|
|
4587
|
+
)
|
|
4588
|
+
end
|
|
4589
|
+
else
|
|
4590
|
+
false
|
|
4591
|
+
end
|
|
4592
|
+
} ; ___lambda.call(
|
|
4593
|
+
begin
|
|
4594
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
|
|
4595
|
+
_car(
|
|
4596
|
+
__v__24__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30297
|
|
4597
|
+
)
|
|
4598
|
+
end
|
|
4599
|
+
)
|
|
4600
|
+
end
|
|
4601
|
+
else
|
|
4602
|
+
false
|
|
4603
|
+
end
|
|
4604
|
+
} ; ___lambda.call(
|
|
4605
|
+
begin
|
|
4606
|
+
embedBacktraceInfo( "", 1 );
|
|
4607
|
+
_cdr(
|
|
4608
|
+
__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30266
|
|
4609
|
+
)
|
|
4610
|
+
end
|
|
4611
|
+
)
|
|
4612
|
+
end
|
|
4613
|
+
)
|
|
4614
|
+
end
|
|
4615
|
+
end
|
|
4616
|
+
} ; ___lambda.call(
|
|
4617
|
+
begin
|
|
4618
|
+
___lambda = lambda { |__v__17__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30290|
|
|
4619
|
+
if (
|
|
4620
|
+
begin
|
|
4621
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
4622
|
+
_not(
|
|
4623
|
+
begin
|
|
4624
|
+
embedBacktraceInfo( "", 1 );
|
|
4625
|
+
_eq_QUMARK(
|
|
4626
|
+
false ,
|
|
4627
|
+
begin
|
|
4628
|
+
embedBacktraceInfo( "", 1 );
|
|
4629
|
+
_pair_QUMARK(
|
|
4630
|
+
__v__17__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30290
|
|
4631
|
+
)
|
|
4632
|
+
end
|
|
4633
|
+
)
|
|
4634
|
+
end
|
|
4635
|
+
)
|
|
4636
|
+
end
|
|
4637
|
+
) then
|
|
4638
|
+
begin
|
|
4639
|
+
___lambda = lambda { |__v__18__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30291|
|
|
4640
|
+
if (
|
|
4641
|
+
begin
|
|
4642
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
4643
|
+
_not(
|
|
4644
|
+
begin
|
|
4645
|
+
embedBacktraceInfo( "", 1 );
|
|
4646
|
+
_eq_QUMARK(
|
|
4647
|
+
false ,
|
|
4648
|
+
begin
|
|
4649
|
+
embedBacktraceInfo( "", 1 );
|
|
4650
|
+
_pair_QUMARK(
|
|
4651
|
+
__v__18__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30291
|
|
4652
|
+
)
|
|
4653
|
+
end
|
|
4654
|
+
)
|
|
4655
|
+
end
|
|
4656
|
+
)
|
|
4657
|
+
end
|
|
4658
|
+
) then
|
|
4659
|
+
begin
|
|
4660
|
+
___lambda = lambda { |__v__19__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30292|
|
|
4661
|
+
begin
|
|
4662
|
+
___lambda = lambda { |_var|
|
|
4663
|
+
begin
|
|
4664
|
+
___lambda = lambda { |__v__20__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30293|
|
|
4665
|
+
if (
|
|
4666
|
+
begin
|
|
4667
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
4668
|
+
_not(
|
|
4669
|
+
begin
|
|
4670
|
+
embedBacktraceInfo( "", 1 );
|
|
4671
|
+
_eq_QUMARK(
|
|
4672
|
+
false ,
|
|
4673
|
+
begin
|
|
4674
|
+
embedBacktraceInfo( "", 1 );
|
|
4675
|
+
_pair_QUMARK(
|
|
4676
|
+
__v__20__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30293
|
|
4677
|
+
)
|
|
4678
|
+
end
|
|
4679
|
+
)
|
|
4680
|
+
end
|
|
4681
|
+
)
|
|
4682
|
+
end
|
|
4683
|
+
) then
|
|
4684
|
+
begin
|
|
4685
|
+
___lambda = lambda { |__v__21__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30294|
|
|
4686
|
+
begin
|
|
4687
|
+
___lambda = lambda { |_expr|
|
|
4688
|
+
begin
|
|
4689
|
+
___lambda = lambda { |__v__22__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30295|
|
|
4690
|
+
if (
|
|
4691
|
+
begin
|
|
4692
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
4693
|
+
_not(
|
|
4694
|
+
begin
|
|
4695
|
+
embedBacktraceInfo( "", 1 );
|
|
4696
|
+
_eq_QUMARK(
|
|
4697
|
+
false ,
|
|
4698
|
+
begin
|
|
4699
|
+
embedBacktraceInfo( "", 1 );
|
|
4700
|
+
_null_QUMARK(
|
|
4701
|
+
__v__22__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30295
|
|
4702
|
+
)
|
|
4703
|
+
end
|
|
4704
|
+
)
|
|
4705
|
+
end
|
|
4706
|
+
)
|
|
4707
|
+
end
|
|
4708
|
+
) then
|
|
4709
|
+
begin
|
|
4710
|
+
___lambda = lambda { |__v__23__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30296|
|
|
4711
|
+
if (
|
|
4712
|
+
begin
|
|
4713
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
4714
|
+
_not(
|
|
4715
|
+
begin
|
|
4716
|
+
embedBacktraceInfo( "", 1 );
|
|
4717
|
+
_eq_QUMARK(
|
|
4718
|
+
false ,
|
|
4719
|
+
begin
|
|
4720
|
+
embedBacktraceInfo( "", 1 );
|
|
4721
|
+
trampCall( self._list_QUMARK_METHOD( 'list?',
|
|
4722
|
+
begin
|
|
4723
|
+
if @global_lisp_binding.has_key?('_list_QUMARK') then
|
|
4724
|
+
trampCall(@_list_QUMARK)
|
|
4725
|
+
else raise NameError.new( "Error: undefined variable _list_QUMARK", "_list_QUMARK" ) end
|
|
4726
|
+
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
4727
|
+
end ,
|
|
4728
|
+
[
|
|
4729
|
+
__v__23__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30296
|
|
4730
|
+
]
|
|
4731
|
+
))
|
|
4732
|
+
end
|
|
4733
|
+
)
|
|
4734
|
+
end
|
|
4735
|
+
)
|
|
4736
|
+
end
|
|
4737
|
+
) then
|
|
4738
|
+
begin
|
|
4739
|
+
___lambda = lambda { |_body|
|
|
4740
|
+
begin
|
|
4741
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
4742
|
+
_cons(
|
|
4743
|
+
begin
|
|
4744
|
+
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
4745
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267',
|
|
4746
|
+
begin
|
|
4747
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267)
|
|
4748
|
+
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
4749
|
+
end ,
|
|
4750
|
+
[
|
|
4751
|
+
:"raise"
|
|
4752
|
+
]
|
|
4753
|
+
))
|
|
4754
|
+
end ,
|
|
4755
|
+
begin
|
|
4756
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
4757
|
+
_cons(
|
|
4758
|
+
begin
|
|
4759
|
+
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
4760
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267',
|
|
4761
|
+
begin
|
|
4762
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267)
|
|
4763
|
+
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
4764
|
+
end ,
|
|
4765
|
+
[
|
|
4766
|
+
:"nendo-syntax-error"
|
|
4767
|
+
]
|
|
4768
|
+
))
|
|
4769
|
+
end ,
|
|
4770
|
+
begin
|
|
4771
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
4772
|
+
_cons(
|
|
4773
|
+
"let1 requires (let1 var expr body ...) form." ,
|
|
4774
|
+
Cell.new()
|
|
4775
|
+
)
|
|
4776
|
+
end
|
|
4777
|
+
)
|
|
4778
|
+
end
|
|
4779
|
+
)
|
|
4780
|
+
end
|
|
4781
|
+
} ; ___lambda.call(
|
|
4782
|
+
__v__23__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30296
|
|
4783
|
+
)
|
|
4784
|
+
end
|
|
4785
|
+
else
|
|
4786
|
+
false
|
|
4787
|
+
end
|
|
4788
|
+
} ; ___lambda.call(
|
|
4789
|
+
begin
|
|
4790
|
+
embedBacktraceInfo( "", 1 );
|
|
4791
|
+
_cdr(
|
|
4792
|
+
__v__17__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30290
|
|
4793
|
+
)
|
|
4794
|
+
end
|
|
4795
|
+
)
|
|
4796
|
+
end
|
|
4797
|
+
else
|
|
4798
|
+
false
|
|
4799
|
+
end
|
|
4800
|
+
} ; ___lambda.call(
|
|
4801
|
+
begin
|
|
4802
|
+
embedBacktraceInfo( "", 1 );
|
|
4803
|
+
_cdr(
|
|
4804
|
+
__v__20__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30293
|
|
4805
|
+
)
|
|
4806
|
+
end
|
|
4807
|
+
)
|
|
4808
|
+
end
|
|
4809
|
+
} ; ___lambda.call(
|
|
4810
|
+
__v__21__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30294
|
|
4811
|
+
)
|
|
4812
|
+
end
|
|
4813
|
+
} ; ___lambda.call(
|
|
4814
|
+
begin
|
|
4815
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
|
|
4816
|
+
_car(
|
|
4817
|
+
__v__20__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30293
|
|
4818
|
+
)
|
|
4819
|
+
end
|
|
4820
|
+
)
|
|
4821
|
+
end
|
|
4822
|
+
else
|
|
4823
|
+
false
|
|
4824
|
+
end
|
|
4825
|
+
} ; ___lambda.call(
|
|
4826
|
+
begin
|
|
4827
|
+
embedBacktraceInfo( "", 1 );
|
|
4828
|
+
_cdr(
|
|
4829
|
+
__v__18__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30291
|
|
4830
|
+
)
|
|
4831
|
+
end
|
|
4832
|
+
)
|
|
4833
|
+
end
|
|
4834
|
+
} ; ___lambda.call(
|
|
4835
|
+
__v__19__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30292
|
|
4836
|
+
)
|
|
4837
|
+
end
|
|
4838
|
+
} ; ___lambda.call(
|
|
4839
|
+
begin
|
|
4840
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
|
|
4841
|
+
_car(
|
|
4842
|
+
__v__18__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30291
|
|
4843
|
+
)
|
|
4844
|
+
end
|
|
4845
|
+
)
|
|
4846
|
+
end
|
|
4847
|
+
else
|
|
4848
|
+
false
|
|
4849
|
+
end
|
|
4850
|
+
} ; ___lambda.call(
|
|
4851
|
+
begin
|
|
4852
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
|
|
4853
|
+
_car(
|
|
4854
|
+
__v__17__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30290
|
|
4855
|
+
)
|
|
4856
|
+
end
|
|
4857
|
+
)
|
|
4858
|
+
end
|
|
4859
|
+
else
|
|
4860
|
+
false
|
|
4861
|
+
end
|
|
4862
|
+
} ; ___lambda.call(
|
|
4863
|
+
begin
|
|
4864
|
+
embedBacktraceInfo( "", 1 );
|
|
4865
|
+
_cdr(
|
|
4866
|
+
__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30266
|
|
4867
|
+
)
|
|
4868
|
+
end
|
|
4869
|
+
)
|
|
4870
|
+
end
|
|
4871
|
+
)
|
|
4872
|
+
end
|
|
4873
|
+
end
|
|
4874
|
+
} ; ___lambda.call(
|
|
4875
|
+
begin
|
|
4876
|
+
___lambda = lambda { |__v__10__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30283|
|
|
4877
|
+
if (
|
|
4878
|
+
begin
|
|
4879
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
4880
|
+
_not(
|
|
4881
|
+
begin
|
|
4882
|
+
embedBacktraceInfo( "", 1 );
|
|
4883
|
+
_eq_QUMARK(
|
|
4884
|
+
false ,
|
|
4885
|
+
begin
|
|
4886
|
+
embedBacktraceInfo( "", 1 );
|
|
4887
|
+
_pair_QUMARK(
|
|
4888
|
+
__v__10__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30283
|
|
4889
|
+
)
|
|
4890
|
+
end
|
|
4891
|
+
)
|
|
4892
|
+
end
|
|
4893
|
+
)
|
|
4894
|
+
end
|
|
4895
|
+
) then
|
|
4896
|
+
begin
|
|
4897
|
+
___lambda = lambda { |__v__11__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30284|
|
|
4898
|
+
if (
|
|
4899
|
+
begin
|
|
4900
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
4901
|
+
_not(
|
|
4902
|
+
begin
|
|
4903
|
+
embedBacktraceInfo( "", 1 );
|
|
4904
|
+
_eq_QUMARK(
|
|
4905
|
+
false ,
|
|
4906
|
+
begin
|
|
4907
|
+
embedBacktraceInfo( "", 1 );
|
|
4908
|
+
_pair_QUMARK(
|
|
4909
|
+
__v__11__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30284
|
|
4910
|
+
)
|
|
4911
|
+
end
|
|
4912
|
+
)
|
|
4913
|
+
end
|
|
4914
|
+
)
|
|
4915
|
+
end
|
|
4916
|
+
) then
|
|
4917
|
+
begin
|
|
4918
|
+
___lambda = lambda { |__v__12__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30285|
|
|
4919
|
+
begin
|
|
4920
|
+
___lambda = lambda { |_var|
|
|
4921
|
+
begin
|
|
4922
|
+
___lambda = lambda { |__v__13__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30286|
|
|
4923
|
+
if (
|
|
4924
|
+
begin
|
|
4925
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
4926
|
+
_not(
|
|
4927
|
+
begin
|
|
4928
|
+
embedBacktraceInfo( "", 1 );
|
|
4929
|
+
_eq_QUMARK(
|
|
4930
|
+
false ,
|
|
4931
|
+
begin
|
|
4932
|
+
embedBacktraceInfo( "", 1 );
|
|
4933
|
+
_null_QUMARK(
|
|
4934
|
+
__v__13__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30286
|
|
4935
|
+
)
|
|
4936
|
+
end
|
|
4937
|
+
)
|
|
4938
|
+
end
|
|
4939
|
+
)
|
|
4940
|
+
end
|
|
4941
|
+
) then
|
|
4942
|
+
begin
|
|
4943
|
+
___lambda = lambda { |__v__14__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30287|
|
|
4944
|
+
if (
|
|
4945
|
+
begin
|
|
4946
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
4947
|
+
_not(
|
|
4948
|
+
begin
|
|
4949
|
+
embedBacktraceInfo( "", 1 );
|
|
4950
|
+
_eq_QUMARK(
|
|
4951
|
+
false ,
|
|
4952
|
+
begin
|
|
4953
|
+
embedBacktraceInfo( "", 1 );
|
|
4954
|
+
_pair_QUMARK(
|
|
4955
|
+
__v__14__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30287
|
|
4956
|
+
)
|
|
4957
|
+
end
|
|
4958
|
+
)
|
|
4959
|
+
end
|
|
4960
|
+
)
|
|
4961
|
+
end
|
|
4962
|
+
) then
|
|
4963
|
+
begin
|
|
4964
|
+
___lambda = lambda { |__v__15__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30288|
|
|
4965
|
+
begin
|
|
4966
|
+
___lambda = lambda { |_expr|
|
|
4967
|
+
begin
|
|
4968
|
+
___lambda = lambda { |__v__16__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30289|
|
|
4969
|
+
if (
|
|
4970
|
+
begin
|
|
4971
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
4972
|
+
_not(
|
|
4973
|
+
begin
|
|
4974
|
+
embedBacktraceInfo( "", 1 );
|
|
4975
|
+
_eq_QUMARK(
|
|
4976
|
+
false ,
|
|
4977
|
+
begin
|
|
4978
|
+
embedBacktraceInfo( "", 1 );
|
|
4979
|
+
trampCall( self._list_QUMARK_METHOD( 'list?',
|
|
4980
|
+
begin
|
|
4981
|
+
if @global_lisp_binding.has_key?('_list_QUMARK') then
|
|
4982
|
+
trampCall(@_list_QUMARK)
|
|
4983
|
+
else raise NameError.new( "Error: undefined variable _list_QUMARK", "_list_QUMARK" ) end
|
|
4984
|
+
rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
|
|
4985
|
+
end ,
|
|
4986
|
+
[
|
|
4987
|
+
__v__16__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30289
|
|
4988
|
+
]
|
|
4989
|
+
))
|
|
4990
|
+
end
|
|
4991
|
+
)
|
|
4992
|
+
end
|
|
4993
|
+
)
|
|
4994
|
+
end
|
|
4995
|
+
) then
|
|
4996
|
+
begin
|
|
4997
|
+
___lambda = lambda { |_body|
|
|
4998
|
+
begin
|
|
4999
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
5000
|
+
_cons(
|
|
5001
|
+
begin
|
|
5002
|
+
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
5003
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267',
|
|
5004
|
+
begin
|
|
5005
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267)
|
|
5006
|
+
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
5007
|
+
end ,
|
|
5008
|
+
[
|
|
5009
|
+
:"raise"
|
|
5010
|
+
]
|
|
5011
|
+
))
|
|
5012
|
+
end ,
|
|
5013
|
+
begin
|
|
5014
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
5015
|
+
_cons(
|
|
5016
|
+
begin
|
|
5017
|
+
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
5018
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267',
|
|
5019
|
+
begin
|
|
5020
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267)
|
|
5021
|
+
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
5022
|
+
end ,
|
|
5023
|
+
[
|
|
5024
|
+
:"nendo-syntax-error"
|
|
5025
|
+
]
|
|
5026
|
+
))
|
|
5027
|
+
end ,
|
|
5028
|
+
begin
|
|
5029
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
5030
|
+
_cons(
|
|
5031
|
+
"let1 requires (let1 var expr body ...) form." ,
|
|
5032
|
+
Cell.new()
|
|
5033
|
+
)
|
|
5034
|
+
end
|
|
5035
|
+
)
|
|
5036
|
+
end
|
|
5037
|
+
)
|
|
5038
|
+
end
|
|
5039
|
+
} ; ___lambda.call(
|
|
5040
|
+
__v__16__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30289
|
|
5041
|
+
)
|
|
5042
|
+
end
|
|
5043
|
+
else
|
|
5044
|
+
false
|
|
5045
|
+
end
|
|
5046
|
+
} ; ___lambda.call(
|
|
5047
|
+
begin
|
|
5048
|
+
embedBacktraceInfo( "", 1 );
|
|
5049
|
+
_cdr(
|
|
5050
|
+
__v__14__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30287
|
|
5051
|
+
)
|
|
5052
|
+
end
|
|
5053
|
+
)
|
|
5054
|
+
end
|
|
5055
|
+
} ; ___lambda.call(
|
|
5056
|
+
__v__15__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30288
|
|
5057
|
+
)
|
|
5058
|
+
end
|
|
5059
|
+
} ; ___lambda.call(
|
|
5060
|
+
begin
|
|
5061
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
|
|
5062
|
+
_car(
|
|
5063
|
+
__v__14__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30287
|
|
5064
|
+
)
|
|
5065
|
+
end
|
|
5066
|
+
)
|
|
5067
|
+
end
|
|
5068
|
+
else
|
|
5069
|
+
false
|
|
5070
|
+
end
|
|
5071
|
+
} ; ___lambda.call(
|
|
5072
|
+
begin
|
|
5073
|
+
embedBacktraceInfo( "", 1 );
|
|
5074
|
+
_cdr(
|
|
5075
|
+
__v__10__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30283
|
|
5076
|
+
)
|
|
5077
|
+
end
|
|
5078
|
+
)
|
|
5079
|
+
end
|
|
5080
|
+
else
|
|
5081
|
+
false
|
|
5082
|
+
end
|
|
5083
|
+
} ; ___lambda.call(
|
|
5084
|
+
begin
|
|
5085
|
+
embedBacktraceInfo( "", 1 );
|
|
5086
|
+
_cdr(
|
|
5087
|
+
__v__11__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30284
|
|
5088
|
+
)
|
|
5089
|
+
end
|
|
5090
|
+
)
|
|
5091
|
+
end
|
|
5092
|
+
} ; ___lambda.call(
|
|
5093
|
+
__v__12__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30285
|
|
5094
|
+
)
|
|
5095
|
+
end
|
|
5096
|
+
} ; ___lambda.call(
|
|
5097
|
+
begin
|
|
5098
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
|
|
5099
|
+
_car(
|
|
5100
|
+
__v__11__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30284
|
|
5101
|
+
)
|
|
5102
|
+
end
|
|
5103
|
+
)
|
|
5104
|
+
end
|
|
5105
|
+
else
|
|
5106
|
+
false
|
|
5107
|
+
end
|
|
5108
|
+
} ; ___lambda.call(
|
|
5109
|
+
begin
|
|
5110
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
|
|
5111
|
+
_car(
|
|
5112
|
+
__v__10__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30283
|
|
5113
|
+
)
|
|
5114
|
+
end
|
|
5115
|
+
)
|
|
5116
|
+
end
|
|
5117
|
+
else
|
|
5118
|
+
false
|
|
5119
|
+
end
|
|
5120
|
+
} ; ___lambda.call(
|
|
5121
|
+
begin
|
|
5122
|
+
embedBacktraceInfo( "", 1 );
|
|
5123
|
+
_cdr(
|
|
5124
|
+
__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30266
|
|
5125
|
+
)
|
|
5126
|
+
end
|
|
5127
|
+
)
|
|
5128
|
+
end
|
|
5129
|
+
)
|
|
5130
|
+
end
|
|
5131
|
+
end
|
|
5132
|
+
} ; ___lambda.call(
|
|
5133
|
+
begin
|
|
5134
|
+
___lambda = lambda { |__v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30278|
|
|
5135
|
+
if (
|
|
5136
|
+
begin
|
|
5137
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
5138
|
+
_not(
|
|
5139
|
+
begin
|
|
5140
|
+
embedBacktraceInfo( "", 1 );
|
|
5141
|
+
_eq_QUMARK(
|
|
5142
|
+
false ,
|
|
5143
|
+
begin
|
|
5144
|
+
embedBacktraceInfo( "", 1 );
|
|
5145
|
+
_pair_QUMARK(
|
|
5146
|
+
__v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30278
|
|
5147
|
+
)
|
|
5148
|
+
end
|
|
5149
|
+
)
|
|
5150
|
+
end
|
|
5151
|
+
)
|
|
5152
|
+
end
|
|
5153
|
+
) then
|
|
5154
|
+
begin
|
|
5155
|
+
___lambda = lambda { |__v__6__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30279|
|
|
5156
|
+
begin
|
|
5157
|
+
___lambda = lambda { |_var|
|
|
5158
|
+
begin
|
|
5159
|
+
___lambda = lambda { |__v__7__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30280|
|
|
5160
|
+
if (
|
|
5161
|
+
begin
|
|
5162
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
5163
|
+
_not(
|
|
5164
|
+
begin
|
|
5165
|
+
embedBacktraceInfo( "", 1 );
|
|
5166
|
+
_eq_QUMARK(
|
|
5167
|
+
false ,
|
|
5168
|
+
begin
|
|
5169
|
+
embedBacktraceInfo( "", 1 );
|
|
5170
|
+
_pair_QUMARK(
|
|
5171
|
+
__v__7__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30280
|
|
5172
|
+
)
|
|
5173
|
+
end
|
|
5174
|
+
)
|
|
5175
|
+
end
|
|
5176
|
+
)
|
|
5177
|
+
end
|
|
5178
|
+
) then
|
|
5179
|
+
begin
|
|
5180
|
+
___lambda = lambda { |__v__8__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30281|
|
|
5181
|
+
begin
|
|
5182
|
+
___lambda = lambda { |_expr|
|
|
5183
|
+
begin
|
|
5184
|
+
___lambda = lambda { |__v__9__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30282|
|
|
5185
|
+
if (
|
|
5186
|
+
begin
|
|
5187
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
5188
|
+
_not(
|
|
5189
|
+
begin
|
|
5190
|
+
embedBacktraceInfo( "", 1 );
|
|
5191
|
+
_eq_QUMARK(
|
|
5192
|
+
false ,
|
|
5193
|
+
begin
|
|
5194
|
+
embedBacktraceInfo( "", 1 );
|
|
5195
|
+
_null_QUMARK(
|
|
5196
|
+
__v__9__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30282
|
|
5197
|
+
)
|
|
5198
|
+
end
|
|
5199
|
+
)
|
|
5200
|
+
end
|
|
5201
|
+
)
|
|
5202
|
+
end
|
|
5203
|
+
) then
|
|
5204
|
+
begin
|
|
5205
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
5206
|
+
_cons(
|
|
5207
|
+
begin
|
|
5208
|
+
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
5209
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267',
|
|
5210
|
+
begin
|
|
5211
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267)
|
|
5212
|
+
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
5213
|
+
end ,
|
|
5214
|
+
[
|
|
5215
|
+
:"raise"
|
|
5216
|
+
]
|
|
5217
|
+
))
|
|
5218
|
+
end ,
|
|
5219
|
+
begin
|
|
5220
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
5221
|
+
_cons(
|
|
5222
|
+
begin
|
|
5223
|
+
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
5224
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267',
|
|
5225
|
+
begin
|
|
5226
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267)
|
|
5227
|
+
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
5228
|
+
end ,
|
|
5229
|
+
[
|
|
5230
|
+
:"nendo-syntax-error"
|
|
5231
|
+
]
|
|
5232
|
+
))
|
|
5233
|
+
end ,
|
|
5234
|
+
begin
|
|
5235
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
5236
|
+
_cons(
|
|
5237
|
+
"let1 requires (let1 var expr body ...) form." ,
|
|
5238
|
+
Cell.new()
|
|
5239
|
+
)
|
|
5240
|
+
end
|
|
5241
|
+
)
|
|
5242
|
+
end
|
|
5243
|
+
)
|
|
5244
|
+
end
|
|
5245
|
+
else
|
|
5246
|
+
false
|
|
5247
|
+
end
|
|
5248
|
+
} ; ___lambda.call(
|
|
5249
|
+
begin
|
|
5250
|
+
embedBacktraceInfo( "", 1 );
|
|
5251
|
+
_cdr(
|
|
5252
|
+
__v__7__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30280
|
|
5253
|
+
)
|
|
5254
|
+
end
|
|
5255
|
+
)
|
|
5256
|
+
end
|
|
5257
|
+
} ; ___lambda.call(
|
|
5258
|
+
__v__8__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30281
|
|
5259
|
+
)
|
|
5260
|
+
end
|
|
5261
|
+
} ; ___lambda.call(
|
|
5262
|
+
begin
|
|
5263
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
|
|
5264
|
+
_car(
|
|
5265
|
+
__v__7__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30280
|
|
5266
|
+
)
|
|
5267
|
+
end
|
|
5268
|
+
)
|
|
5269
|
+
end
|
|
5270
|
+
else
|
|
5271
|
+
false
|
|
5272
|
+
end
|
|
5273
|
+
} ; ___lambda.call(
|
|
5274
|
+
begin
|
|
5275
|
+
embedBacktraceInfo( "", 1 );
|
|
5276
|
+
_cdr(
|
|
5277
|
+
__v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30278
|
|
5278
|
+
)
|
|
5279
|
+
end
|
|
5280
|
+
)
|
|
5281
|
+
end
|
|
5282
|
+
} ; ___lambda.call(
|
|
5283
|
+
__v__6__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30279
|
|
5284
|
+
)
|
|
5285
|
+
end
|
|
5286
|
+
} ; ___lambda.call(
|
|
5287
|
+
begin
|
|
5288
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
|
|
5289
|
+
_car(
|
|
5290
|
+
__v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30278
|
|
5291
|
+
)
|
|
5292
|
+
end
|
|
5293
|
+
)
|
|
5294
|
+
end
|
|
5295
|
+
else
|
|
5296
|
+
false
|
|
5297
|
+
end
|
|
5298
|
+
} ; ___lambda.call(
|
|
5299
|
+
begin
|
|
5300
|
+
embedBacktraceInfo( "", 1 );
|
|
5301
|
+
_cdr(
|
|
5302
|
+
__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30266
|
|
5303
|
+
)
|
|
5304
|
+
end
|
|
5305
|
+
)
|
|
5306
|
+
end
|
|
5307
|
+
)
|
|
5308
|
+
end
|
|
5309
|
+
end
|
|
5310
|
+
} ; ___lambda.call(
|
|
5311
|
+
begin
|
|
5312
|
+
___lambda = lambda { |__v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30275|
|
|
5313
|
+
if (
|
|
5314
|
+
begin
|
|
5315
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
5316
|
+
_not(
|
|
5317
|
+
begin
|
|
5318
|
+
embedBacktraceInfo( "", 1 );
|
|
5319
|
+
_eq_QUMARK(
|
|
5320
|
+
false ,
|
|
5321
|
+
begin
|
|
5322
|
+
embedBacktraceInfo( "", 1 );
|
|
5323
|
+
_pair_QUMARK(
|
|
5324
|
+
__v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30275
|
|
5325
|
+
)
|
|
5326
|
+
end
|
|
5327
|
+
)
|
|
5328
|
+
end
|
|
5329
|
+
)
|
|
5330
|
+
end
|
|
5331
|
+
) then
|
|
5332
|
+
begin
|
|
5333
|
+
___lambda = lambda { |__v__3__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30276|
|
|
5334
|
+
begin
|
|
5335
|
+
___lambda = lambda { |_var|
|
|
5336
|
+
begin
|
|
5337
|
+
___lambda = lambda { |__v__4__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30277|
|
|
5338
|
+
if (
|
|
5339
|
+
begin
|
|
5340
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
5341
|
+
_not(
|
|
5342
|
+
begin
|
|
5343
|
+
embedBacktraceInfo( "", 1 );
|
|
5344
|
+
_eq_QUMARK(
|
|
5345
|
+
false ,
|
|
5346
|
+
begin
|
|
5347
|
+
embedBacktraceInfo( "", 1 );
|
|
5348
|
+
_null_QUMARK(
|
|
5349
|
+
__v__4__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30277
|
|
5350
|
+
)
|
|
5351
|
+
end
|
|
5352
|
+
)
|
|
5353
|
+
end
|
|
5354
|
+
)
|
|
5355
|
+
end
|
|
5356
|
+
) then
|
|
5357
|
+
begin
|
|
5358
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
5359
|
+
_cons(
|
|
5360
|
+
begin
|
|
5361
|
+
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
5362
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267',
|
|
5363
|
+
begin
|
|
5364
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267)
|
|
5365
|
+
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
5366
|
+
end ,
|
|
5367
|
+
[
|
|
5368
|
+
:"raise"
|
|
5369
|
+
]
|
|
5370
|
+
))
|
|
5371
|
+
end ,
|
|
5372
|
+
begin
|
|
5373
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
5374
|
+
_cons(
|
|
5375
|
+
begin
|
|
5376
|
+
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
5377
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267',
|
|
5378
|
+
begin
|
|
5379
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267)
|
|
5380
|
+
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
5381
|
+
end ,
|
|
5382
|
+
[
|
|
5383
|
+
:"nendo-syntax-error"
|
|
5384
|
+
]
|
|
5385
|
+
))
|
|
5386
|
+
end ,
|
|
5387
|
+
begin
|
|
5388
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
5389
|
+
_cons(
|
|
5390
|
+
"let1 requires (let1 var expr body ...) form." ,
|
|
5391
|
+
Cell.new()
|
|
5392
|
+
)
|
|
5393
|
+
end
|
|
5394
|
+
)
|
|
5395
|
+
end
|
|
5396
|
+
)
|
|
5397
|
+
end
|
|
5398
|
+
else
|
|
5399
|
+
false
|
|
5400
|
+
end
|
|
5401
|
+
} ; ___lambda.call(
|
|
5402
|
+
begin
|
|
5403
|
+
embedBacktraceInfo( "", 1 );
|
|
5404
|
+
_cdr(
|
|
5405
|
+
__v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30275
|
|
5406
|
+
)
|
|
5407
|
+
end
|
|
5408
|
+
)
|
|
5409
|
+
end
|
|
5410
|
+
} ; ___lambda.call(
|
|
5411
|
+
__v__3__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30276
|
|
5412
|
+
)
|
|
5413
|
+
end
|
|
5414
|
+
} ; ___lambda.call(
|
|
5415
|
+
begin
|
|
5416
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
|
|
5417
|
+
_car(
|
|
5418
|
+
__v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30275
|
|
5419
|
+
)
|
|
5420
|
+
end
|
|
5421
|
+
)
|
|
5422
|
+
end
|
|
5423
|
+
else
|
|
5424
|
+
false
|
|
5425
|
+
end
|
|
5426
|
+
} ; ___lambda.call(
|
|
5427
|
+
begin
|
|
5428
|
+
embedBacktraceInfo( "", 1 );
|
|
5429
|
+
_cdr(
|
|
5430
|
+
__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30266
|
|
5431
|
+
)
|
|
5432
|
+
end
|
|
5433
|
+
)
|
|
5434
|
+
end
|
|
5435
|
+
)
|
|
5436
|
+
end
|
|
5437
|
+
end
|
|
5438
|
+
} ; ___lambda.call(
|
|
5439
|
+
begin
|
|
5440
|
+
___lambda = lambda { |__v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30274|
|
|
5441
|
+
if (
|
|
5442
|
+
begin
|
|
5443
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
|
|
5444
|
+
_not(
|
|
5445
|
+
begin
|
|
5446
|
+
embedBacktraceInfo( "", 1 );
|
|
5447
|
+
_eq_QUMARK(
|
|
5448
|
+
false ,
|
|
5449
|
+
begin
|
|
5450
|
+
embedBacktraceInfo( "", 1 );
|
|
5451
|
+
_null_QUMARK(
|
|
5452
|
+
__v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30274
|
|
5453
|
+
)
|
|
5454
|
+
end
|
|
5455
|
+
)
|
|
5456
|
+
end
|
|
5457
|
+
)
|
|
5458
|
+
end
|
|
5459
|
+
) then
|
|
5460
|
+
begin
|
|
5461
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
5462
|
+
_cons(
|
|
5463
|
+
begin
|
|
5464
|
+
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
5465
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267',
|
|
5466
|
+
begin
|
|
5467
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267)
|
|
5468
|
+
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
5469
|
+
end ,
|
|
5470
|
+
[
|
|
5471
|
+
:"raise"
|
|
5472
|
+
]
|
|
5473
|
+
))
|
|
5474
|
+
end ,
|
|
5475
|
+
begin
|
|
5476
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
5477
|
+
_cons(
|
|
5478
|
+
begin
|
|
5479
|
+
embedBacktraceInfo( "dynamic S-expression ( no source )", 1 );
|
|
5480
|
+
trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267',
|
|
5481
|
+
begin
|
|
5482
|
+
trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30267)
|
|
5483
|
+
rescue => __e ; __e.set_backtrace( ["dynamic S-expression ( no source ):1"] + __e.backtrace ) ; raise __e
|
|
5484
|
+
end ,
|
|
5485
|
+
[
|
|
5486
|
+
:"nendo-syntax-error"
|
|
5487
|
+
]
|
|
5488
|
+
))
|
|
5489
|
+
end ,
|
|
5490
|
+
begin
|
|
5491
|
+
embedBacktraceInfo( "./lib/nendo/experimental.nnd", 71 );
|
|
5492
|
+
_cons(
|
|
5493
|
+
"let1 requires (let1 var expr body ...) form." ,
|
|
5494
|
+
Cell.new()
|
|
5495
|
+
)
|
|
5496
|
+
end
|
|
5497
|
+
)
|
|
5498
|
+
end
|
|
5499
|
+
)
|
|
5500
|
+
end
|
|
5501
|
+
else
|
|
5502
|
+
false
|
|
5503
|
+
end
|
|
5504
|
+
} ; ___lambda.call(
|
|
5505
|
+
begin
|
|
5506
|
+
embedBacktraceInfo( "", 1 );
|
|
5507
|
+
_cdr(
|
|
5508
|
+
__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30266
|
|
3663
5509
|
)
|
|
3664
5510
|
end
|
|
3665
5511
|
)
|