nendo 0.6.0 → 0.6.1

This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
@@ -135,14 +135,15 @@
135
135
  ;; guard for Exceptions
136
136
  (define-syntax %guard-var
137
137
  (syntax-rules (=> ...)
138
- ((%guard-clause (var clauses ...))
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 ...))))
@@ -999,13 +999,13 @@ trampCall(
999
999
  end
1000
1000
  } ; ___lambda.call(
1001
1001
  begin
1002
- ___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30105|
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(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30105)
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(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30105)
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 { |__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30110,__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111,__compare__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30112|
1083
+ Proc.new { |__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30167,__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168,__compare__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30169|
1084
1084
  begin
1085
- ___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30134|
1085
+ ___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30191|
1086
1086
  if (
1087
1087
  begin
1088
- trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30134)
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(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30134)
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 { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30135|
1098
+ ___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30192|
1099
1099
  if (
1100
1100
  begin
1101
- trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30135)
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(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30135)
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 { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30136|
1111
+ ___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30193|
1112
1112
  if (
1113
1113
  begin
1114
- trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30136)
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(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30136)
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 { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30137|
1124
+ ___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30194|
1125
1125
  if (
1126
1126
  begin
1127
- trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30137)
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(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30137)
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 { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30138|
1137
+ ___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30195|
1138
1138
  if (
1139
1139
  begin
1140
- trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30138)
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(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30138)
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
- __expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30110
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 { |__v__10__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30127|
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
- __v__10__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30127
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 { |__v__11__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30128|
1200
+ ___lambda = lambda { |__v__11__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30185|
1201
1201
  begin
1202
1202
  ___lambda = lambda { |_exc|
1203
1203
  begin
1204
- ___lambda = lambda { |__v__12__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30129|
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
- __v__12__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30129
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 { |__v__13__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30130|
1225
+ ___lambda = lambda { |__v__13__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30187|
1226
1226
  begin
1227
1227
  ___lambda = lambda { |_mes|
1228
1228
  begin
1229
- ___lambda = lambda { |__v__14__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30131|
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
- __v__14__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30131
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 { |__v__15__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30132|
1250
+ ___lambda = lambda { |__v__15__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189|
1251
1251
  begin
1252
1252
  ___lambda = lambda { |_backtrace|
1253
1253
  begin
1254
- ___lambda = lambda { |__v__16__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30133|
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
- __v__16__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30133
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( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111',
1279
+ trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168',
1280
1280
  begin
1281
- trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111)
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
- __v__14__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30131
1326
+ __v__14__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30188
1327
1327
  )
1328
1328
  end
1329
1329
  )
1330
1330
  end
1331
1331
  } ; ___lambda.call(
1332
- __v__15__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30132
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
- __v__14__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30131
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
- __v__12__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30129
1351
+ __v__12__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30186
1352
1352
  )
1353
1353
  end
1354
1354
  )
1355
1355
  end
1356
1356
  } ; ___lambda.call(
1357
- __v__13__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30130
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
- __v__12__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30129
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
- __v__10__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30127
1376
+ __v__10__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30184
1377
1377
  )
1378
1378
  end
1379
1379
  )
1380
1380
  end
1381
1381
  } ; ___lambda.call(
1382
- __v__11__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30128
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
- __v__10__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30127
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
- __expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30110
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 { |__v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30122|
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
- __v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30122
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 { |__v__6__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30123|
1432
+ ___lambda = lambda { |__v__6__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30180|
1433
1433
  begin
1434
1434
  ___lambda = lambda { |_exc|
1435
1435
  begin
1436
- ___lambda = lambda { |__v__7__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30124|
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
- __v__7__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30124
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 { |__v__8__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30125|
1457
+ ___lambda = lambda { |__v__8__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30182|
1458
1458
  begin
1459
1459
  ___lambda = lambda { |_mes|
1460
1460
  begin
1461
- ___lambda = lambda { |__v__9__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30126|
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
- __v__9__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30126
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( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111',
1486
+ trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168',
1487
1487
  begin
1488
- trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111)
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( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111',
1518
+ trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168',
1519
1519
  begin
1520
- trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111)
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( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111',
1540
+ trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168',
1541
1541
  begin
1542
- trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111)
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( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111',
1561
+ trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168',
1562
1562
  begin
1563
- trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111)
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
- __v__7__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30124
1608
+ __v__7__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30181
1609
1609
  )
1610
1610
  end
1611
1611
  )
1612
1612
  end
1613
1613
  } ; ___lambda.call(
1614
- __v__8__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30125
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
- __v__7__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30124
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
- __v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30122
1633
+ __v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30179
1634
1634
  )
1635
1635
  end
1636
1636
  )
1637
1637
  end
1638
1638
  } ; ___lambda.call(
1639
- __v__6__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30123
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
- __v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30122
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
- __expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30110
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 { |__v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30119|
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
- __v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30119
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 { |__v__3__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30120|
1689
+ ___lambda = lambda { |__v__3__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30177|
1690
1690
  begin
1691
1691
  ___lambda = lambda { |_exc|
1692
1692
  begin
1693
- ___lambda = lambda { |__v__4__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30121|
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
- __v__4__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30121
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( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111',
1718
+ trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168',
1719
1719
  begin
1720
- trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111)
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( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111',
1743
+ trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168',
1744
1744
  begin
1745
- trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111)
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( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111',
1765
+ trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168',
1766
1766
  begin
1767
- trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111)
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( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111',
1786
+ trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168',
1787
1787
  begin
1788
- trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111)
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( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111',
1825
+ trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168',
1826
1826
  begin
1827
- trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111)
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( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111',
1847
+ trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168',
1848
1848
  begin
1849
- trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111)
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( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111',
1868
+ trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168',
1869
1869
  begin
1870
- trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111)
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
- __v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30119
1915
+ __v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30176
1916
1916
  )
1917
1917
  end
1918
1918
  )
1919
1919
  end
1920
1920
  } ; ___lambda.call(
1921
- __v__3__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30120
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
- __v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30119
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
- __expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30110
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 { |__v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30118|
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
- __v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30118
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( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111',
1975
+ trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168',
1976
1976
  begin
1977
- trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30111)
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
- __expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30110
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 { |__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30139,__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30140,__compare__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30141|
2033
+ Proc.new { |__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30196,__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30197,__compare__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30198|
2034
2034
  begin
2035
- ___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30152|
2035
+ ___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30209|
2036
2036
  if (
2037
2037
  begin
2038
- trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30152)
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(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30152)
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 { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30153|
2048
+ ___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30210|
2049
2049
  if (
2050
2050
  begin
2051
- trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30153)
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(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30153)
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
- __expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30139
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 { |__v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30147|
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
- __v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30147
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 { |__v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30148|
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
- __v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30148
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 { |__v__3__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30149|
2132
+ ___lambda = lambda { |__v__3__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30206|
2133
2133
  begin
2134
2134
  ___lambda = lambda { |_var|
2135
2135
  begin
2136
- ___lambda = lambda { |__v__4__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30150|
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
- __v__4__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30150
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 { |__v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30151|
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
- __v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30151
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
- __v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30147
2198
+ __v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30204
2199
2199
  )
2200
2200
  end
2201
2201
  )
2202
2202
  end
2203
2203
  } ; ___lambda.call(
2204
- __v__4__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30150
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
- __v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30148
2214
+ __v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30205
2215
2215
  )
2216
2216
  end
2217
2217
  )
2218
2218
  end
2219
2219
  } ; ___lambda.call(
2220
- __v__3__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30149
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
- __v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30148
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
- __v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30147
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
- __expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30139
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 { |__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30154,__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30155,__compare__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30156|
2283
+ Proc.new { |__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30211,__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30212,__compare__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30213|
2284
2284
  begin
2285
- ___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30167|
2285
+ ___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30224|
2286
2286
  if (
2287
2287
  begin
2288
- trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30167)
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(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30167)
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 { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168|
2298
+ ___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30225|
2299
2299
  if (
2300
2300
  begin
2301
- trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168)
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(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30168)
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
- __expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30154
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 { |__v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30162|
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
- __v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30162
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 { |__v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30163|
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
- __v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30163
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 { |__v__3__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30164|
2382
+ ___lambda = lambda { |__v__3__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30221|
2383
2383
  begin
2384
2384
  ___lambda = lambda { |_var|
2385
2385
  begin
2386
- ___lambda = lambda { |__v__4__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30165|
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
- __v__4__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30165
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 { |__v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30166|
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
- __v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30166
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( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30155', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30155',
2442
+ trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30212', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30212',
2443
2443
  begin
2444
- trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30155)
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( "./lib/nendo/experimental.nnd", 91 );
2454
- trampCall( self._map_METHOD( 'map',
2453
+ embedBacktraceInfo( "", 1 );
2454
+ trampCall( self._append_METHOD( 'append',
2455
2455
  begin
2456
- if @global_lisp_binding.has_key?('_map') then
2457
- trampCall(@_map)
2458
- else raise NameError.new( "Error: undefined variable _map", "_map" ) end
2459
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:91"] + __e.backtrace ) ; raise __e
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
- trampCall(_clauses)
2470
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:145"] + __e.backtrace ) ; raise __e
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
- __v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30162
2542
+ __v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30219
2485
2543
  )
2486
2544
  end
2487
2545
  )
2488
2546
  end
2489
2547
  } ; ___lambda.call(
2490
- __v__4__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30165
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
- __v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30163
2558
+ __v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30220
2501
2559
  )
2502
2560
  end
2503
2561
  )
2504
2562
  end
2505
2563
  } ; ___lambda.call(
2506
- __v__3__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30164
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
- __v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30163
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
- __v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30162
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
- __expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30154
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 { |__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30169,__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30170,__compare__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30171|
2627
+ Proc.new { |__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30226,__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30227,__compare__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30228|
2570
2628
  begin
2571
- ___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30184|
2629
+ ___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30241|
2572
2630
  if (
2573
2631
  begin
2574
- trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30184)
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(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30184)
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 { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30185|
2642
+ ___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30242|
2585
2643
  if (
2586
2644
  begin
2587
- trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30185)
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(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30185)
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 { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30186|
2655
+ ___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30243|
2598
2656
  if (
2599
2657
  begin
2600
- trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30186)
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(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30186)
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 { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30187|
2668
+ ___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30244|
2611
2669
  if (
2612
2670
  begin
2613
- trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30187)
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(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30187)
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
- __expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30169
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:152"] + __e.backtrace )
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 { |__v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30181|
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
- __v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30181
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 { |__v__6__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30182|
2731
+ ___lambda = lambda { |__v__6__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30239|
2674
2732
  begin
2675
2733
  ___lambda = lambda { |_var_MIMARKclauses|
2676
2734
  begin
2677
- ___lambda = lambda { |__v__7__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30183|
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
- __v__7__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30183
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( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30170', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30170',
2770
+ trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30227', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30227',
2713
2771
  begin
2714
- trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30170)
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( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30170', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30170',
2788
+ trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30227', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30227',
2731
2789
  begin
2732
- trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30170)
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:158"] + __e.backtrace ) ; raise __e
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( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30170', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30170',
2818
+ trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30227', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30227',
2761
2819
  begin
2762
- trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30170)
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:158"] + __e.backtrace ) ; raise __e
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:159"] + __e.backtrace ) ; raise __e
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:159"] + __e.backtrace ) ; raise __e
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
- __v__7__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30183
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
- __v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30181
2880
+ __v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30238
2823
2881
  )
2824
2882
  end
2825
2883
  )
2826
2884
  end
2827
2885
  } ; ___lambda.call(
2828
- __v__6__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30182
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
- __v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30181
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
- __expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30169
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 { |__v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30178|
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
- __v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30178
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 { |__v__3__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30179|
2936
+ ___lambda = lambda { |__v__3__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30236|
2879
2937
  begin
2880
2938
  ___lambda = lambda { |_var_MIMARKclauses|
2881
2939
  begin
2882
- ___lambda = lambda { |__v__4__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30180|
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
- __v__4__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30180
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( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30170', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30170',
2965
+ trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30227', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30227',
2908
2966
  begin
2909
- trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30170)
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
- __v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30178
2991
+ __v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30235
2934
2992
  )
2935
2993
  end
2936
2994
  )
2937
2995
  end
2938
2996
  } ; ___lambda.call(
2939
- __v__3__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30179
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
- __v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30178
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
- __expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30169
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 { |__v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30177|
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
- __v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30177
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( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30170', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30170',
3051
+ trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30227', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30227',
2994
3052
  begin
2995
- trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30170)
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
- __expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30169
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 { |__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30188,__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189,__compare__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30190|
3109
+ Proc.new { |__expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30245,__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246,__compare__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30247|
3052
3110
  begin
3053
- ___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30205|
3111
+ ___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30262|
3054
3112
  if (
3055
3113
  begin
3056
- trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30205)
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(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30205)
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 { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30206|
3124
+ ___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30263|
3067
3125
  if (
3068
3126
  begin
3069
- trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30206)
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(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30206)
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 { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30207|
3137
+ ___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30264|
3080
3138
  if (
3081
3139
  begin
3082
- trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30207)
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(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30207)
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 { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30208|
3150
+ ___lambda = lambda { |___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30265|
3093
3151
  if (
3094
3152
  begin
3095
- trampCall(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30208)
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(___gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30208)
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
- __expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30188
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:168"] + __e.backtrace )
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 { |__v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30200|
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
- __v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30200
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 { |__v__6__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30201|
3213
+ ___lambda = lambda { |__v__6__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30258|
3156
3214
  begin
3157
3215
  ___lambda = lambda { |_body|
3158
3216
  begin
3159
- ___lambda = lambda { |__v__7__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30202|
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
- __v__7__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30202
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 { |__v__8__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30203|
3238
+ ___lambda = lambda { |__v__8__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30260|
3181
3239
  begin
3182
3240
  ___lambda = lambda { |_cleanup|
3183
3241
  begin
3184
- ___lambda = lambda { |__v__9__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30204|
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
- __v__9__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30204
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( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189',
3267
+ trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246',
3210
3268
  begin
3211
- trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189)
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( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189',
3282
+ trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246',
3225
3283
  begin
3226
- trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189)
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( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189',
3304
+ trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246',
3247
3305
  begin
3248
- trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189)
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( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189',
3322
+ trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246',
3265
3323
  begin
3266
- trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189)
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( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189',
3347
+ trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246',
3290
3348
  begin
3291
- trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189)
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:176"] + __e.backtrace ) ; raise __e
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( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189',
3369
+ trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246',
3312
3370
  begin
3313
- trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189)
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( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189',
3404
+ trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246',
3347
3405
  begin
3348
- trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189)
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( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189',
3422
+ trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246',
3365
3423
  begin
3366
- trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189)
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( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189',
3437
+ trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246',
3380
3438
  begin
3381
- trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189)
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:175"] + __e.backtrace ) ; raise __e
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:176"] + __e.backtrace ) ; raise __e
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
- __v__7__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30202
3498
+ __v__7__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30259
3441
3499
  )
3442
3500
  end
3443
3501
  )
3444
3502
  end
3445
3503
  } ; ___lambda.call(
3446
- __v__8__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30203
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
- __v__7__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30202
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
- __v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30200
3523
+ __v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30257
3466
3524
  )
3467
3525
  end
3468
3526
  )
3469
3527
  end
3470
3528
  } ; ___lambda.call(
3471
- __v__6__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30201
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
- __v__5__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30200
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
- __expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30188
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 { |__v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30197|
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
- __v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30197
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 { |__v__3__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30198|
3579
+ ___lambda = lambda { |__v__3__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30255|
3522
3580
  begin
3523
3581
  ___lambda = lambda { |_body|
3524
3582
  begin
3525
- ___lambda = lambda { |__v__4__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30199|
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
- __v__4__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30199
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( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189',
3608
+ trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246',
3551
3609
  begin
3552
- trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189)
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
- __v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30197
3634
+ __v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30254
3577
3635
  )
3578
3636
  end
3579
3637
  )
3580
3638
  end
3581
3639
  } ; ___lambda.call(
3582
- __v__3__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30198
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
- __v__2__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30197
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
- __expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30188
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 { |__v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30196|
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
- __v__1__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30196
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( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189',
3694
+ trampCall( callProcedure( '__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246', '_rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30246',
3637
3695
  begin
3638
- trampCall(__rename__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30189)
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
- __expr__gensym__29d1958308f04161c7005d22e2e7d31864eae2bc_30188
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
  )