nendo 0.5.2 → 0.5.3

Sign up to get free protection for your applications and to get access to all the features.
Files changed (22) hide show
  1. data/benchmark/benchmark.nnd +27 -5
  2. data/lib/debug/syslog.nndc +24 -18
  3. data/lib/init.nnd +12 -28
  4. data/lib/init.nndc +18733 -14143
  5. data/lib/nendo/experimental.nnd +120 -0
  6. data/lib/nendo/experimental.nndc +1069 -0
  7. data/lib/nendo/test.nndc +1122 -879
  8. data/lib/nendo.rb +67 -16
  9. data/lib/rfc/json.nndc +486 -375
  10. data/lib/srfi-1.nndc +12775 -9853
  11. data/lib/srfi-2.nndc +810 -552
  12. data/lib/srfi-26.nndc +2615 -1838
  13. data/lib/text/html-lite.nndc +2286 -1737
  14. data/lib/text/tree.nndc +136 -103
  15. data/lib/util/combinations.nndc +4747 -3436
  16. data/lib/util/list.nndc +3417 -2355
  17. data/lib/util/match.nndc +53574 -36147
  18. data/test/nendo-util-test.nnd +318 -32
  19. data/test/nendo_spec.rb +65 -12
  20. data/test/rspec_formatter_for_emacs.rb +25 -0
  21. data/test/syntax_spec.rb +2 -0
  22. metadata +86 -12
data/lib/nendo/test.nndc CHANGED
@@ -96,20 +96,23 @@ trampCall(
96
96
  @global_lisp_binding['__ASMARKtest_MIMARKcounts_ASMARK'] = self.method( :__ASMARKtest_MIMARKcounts_ASMARK_METHOD )
97
97
  @__ASMARKtest_MIMARKcounts_ASMARK =
98
98
  trampCall(
99
- trampCall( self._vector_METHOD( 'vector',
100
- begin
101
- if @global_lisp_binding.has_key?('_vector') then
102
- trampCall(@_vector)
103
- else raise NameError.new( "Error: undefined variable _vector", "_vector" ) end
104
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:46"] + __e.backtrace ) ; raise __e
105
- end ,
106
- [
107
- 0 ,
108
- 0 ,
109
- 0 ,
110
- 0
111
- ]
112
- ))
99
+ begin
100
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 46 );
101
+ trampCall( self._vector_METHOD( 'vector',
102
+ begin
103
+ if @global_lisp_binding.has_key?('_vector') then
104
+ trampCall(@_vector)
105
+ else raise NameError.new( "Error: undefined variable _vector", "_vector" ) end
106
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:46"] + __e.backtrace ) ; raise __e
107
+ end ,
108
+ [
109
+ 0 ,
110
+ 0 ,
111
+ 0 ,
112
+ 0
113
+ ]
114
+ ))
115
+ end
113
116
  )
114
117
  end
115
118
  )
@@ -122,43 +125,52 @@ trampCall(
122
125
  @_test_MIMARKcount_PLMARK_PLMARK =
123
126
  trampCall(
124
127
  Proc.new { ||
125
- delayCall( '_vector_MIMARKset_EXMARK', 'vector-set!',
126
- begin
127
- if @global_lisp_binding.has_key?('_vector_MIMARKset_EXMARK') then
128
- trampCall(@_vector_MIMARKset_EXMARK)
129
- else raise NameError.new( "Error: undefined variable _vector_MIMARKset_EXMARK", "_vector_MIMARKset_EXMARK" ) end
130
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:48"] + __e.backtrace ) ; raise __e
131
- end ,
132
- [
133
- begin
134
- if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
135
- trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
136
- else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
137
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:48"] + __e.backtrace ) ; raise __e
138
- end ,
139
- 0 ,
140
- __PLMARK_ARGS2(
141
- trampCall( self._vector_MIMARKref_METHOD( 'vector-ref',
142
- begin
143
- if @global_lisp_binding.has_key?('_vector_MIMARKref') then
144
- trampCall(@_vector_MIMARKref)
145
- else raise NameError.new( "Error: undefined variable _vector_MIMARKref", "_vector_MIMARKref" ) end
146
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:48"] + __e.backtrace ) ; raise __e
147
- end ,
148
- [
149
- begin
150
- if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
151
- trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
152
- else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
153
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:48"] + __e.backtrace ) ; raise __e
154
- end ,
155
- 0
156
- ]
157
- )) ,
158
- 1
159
- )
160
- ]
161
- )
128
+ begin
129
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 48 );
130
+ delayCall( '_vector_MIMARKset_EXMARK', 'vector-set!',
131
+ begin
132
+ if @global_lisp_binding.has_key?('_vector_MIMARKset_EXMARK') then
133
+ trampCall(@_vector_MIMARKset_EXMARK)
134
+ else raise NameError.new( "Error: undefined variable _vector_MIMARKset_EXMARK", "_vector_MIMARKset_EXMARK" ) end
135
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:48"] + __e.backtrace ) ; raise __e
136
+ end ,
137
+ [
138
+ begin
139
+ if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
140
+ trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
141
+ else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
142
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:48"] + __e.backtrace ) ; raise __e
143
+ end ,
144
+ 0 ,
145
+ begin
146
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 48 );
147
+ __PLMARK_ARGS2(
148
+ begin
149
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 48 );
150
+ trampCall( self._vector_MIMARKref_METHOD( 'vector-ref',
151
+ begin
152
+ if @global_lisp_binding.has_key?('_vector_MIMARKref') then
153
+ trampCall(@_vector_MIMARKref)
154
+ else raise NameError.new( "Error: undefined variable _vector_MIMARKref", "_vector_MIMARKref" ) end
155
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:48"] + __e.backtrace ) ; raise __e
156
+ end ,
157
+ [
158
+ begin
159
+ if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
160
+ trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
161
+ else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
162
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:48"] + __e.backtrace ) ; raise __e
163
+ end ,
164
+ 0
165
+ ]
166
+ ))
167
+ end ,
168
+ 1
169
+ )
170
+ end
171
+ ]
172
+ )
173
+ end
162
174
  }
163
175
  )
164
176
  end
@@ -172,43 +184,52 @@ trampCall(
172
184
  @_test_MIMARKpass_PLMARK_PLMARK =
173
185
  trampCall(
174
186
  Proc.new { ||
175
- delayCall( '_vector_MIMARKset_EXMARK', 'vector-set!',
176
- begin
177
- if @global_lisp_binding.has_key?('_vector_MIMARKset_EXMARK') then
178
- trampCall(@_vector_MIMARKset_EXMARK)
179
- else raise NameError.new( "Error: undefined variable _vector_MIMARKset_EXMARK", "_vector_MIMARKset_EXMARK" ) end
180
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:50"] + __e.backtrace ) ; raise __e
181
- end ,
182
- [
183
- begin
184
- if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
185
- trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
186
- else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
187
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:50"] + __e.backtrace ) ; raise __e
188
- end ,
189
- 1 ,
190
- __PLMARK_ARGS2(
191
- trampCall( self._vector_MIMARKref_METHOD( 'vector-ref',
192
- begin
193
- if @global_lisp_binding.has_key?('_vector_MIMARKref') then
194
- trampCall(@_vector_MIMARKref)
195
- else raise NameError.new( "Error: undefined variable _vector_MIMARKref", "_vector_MIMARKref" ) end
196
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:50"] + __e.backtrace ) ; raise __e
197
- end ,
198
- [
199
- begin
200
- if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
201
- trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
202
- else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
203
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:50"] + __e.backtrace ) ; raise __e
204
- end ,
205
- 1
206
- ]
207
- )) ,
208
- 1
209
- )
210
- ]
211
- )
187
+ begin
188
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 50 );
189
+ delayCall( '_vector_MIMARKset_EXMARK', 'vector-set!',
190
+ begin
191
+ if @global_lisp_binding.has_key?('_vector_MIMARKset_EXMARK') then
192
+ trampCall(@_vector_MIMARKset_EXMARK)
193
+ else raise NameError.new( "Error: undefined variable _vector_MIMARKset_EXMARK", "_vector_MIMARKset_EXMARK" ) end
194
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:50"] + __e.backtrace ) ; raise __e
195
+ end ,
196
+ [
197
+ begin
198
+ if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
199
+ trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
200
+ else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
201
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:50"] + __e.backtrace ) ; raise __e
202
+ end ,
203
+ 1 ,
204
+ begin
205
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 50 );
206
+ __PLMARK_ARGS2(
207
+ begin
208
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 50 );
209
+ trampCall( self._vector_MIMARKref_METHOD( 'vector-ref',
210
+ begin
211
+ if @global_lisp_binding.has_key?('_vector_MIMARKref') then
212
+ trampCall(@_vector_MIMARKref)
213
+ else raise NameError.new( "Error: undefined variable _vector_MIMARKref", "_vector_MIMARKref" ) end
214
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:50"] + __e.backtrace ) ; raise __e
215
+ end ,
216
+ [
217
+ begin
218
+ if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
219
+ trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
220
+ else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
221
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:50"] + __e.backtrace ) ; raise __e
222
+ end ,
223
+ 1
224
+ ]
225
+ ))
226
+ end ,
227
+ 1
228
+ )
229
+ end
230
+ ]
231
+ )
232
+ end
212
233
  }
213
234
  )
214
235
  end
@@ -222,43 +243,52 @@ trampCall(
222
243
  @_test_MIMARKfail_PLMARK_PLMARK =
223
244
  trampCall(
224
245
  Proc.new { ||
225
- delayCall( '_vector_MIMARKset_EXMARK', 'vector-set!',
226
- begin
227
- if @global_lisp_binding.has_key?('_vector_MIMARKset_EXMARK') then
228
- trampCall(@_vector_MIMARKset_EXMARK)
229
- else raise NameError.new( "Error: undefined variable _vector_MIMARKset_EXMARK", "_vector_MIMARKset_EXMARK" ) end
230
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:52"] + __e.backtrace ) ; raise __e
231
- end ,
232
- [
233
- begin
234
- if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
235
- trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
236
- else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
237
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:52"] + __e.backtrace ) ; raise __e
238
- end ,
239
- 2 ,
240
- __PLMARK_ARGS2(
241
- trampCall( self._vector_MIMARKref_METHOD( 'vector-ref',
242
- begin
243
- if @global_lisp_binding.has_key?('_vector_MIMARKref') then
244
- trampCall(@_vector_MIMARKref)
245
- else raise NameError.new( "Error: undefined variable _vector_MIMARKref", "_vector_MIMARKref" ) end
246
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:52"] + __e.backtrace ) ; raise __e
247
- end ,
248
- [
249
- begin
250
- if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
251
- trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
252
- else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
253
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:52"] + __e.backtrace ) ; raise __e
254
- end ,
255
- 2
256
- ]
257
- )) ,
258
- 1
259
- )
260
- ]
261
- )
246
+ begin
247
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 52 );
248
+ delayCall( '_vector_MIMARKset_EXMARK', 'vector-set!',
249
+ begin
250
+ if @global_lisp_binding.has_key?('_vector_MIMARKset_EXMARK') then
251
+ trampCall(@_vector_MIMARKset_EXMARK)
252
+ else raise NameError.new( "Error: undefined variable _vector_MIMARKset_EXMARK", "_vector_MIMARKset_EXMARK" ) end
253
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:52"] + __e.backtrace ) ; raise __e
254
+ end ,
255
+ [
256
+ begin
257
+ if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
258
+ trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
259
+ else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
260
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:52"] + __e.backtrace ) ; raise __e
261
+ end ,
262
+ 2 ,
263
+ begin
264
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 52 );
265
+ __PLMARK_ARGS2(
266
+ begin
267
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 52 );
268
+ trampCall( self._vector_MIMARKref_METHOD( 'vector-ref',
269
+ begin
270
+ if @global_lisp_binding.has_key?('_vector_MIMARKref') then
271
+ trampCall(@_vector_MIMARKref)
272
+ else raise NameError.new( "Error: undefined variable _vector_MIMARKref", "_vector_MIMARKref" ) end
273
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:52"] + __e.backtrace ) ; raise __e
274
+ end ,
275
+ [
276
+ begin
277
+ if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
278
+ trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
279
+ else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
280
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:52"] + __e.backtrace ) ; raise __e
281
+ end ,
282
+ 2
283
+ ]
284
+ ))
285
+ end ,
286
+ 1
287
+ )
288
+ end
289
+ ]
290
+ )
291
+ end
262
292
  }
263
293
  )
264
294
  end
@@ -272,43 +302,52 @@ trampCall(
272
302
  @_test_MIMARKabort_PLMARK_PLMARK =
273
303
  trampCall(
274
304
  Proc.new { ||
275
- delayCall( '_vector_MIMARKset_EXMARK', 'vector-set!',
276
- begin
277
- if @global_lisp_binding.has_key?('_vector_MIMARKset_EXMARK') then
278
- trampCall(@_vector_MIMARKset_EXMARK)
279
- else raise NameError.new( "Error: undefined variable _vector_MIMARKset_EXMARK", "_vector_MIMARKset_EXMARK" ) end
280
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:54"] + __e.backtrace ) ; raise __e
281
- end ,
282
- [
283
- begin
284
- if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
285
- trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
286
- else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
287
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:54"] + __e.backtrace ) ; raise __e
288
- end ,
289
- 3 ,
290
- __PLMARK_ARGS2(
291
- trampCall( self._vector_MIMARKref_METHOD( 'vector-ref',
292
- begin
293
- if @global_lisp_binding.has_key?('_vector_MIMARKref') then
294
- trampCall(@_vector_MIMARKref)
295
- else raise NameError.new( "Error: undefined variable _vector_MIMARKref", "_vector_MIMARKref" ) end
296
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:54"] + __e.backtrace ) ; raise __e
297
- end ,
298
- [
299
- begin
300
- if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
301
- trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
302
- else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
303
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:54"] + __e.backtrace ) ; raise __e
304
- end ,
305
- 3
306
- ]
307
- )) ,
308
- 1
309
- )
310
- ]
311
- )
305
+ begin
306
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 54 );
307
+ delayCall( '_vector_MIMARKset_EXMARK', 'vector-set!',
308
+ begin
309
+ if @global_lisp_binding.has_key?('_vector_MIMARKset_EXMARK') then
310
+ trampCall(@_vector_MIMARKset_EXMARK)
311
+ else raise NameError.new( "Error: undefined variable _vector_MIMARKset_EXMARK", "_vector_MIMARKset_EXMARK" ) end
312
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:54"] + __e.backtrace ) ; raise __e
313
+ end ,
314
+ [
315
+ begin
316
+ if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
317
+ trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
318
+ else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
319
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:54"] + __e.backtrace ) ; raise __e
320
+ end ,
321
+ 3 ,
322
+ begin
323
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 54 );
324
+ __PLMARK_ARGS2(
325
+ begin
326
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 54 );
327
+ trampCall( self._vector_MIMARKref_METHOD( 'vector-ref',
328
+ begin
329
+ if @global_lisp_binding.has_key?('_vector_MIMARKref') then
330
+ trampCall(@_vector_MIMARKref)
331
+ else raise NameError.new( "Error: undefined variable _vector_MIMARKref", "_vector_MIMARKref" ) end
332
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:54"] + __e.backtrace ) ; raise __e
333
+ end ,
334
+ [
335
+ begin
336
+ if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
337
+ trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
338
+ else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
339
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:54"] + __e.backtrace ) ; raise __e
340
+ end ,
341
+ 3
342
+ ]
343
+ ))
344
+ end ,
345
+ 1
346
+ )
347
+ end
348
+ ]
349
+ )
350
+ end
312
351
  }
313
352
  )
314
353
  end
@@ -322,86 +361,101 @@ trampCall(
322
361
  @_format_MIMARKsummary =
323
362
  trampCall(
324
363
  Proc.new { ||
325
- delayCall( '_sprintf', 'sprintf',
326
- begin
327
- if @global_lisp_binding.has_key?('_sprintf') then
328
- trampCall(@_sprintf)
329
- else raise NameError.new( "Error: undefined variable _sprintf", "_sprintf" ) end
330
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:57"] + __e.backtrace ) ; raise __e
331
- end ,
332
- [
333
- "Total: %5d tests, %5d passed, %5d failed, %5d aborted.
334
- " ,
335
- trampCall( self._vector_MIMARKref_METHOD( 'vector-ref',
364
+ begin
365
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 57 );
366
+ delayCall( '_sprintf', 'sprintf',
367
+ begin
368
+ if @global_lisp_binding.has_key?('_sprintf') then
369
+ trampCall(@_sprintf)
370
+ else raise NameError.new( "Error: undefined variable _sprintf", "_sprintf" ) end
371
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:57"] + __e.backtrace ) ; raise __e
372
+ end ,
373
+ [
374
+ "Total: %5d tests, %5d passed, %5d failed, %5d aborted.
375
+ " ,
336
376
  begin
337
- if @global_lisp_binding.has_key?('_vector_MIMARKref') then
338
- trampCall(@_vector_MIMARKref)
339
- else raise NameError.new( "Error: undefined variable _vector_MIMARKref", "_vector_MIMARKref" ) end
340
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:61"] + __e.backtrace ) ; raise __e
377
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 61 );
378
+ trampCall( self._vector_MIMARKref_METHOD( 'vector-ref',
379
+ begin
380
+ if @global_lisp_binding.has_key?('_vector_MIMARKref') then
381
+ trampCall(@_vector_MIMARKref)
382
+ else raise NameError.new( "Error: undefined variable _vector_MIMARKref", "_vector_MIMARKref" ) end
383
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:61"] + __e.backtrace ) ; raise __e
384
+ end ,
385
+ [
386
+ begin
387
+ if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
388
+ trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
389
+ else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
390
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:61"] + __e.backtrace ) ; raise __e
391
+ end ,
392
+ 0
393
+ ]
394
+ ))
341
395
  end ,
342
- [
343
- begin
344
- if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
345
- trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
346
- else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
347
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:61"] + __e.backtrace ) ; raise __e
348
- end ,
349
- 0
350
- ]
351
- )) ,
352
- trampCall( self._vector_MIMARKref_METHOD( 'vector-ref',
353
396
  begin
354
- if @global_lisp_binding.has_key?('_vector_MIMARKref') then
355
- trampCall(@_vector_MIMARKref)
356
- else raise NameError.new( "Error: undefined variable _vector_MIMARKref", "_vector_MIMARKref" ) end
357
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:61"] + __e.backtrace ) ; raise __e
397
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 61 );
398
+ trampCall( self._vector_MIMARKref_METHOD( 'vector-ref',
399
+ begin
400
+ if @global_lisp_binding.has_key?('_vector_MIMARKref') then
401
+ trampCall(@_vector_MIMARKref)
402
+ else raise NameError.new( "Error: undefined variable _vector_MIMARKref", "_vector_MIMARKref" ) end
403
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:61"] + __e.backtrace ) ; raise __e
404
+ end ,
405
+ [
406
+ begin
407
+ if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
408
+ trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
409
+ else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
410
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:61"] + __e.backtrace ) ; raise __e
411
+ end ,
412
+ 1
413
+ ]
414
+ ))
358
415
  end ,
359
- [
360
- begin
361
- if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
362
- trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
363
- else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
364
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:61"] + __e.backtrace ) ; raise __e
365
- end ,
366
- 1
367
- ]
368
- )) ,
369
- trampCall( self._vector_MIMARKref_METHOD( 'vector-ref',
370
416
  begin
371
- if @global_lisp_binding.has_key?('_vector_MIMARKref') then
372
- trampCall(@_vector_MIMARKref)
373
- else raise NameError.new( "Error: undefined variable _vector_MIMARKref", "_vector_MIMARKref" ) end
374
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:61"] + __e.backtrace ) ; raise __e
417
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 61 );
418
+ trampCall( self._vector_MIMARKref_METHOD( 'vector-ref',
419
+ begin
420
+ if @global_lisp_binding.has_key?('_vector_MIMARKref') then
421
+ trampCall(@_vector_MIMARKref)
422
+ else raise NameError.new( "Error: undefined variable _vector_MIMARKref", "_vector_MIMARKref" ) end
423
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:61"] + __e.backtrace ) ; raise __e
424
+ end ,
425
+ [
426
+ begin
427
+ if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
428
+ trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
429
+ else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
430
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:61"] + __e.backtrace ) ; raise __e
431
+ end ,
432
+ 2
433
+ ]
434
+ ))
375
435
  end ,
376
- [
377
- begin
378
- if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
379
- trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
380
- else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
381
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:61"] + __e.backtrace ) ; raise __e
382
- end ,
383
- 2
384
- ]
385
- )) ,
386
- trampCall( self._vector_MIMARKref_METHOD( 'vector-ref',
387
436
  begin
388
- if @global_lisp_binding.has_key?('_vector_MIMARKref') then
389
- trampCall(@_vector_MIMARKref)
390
- else raise NameError.new( "Error: undefined variable _vector_MIMARKref", "_vector_MIMARKref" ) end
391
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:61"] + __e.backtrace ) ; raise __e
392
- end ,
393
- [
394
- begin
395
- if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
396
- trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
397
- else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
398
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:61"] + __e.backtrace ) ; raise __e
399
- end ,
400
- 3
401
- ]
402
- ))
403
- ]
404
- )
437
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 61 );
438
+ trampCall( self._vector_MIMARKref_METHOD( 'vector-ref',
439
+ begin
440
+ if @global_lisp_binding.has_key?('_vector_MIMARKref') then
441
+ trampCall(@_vector_MIMARKref)
442
+ else raise NameError.new( "Error: undefined variable _vector_MIMARKref", "_vector_MIMARKref" ) end
443
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:61"] + __e.backtrace ) ; raise __e
444
+ end ,
445
+ [
446
+ begin
447
+ if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
448
+ trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
449
+ else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
450
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:61"] + __e.backtrace ) ; raise __e
451
+ end ,
452
+ 3
453
+ ]
454
+ ))
455
+ end
456
+ ]
457
+ )
458
+ end
405
459
  }
406
460
  )
407
461
  end
@@ -417,19 +471,28 @@ trampCall(
417
471
  Proc.new { ||
418
472
  if (
419
473
  if (
420
- _not(
421
- _eq_QUMARK(
422
- false ,
423
- _string_QUMARK(
424
- begin
425
- if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK') then
426
- trampCall(@__ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK)
427
- else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK", "__ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK" ) end
428
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:66"] + __e.backtrace ) ; raise __e
429
- end
430
- )
474
+ begin
475
+ embedBacktraceInfo( "./lib/nendo/experimental.nnd", 39 );
476
+ _not(
477
+ begin
478
+ embedBacktraceInfo( "", 1 );
479
+ _eq_QUMARK(
480
+ false ,
481
+ begin
482
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 64 );
483
+ _string_QUMARK(
484
+ begin
485
+ if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK') then
486
+ trampCall(@__ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK)
487
+ else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK", "__ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK" ) end
488
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:66"] + __e.backtrace ) ; raise __e
489
+ end
490
+ )
491
+ end
492
+ )
493
+ end
431
494
  )
432
- )
495
+ end
433
496
  ) then
434
497
  begin
435
498
  trampCall(File).exist?(
@@ -447,187 +510,223 @@ trampCall(
447
510
  end
448
511
  ) then
449
512
  begin
450
- trampCall( self._with_MIMARKopen_METHOD( 'with-open',
451
- begin
452
- if @global_lisp_binding.has_key?('_with_MIMARKopen') then
453
- trampCall(@_with_MIMARKopen)
454
- else raise NameError.new( "Error: undefined variable _with_MIMARKopen", "_with_MIMARKopen" ) end
455
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:66"] + __e.backtrace ) ; raise __e
456
- end ,
457
- [
458
- begin
459
- if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK') then
460
- trampCall(@__ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK)
461
- else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK", "__ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK" ) end
462
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:66"] + __e.backtrace ) ; raise __e
463
- end ,
464
- Proc.new { |_f|
513
+ begin
514
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 66 );
515
+ trampCall( self._with_MIMARKopen_METHOD( 'with-open',
516
+ begin
517
+ if @global_lisp_binding.has_key?('_with_MIMARKopen') then
518
+ trampCall(@_with_MIMARKopen)
519
+ else raise NameError.new( "Error: undefined variable _with_MIMARKopen", "_with_MIMARKopen" ) end
520
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:66"] + __e.backtrace ) ; raise __e
521
+ end ,
522
+ [
465
523
  begin
466
- ___lambda = lambda { |_m|
467
- if (
468
- begin
469
- trampCall(_m)
470
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:72"] + __e.backtrace ) ; raise __e
471
- end
472
- ) then
473
- begin
474
- trampCall( self._for_MIMARKeach_METHOD( 'for-each',
524
+ if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK') then
525
+ trampCall(@__ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK)
526
+ else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK", "__ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK" ) end
527
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:66"] + __e.backtrace ) ; raise __e
528
+ end ,
529
+ Proc.new { |_f|
530
+ begin
531
+ ___lambda = lambda { |_m|
532
+ if (
533
+ begin
534
+ trampCall(_m)
535
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:72"] + __e.backtrace ) ; raise __e
536
+ end
537
+ ) then
538
+ begin
475
539
  begin
476
- if @global_lisp_binding.has_key?('_for_MIMARKeach') then
477
- trampCall(@_for_MIMARKeach)
478
- else raise NameError.new( "Error: undefined variable _for_MIMARKeach", "_for_MIMARKeach" ) end
479
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:70"] + __e.backtrace ) ; raise __e
480
- end ,
481
- [
482
- Proc.new { |_i|
483
- trampCall( self._vector_MIMARKset_EXMARK_METHOD( 'vector-set!',
484
- begin
485
- if @global_lisp_binding.has_key?('_vector_MIMARKset_EXMARK') then
486
- trampCall(@_vector_MIMARKset_EXMARK)
487
- else raise NameError.new( "Error: undefined variable _vector_MIMARKset_EXMARK", "_vector_MIMARKset_EXMARK" ) end
488
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:79"] + __e.backtrace ) ; raise __e
489
- end ,
490
- [
491
- begin
492
- if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
493
- trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
494
- else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
495
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:79"] + __e.backtrace ) ; raise __e
496
- end ,
497
- begin
498
- trampCall(_i)
499
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:72"] + __e.backtrace ) ; raise __e
500
- end ,
501
- _to_MIMARKi(
502
- trampCall( self._rxmatch_MIMARKsubstring_METHOD( 'rxmatch-substring',
503
- begin
504
- if @global_lisp_binding.has_key?('_rxmatch_MIMARKsubstring') then
505
- trampCall(@_rxmatch_MIMARKsubstring)
506
- else raise NameError.new( "Error: undefined variable _rxmatch_MIMARKsubstring", "_rxmatch_MIMARKsubstring" ) end
507
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:72"] + __e.backtrace ) ; raise __e
508
- end ,
509
- [
540
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 70 );
541
+ trampCall( self._for_MIMARKeach_METHOD( 'for-each',
542
+ begin
543
+ if @global_lisp_binding.has_key?('_for_MIMARKeach') then
544
+ trampCall(@_for_MIMARKeach)
545
+ else raise NameError.new( "Error: undefined variable _for_MIMARKeach", "_for_MIMARKeach" ) end
546
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:70"] + __e.backtrace ) ; raise __e
547
+ end ,
548
+ [
549
+ Proc.new { |_i|
550
+ begin
551
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 79 );
552
+ trampCall( self._vector_MIMARKset_EXMARK_METHOD( 'vector-set!',
510
553
  begin
511
- trampCall(_m)
512
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:72"] + __e.backtrace ) ; raise __e
554
+ if @global_lisp_binding.has_key?('_vector_MIMARKset_EXMARK') then
555
+ trampCall(@_vector_MIMARKset_EXMARK)
556
+ else raise NameError.new( "Error: undefined variable _vector_MIMARKset_EXMARK", "_vector_MIMARKset_EXMARK" ) end
557
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:79"] + __e.backtrace ) ; raise __e
513
558
  end ,
514
- __PLMARK_ARGS2(
515
- begin
516
- trampCall(_i)
517
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:72"] + __e.backtrace ) ; raise __e
518
- end ,
519
- 1
520
- )
521
- ]
522
- ))
523
- )
524
- ]
525
- ))
526
- } ,
527
- Cell.new(0,Cell.new(1,Cell.new(2,Cell.new(3))))
528
- ]
529
- ))
559
+ [
560
+ begin
561
+ if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
562
+ trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
563
+ else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
564
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:79"] + __e.backtrace ) ; raise __e
565
+ end ,
566
+ begin
567
+ trampCall(_i)
568
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:72"] + __e.backtrace ) ; raise __e
569
+ end ,
570
+ begin
571
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 72 );
572
+ _to_MIMARKi(
573
+ begin
574
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 72 );
575
+ trampCall( self._rxmatch_MIMARKsubstring_METHOD( 'rxmatch-substring',
576
+ begin
577
+ if @global_lisp_binding.has_key?('_rxmatch_MIMARKsubstring') then
578
+ trampCall(@_rxmatch_MIMARKsubstring)
579
+ else raise NameError.new( "Error: undefined variable _rxmatch_MIMARKsubstring", "_rxmatch_MIMARKsubstring" ) end
580
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:72"] + __e.backtrace ) ; raise __e
581
+ end ,
582
+ [
583
+ begin
584
+ trampCall(_m)
585
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:72"] + __e.backtrace ) ; raise __e
586
+ end ,
587
+ begin
588
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 77 );
589
+ __PLMARK_ARGS2(
590
+ begin
591
+ trampCall(_i)
592
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:72"] + __e.backtrace ) ; raise __e
593
+ end ,
594
+ 1
595
+ )
596
+ end
597
+ ]
598
+ ))
599
+ end
600
+ )
601
+ end
602
+ ]
603
+ ))
604
+ end
605
+ } ,
606
+ Cell.new(0,Cell.new(1,Cell.new(2,Cell.new(3))))
607
+ ]
608
+ ))
609
+ end
610
+ end
530
611
  end
531
- end
532
- } ; ___lambda.call(
533
- trampCall( self._rxmatch_METHOD( 'rxmatch',
612
+ } ; ___lambda.call(
534
613
  begin
535
- if @global_lisp_binding.has_key?('_rxmatch') then
536
- trampCall(@_rxmatch)
537
- else raise NameError.new( "Error: undefined variable _rxmatch", "_rxmatch" ) end
538
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:68"] + __e.backtrace ) ; raise __e
539
- end ,
540
- [
541
- Regexp.new( "Total:\\s+(\\d+)\\s+tests,\\s+(\\d+)\\s+passed,\\s+(\\d+)\\s+failed,\\s+(\\d+)\\s+aborted") ,
542
- begin
543
- trampCall(_f).readline.chomp(
544
- )
545
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:68"] + __e.backtrace ) ; raise __e
546
- end
547
- ]
548
- ))
549
- )
550
- end
551
- }
552
- ]
553
- ))
614
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 68 );
615
+ trampCall( self._rxmatch_METHOD( 'rxmatch',
616
+ begin
617
+ if @global_lisp_binding.has_key?('_rxmatch') then
618
+ trampCall(@_rxmatch)
619
+ else raise NameError.new( "Error: undefined variable _rxmatch", "_rxmatch" ) end
620
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:68"] + __e.backtrace ) ; raise __e
621
+ end ,
622
+ [
623
+ Regexp.new( "Total:\\s+(\\d+)\\s+tests,\\s+(\\d+)\\s+passed,\\s+(\\d+)\\s+failed,\\s+(\\d+)\\s+aborted") ,
624
+ begin
625
+ trampCall(_f).readline.chomp(
626
+ )
627
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:68"] + __e.backtrace ) ; raise __e
628
+ end
629
+ ]
630
+ ))
631
+ end
632
+ )
633
+ end
634
+ }
635
+ ]
636
+ ))
637
+ end
554
638
  end
555
639
  end
556
640
  begin
557
641
  ___lambda = lambda { |_orig_MIMARKabort|
558
- trampCall( self._vector_MIMARKset_EXMARK_METHOD( 'vector-set!',
559
- begin
560
- if @global_lisp_binding.has_key?('_vector_MIMARKset_EXMARK') then
561
- trampCall(@_vector_MIMARKset_EXMARK)
562
- else raise NameError.new( "Error: undefined variable _vector_MIMARKset_EXMARK", "_vector_MIMARKset_EXMARK" ) end
563
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:79"] + __e.backtrace ) ; raise __e
564
- end ,
565
- [
566
- begin
567
- if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
568
- trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
569
- else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
570
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:79"] + __e.backtrace ) ; raise __e
571
- end ,
572
- 3 ,
573
- __PLMARK_ARGS2(
642
+ begin
643
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 79 );
644
+ trampCall( self._vector_MIMARKset_EXMARK_METHOD( 'vector-set!',
645
+ begin
646
+ if @global_lisp_binding.has_key?('_vector_MIMARKset_EXMARK') then
647
+ trampCall(@_vector_MIMARKset_EXMARK)
648
+ else raise NameError.new( "Error: undefined variable _vector_MIMARKset_EXMARK", "_vector_MIMARKset_EXMARK" ) end
649
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:79"] + __e.backtrace ) ; raise __e
650
+ end ,
651
+ [
574
652
  begin
575
- trampCall(_orig_MIMARKabort)
653
+ if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
654
+ trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
655
+ else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
576
656
  rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:79"] + __e.backtrace ) ; raise __e
577
657
  end ,
578
- 1
579
- )
580
- ]
581
- ))
582
- trampCall( self._write_MIMARKsummary_METHOD( 'write-summary',
583
- begin
584
- if @global_lisp_binding.has_key?('_write_MIMARKsummary') then
585
- trampCall(@_write_MIMARKsummary)
586
- else raise NameError.new( "Error: undefined variable _write_MIMARKsummary", "_write_MIMARKsummary" ) end
587
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:78"] + __e.backtrace ) ; raise __e
588
- end ,
589
- [
590
- ]
591
- ))
592
- delayCall( '_vector_MIMARKset_EXMARK', 'vector-set!',
593
- begin
594
- if @global_lisp_binding.has_key?('_vector_MIMARKset_EXMARK') then
595
- trampCall(@_vector_MIMARKset_EXMARK)
596
- else raise NameError.new( "Error: undefined variable _vector_MIMARKset_EXMARK", "_vector_MIMARKset_EXMARK" ) end
597
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:79"] + __e.backtrace ) ; raise __e
598
- end ,
599
- [
600
- begin
601
- if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
602
- trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
603
- else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
604
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:79"] + __e.backtrace ) ; raise __e
605
- end ,
606
- 3 ,
607
- begin
608
- trampCall(_orig_MIMARKabort)
609
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:79"] + __e.backtrace ) ; raise __e
610
- end
611
- ]
612
- )
613
- } ; ___lambda.call(
614
- trampCall( self._vector_MIMARKref_METHOD( 'vector-ref',
615
- begin
616
- if @global_lisp_binding.has_key?('_vector_MIMARKref') then
617
- trampCall(@_vector_MIMARKref)
618
- else raise NameError.new( "Error: undefined variable _vector_MIMARKref", "_vector_MIMARKref" ) end
619
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:76"] + __e.backtrace ) ; raise __e
620
- end ,
621
- [
658
+ 3 ,
659
+ begin
660
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 77 );
661
+ __PLMARK_ARGS2(
662
+ begin
663
+ trampCall(_orig_MIMARKabort)
664
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:79"] + __e.backtrace ) ; raise __e
665
+ end ,
666
+ 1
667
+ )
668
+ end
669
+ ]
670
+ ))
671
+ end
672
+ begin
673
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 78 );
674
+ trampCall( self._write_MIMARKsummary_METHOD( 'write-summary',
675
+ begin
676
+ if @global_lisp_binding.has_key?('_write_MIMARKsummary') then
677
+ trampCall(@_write_MIMARKsummary)
678
+ else raise NameError.new( "Error: undefined variable _write_MIMARKsummary", "_write_MIMARKsummary" ) end
679
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:78"] + __e.backtrace ) ; raise __e
680
+ end ,
681
+ [
682
+ ]
683
+ ))
684
+ end
685
+ begin
686
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 79 );
687
+ delayCall( '_vector_MIMARKset_EXMARK', 'vector-set!',
622
688
  begin
623
- if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
624
- trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
625
- else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
689
+ if @global_lisp_binding.has_key?('_vector_MIMARKset_EXMARK') then
690
+ trampCall(@_vector_MIMARKset_EXMARK)
691
+ else raise NameError.new( "Error: undefined variable _vector_MIMARKset_EXMARK", "_vector_MIMARKset_EXMARK" ) end
626
692
  rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:79"] + __e.backtrace ) ; raise __e
627
693
  end ,
628
- 3
629
- ]
630
- ))
694
+ [
695
+ begin
696
+ if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
697
+ trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
698
+ else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
699
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:79"] + __e.backtrace ) ; raise __e
700
+ end ,
701
+ 3 ,
702
+ begin
703
+ trampCall(_orig_MIMARKabort)
704
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:79"] + __e.backtrace ) ; raise __e
705
+ end
706
+ ]
707
+ )
708
+ end
709
+ } ; ___lambda.call(
710
+ begin
711
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 76 );
712
+ trampCall( self._vector_MIMARKref_METHOD( 'vector-ref',
713
+ begin
714
+ if @global_lisp_binding.has_key?('_vector_MIMARKref') then
715
+ trampCall(@_vector_MIMARKref)
716
+ else raise NameError.new( "Error: undefined variable _vector_MIMARKref", "_vector_MIMARKref" ) end
717
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:76"] + __e.backtrace ) ; raise __e
718
+ end ,
719
+ [
720
+ begin
721
+ if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKcounts_ASMARK') then
722
+ trampCall(@__ASMARKtest_MIMARKcounts_ASMARK)
723
+ else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKcounts_ASMARK", "__ASMARKtest_MIMARKcounts_ASMARK" ) end
724
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:79"] + __e.backtrace ) ; raise __e
725
+ end ,
726
+ 3
727
+ ]
728
+ ))
729
+ end
631
730
  )
632
731
  end
633
732
  }
@@ -644,51 +743,60 @@ trampCall(
644
743
  trampCall(
645
744
  Proc.new { ||
646
745
  if (
647
- _string_QUMARK(
648
- begin
649
- if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK') then
650
- trampCall(@__ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK)
651
- else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK", "__ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK" ) end
652
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:83"] + __e.backtrace ) ; raise __e
653
- end
654
- )
746
+ begin
747
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 82 );
748
+ _string_QUMARK(
749
+ begin
750
+ if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK') then
751
+ trampCall(@__ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK)
752
+ else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK", "__ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK" ) end
753
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:83"] + __e.backtrace ) ; raise __e
754
+ end
755
+ )
756
+ end
655
757
  ) then
656
758
  begin
657
- delayCall( '_with_MIMARKopen', 'with-open',
658
- begin
659
- if @global_lisp_binding.has_key?('_with_MIMARKopen') then
660
- trampCall(@_with_MIMARKopen)
661
- else raise NameError.new( "Error: undefined variable _with_MIMARKopen", "_with_MIMARKopen" ) end
662
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:83"] + __e.backtrace ) ; raise __e
663
- end ,
664
- [
665
- begin
666
- if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK') then
667
- trampCall(@__ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK)
668
- else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK", "__ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK" ) end
669
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:83"] + __e.backtrace ) ; raise __e
670
- end ,
671
- Proc.new { |_f|
759
+ begin
760
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 83 );
761
+ delayCall( '_with_MIMARKopen', 'with-open',
762
+ begin
763
+ if @global_lisp_binding.has_key?('_with_MIMARKopen') then
764
+ trampCall(@_with_MIMARKopen)
765
+ else raise NameError.new( "Error: undefined variable _with_MIMARKopen", "_with_MIMARKopen" ) end
766
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:83"] + __e.backtrace ) ; raise __e
767
+ end ,
768
+ [
672
769
  begin
673
- trampCall(_f).printf(
674
- "%s" ,
675
- trampCall( self._format_MIMARKsummary_METHOD( 'format-summary',
770
+ if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK') then
771
+ trampCall(@__ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK)
772
+ else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK", "__ASMARKtest_MIMARKrecord_MIMARKfile_ASMARK" ) end
773
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:83"] + __e.backtrace ) ; raise __e
774
+ end ,
775
+ Proc.new { |_f|
776
+ begin
777
+ trampCall(_f).printf(
778
+ "%s" ,
676
779
  begin
677
- if @global_lisp_binding.has_key?('_format_MIMARKsummary') then
678
- trampCall(@_format_MIMARKsummary)
679
- else raise NameError.new( "Error: undefined variable _format_MIMARKsummary", "_format_MIMARKsummary" ) end
680
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:85"] + __e.backtrace ) ; raise __e
681
- end ,
682
- [
683
- ]
684
- ))
685
- )
686
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:85"] + __e.backtrace ) ; raise __e
687
- end
688
- } ,
689
- "w"
690
- ]
691
- )
780
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 85 );
781
+ trampCall( self._format_MIMARKsummary_METHOD( 'format-summary',
782
+ begin
783
+ if @global_lisp_binding.has_key?('_format_MIMARKsummary') then
784
+ trampCall(@_format_MIMARKsummary)
785
+ else raise NameError.new( "Error: undefined variable _format_MIMARKsummary", "_format_MIMARKsummary" ) end
786
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:85"] + __e.backtrace ) ; raise __e
787
+ end ,
788
+ [
789
+ ]
790
+ ))
791
+ end
792
+ )
793
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:85"] + __e.backtrace ) ; raise __e
794
+ end
795
+ } ,
796
+ "w"
797
+ ]
798
+ )
799
+ end
692
800
  end
693
801
  end
694
802
  }
@@ -713,12 +821,15 @@ trampCall(
713
821
  trampCall(_msg)
714
822
  rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:101"] + __e.backtrace ) ; raise __e
715
823
  end ,
716
- _write_MIMARKto_MIMARKstring(
717
- begin
718
- trampCall(_expect)
719
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:101"] + __e.backtrace ) ; raise __e
720
- end
721
- )
824
+ begin
825
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 99 );
826
+ _write_MIMARKto_MIMARKstring(
827
+ begin
828
+ trampCall(_expect)
829
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:101"] + __e.backtrace ) ; raise __e
830
+ end
831
+ )
832
+ end
722
833
  )
723
834
  rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:99"] + __e.backtrace ) ; raise __e
724
835
  end
@@ -727,35 +838,41 @@ trampCall(
727
838
  )
728
839
  rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:103"] + __e.backtrace ) ; raise __e
729
840
  end
730
- trampCall( self._test_MIMARKcount_PLMARK_PLMARK_METHOD( 'test-count++',
731
- begin
732
- if @global_lisp_binding.has_key?('_test_MIMARKcount_PLMARK_PLMARK') then
733
- trampCall(@_test_MIMARKcount_PLMARK_PLMARK)
734
- else raise NameError.new( "Error: undefined variable _test_MIMARKcount_PLMARK_PLMARK", "_test_MIMARKcount_PLMARK_PLMARK" ) end
735
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:93"] + __e.backtrace ) ; raise __e
736
- end ,
737
- [
738
- ]
739
- ))
841
+ begin
842
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 93 );
843
+ trampCall( self._test_MIMARKcount_PLMARK_PLMARK_METHOD( 'test-count++',
844
+ begin
845
+ if @global_lisp_binding.has_key?('_test_MIMARKcount_PLMARK_PLMARK') then
846
+ trampCall(@_test_MIMARKcount_PLMARK_PLMARK)
847
+ else raise NameError.new( "Error: undefined variable _test_MIMARKcount_PLMARK_PLMARK", "_test_MIMARKcount_PLMARK_PLMARK" ) end
848
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:93"] + __e.backtrace ) ; raise __e
849
+ end ,
850
+ [
851
+ ]
852
+ ))
853
+ end
740
854
  begin
741
855
  ___lambda = lambda { |_r|
742
856
  if (
743
- trampCall( callProcedure( '_cmp', 'cmp',
744
- begin
745
- trampCall(_cmp)
746
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:95"] + __e.backtrace ) ; raise __e
747
- end ,
748
- [
749
- begin
750
- trampCall(_expect)
751
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:101"] + __e.backtrace ) ; raise __e
752
- end ,
753
- begin
754
- trampCall(_r)
755
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:101"] + __e.backtrace ) ; raise __e
756
- end
757
- ]
758
- ))
857
+ begin
858
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 95 );
859
+ trampCall( callProcedure( '_cmp', 'cmp',
860
+ begin
861
+ trampCall(_cmp)
862
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:95"] + __e.backtrace ) ; raise __e
863
+ end ,
864
+ [
865
+ begin
866
+ trampCall(_expect)
867
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:101"] + __e.backtrace ) ; raise __e
868
+ end ,
869
+ begin
870
+ trampCall(_r)
871
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:101"] + __e.backtrace ) ; raise __e
872
+ end
873
+ ]
874
+ ))
875
+ end
759
876
  ) then
760
877
  begin
761
878
  begin
@@ -765,16 +882,19 @@ trampCall(
765
882
  )
766
883
  rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:99"] + __e.backtrace ) ; raise __e
767
884
  end
768
- trampCall( self._test_MIMARKpass_PLMARK_PLMARK_METHOD( 'test-pass++',
769
- begin
770
- if @global_lisp_binding.has_key?('_test_MIMARKpass_PLMARK_PLMARK') then
771
- trampCall(@_test_MIMARKpass_PLMARK_PLMARK)
772
- else raise NameError.new( "Error: undefined variable _test_MIMARKpass_PLMARK_PLMARK", "_test_MIMARKpass_PLMARK_PLMARK" ) end
773
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:97"] + __e.backtrace ) ; raise __e
774
- end ,
775
- [
776
- ]
777
- ))
885
+ begin
886
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 97 );
887
+ trampCall( self._test_MIMARKpass_PLMARK_PLMARK_METHOD( 'test-pass++',
888
+ begin
889
+ if @global_lisp_binding.has_key?('_test_MIMARKpass_PLMARK_PLMARK') then
890
+ trampCall(@_test_MIMARKpass_PLMARK_PLMARK)
891
+ else raise NameError.new( "Error: undefined variable _test_MIMARKpass_PLMARK_PLMARK", "_test_MIMARKpass_PLMARK_PLMARK" ) end
892
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:97"] + __e.backtrace ) ; raise __e
893
+ end ,
894
+ [
895
+ ]
896
+ ))
897
+ end
778
898
  end
779
899
  else
780
900
  if (
@@ -785,12 +905,15 @@ trampCall(
785
905
  trampCall(_f).printf(
786
906
  "ERROR: GOT %s
787
907
  " ,
788
- _write_MIMARKto_MIMARKstring(
789
- begin
790
- trampCall(_r)
791
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:101"] + __e.backtrace ) ; raise __e
792
- end
793
- )
908
+ begin
909
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 99 );
910
+ _write_MIMARKto_MIMARKstring(
911
+ begin
912
+ trampCall(_r)
913
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:101"] + __e.backtrace ) ; raise __e
914
+ end
915
+ )
916
+ end
794
917
  )
795
918
  rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:99"] + __e.backtrace ) ; raise __e
796
919
  end
@@ -799,48 +922,57 @@ trampCall(
799
922
  @global_lisp_binding['__ASMARKdiscrepancy_MIMARKlist_ASMARK'] = self.method( :__ASMARKdiscrepancy_MIMARKlist_ASMARK_METHOD )
800
923
  @__ASMARKdiscrepancy_MIMARKlist_ASMARK =
801
924
  trampCall(
802
- _cons(
803
- trampCall( self._list_METHOD( 'list',
925
+ begin
926
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 101 );
927
+ _cons(
804
928
  begin
805
- if @global_lisp_binding.has_key?('_list') then
806
- trampCall(@_list)
807
- else raise NameError.new( "Error: undefined variable _list", "_list" ) end
808
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:101"] + __e.backtrace ) ; raise __e
929
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 101 );
930
+ trampCall( self._list_METHOD( 'list',
931
+ begin
932
+ if @global_lisp_binding.has_key?('_list') then
933
+ trampCall(@_list)
934
+ else raise NameError.new( "Error: undefined variable _list", "_list" ) end
935
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:101"] + __e.backtrace ) ; raise __e
936
+ end ,
937
+ [
938
+ begin
939
+ trampCall(_msg)
940
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:101"] + __e.backtrace ) ; raise __e
941
+ end ,
942
+ begin
943
+ trampCall(_expect)
944
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:101"] + __e.backtrace ) ; raise __e
945
+ end ,
946
+ begin
947
+ trampCall(_r)
948
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:101"] + __e.backtrace ) ; raise __e
949
+ end
950
+ ]
951
+ ))
809
952
  end ,
810
- [
811
- begin
812
- trampCall(_msg)
813
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:101"] + __e.backtrace ) ; raise __e
814
- end ,
815
- begin
816
- trampCall(_expect)
817
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:101"] + __e.backtrace ) ; raise __e
818
- end ,
819
- begin
820
- trampCall(_r)
821
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:101"] + __e.backtrace ) ; raise __e
822
- end
823
- ]
824
- )) ,
825
- begin
826
- if @global_lisp_binding.has_key?('__ASMARKdiscrepancy_MIMARKlist_ASMARK') then
827
- trampCall(@__ASMARKdiscrepancy_MIMARKlist_ASMARK)
828
- else raise NameError.new( "Error: undefined variable __ASMARKdiscrepancy_MIMARKlist_ASMARK", "__ASMARKdiscrepancy_MIMARKlist_ASMARK" ) end
829
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:101"] + __e.backtrace ) ; raise __e
830
- end
831
- )
953
+ begin
954
+ if @global_lisp_binding.has_key?('__ASMARKdiscrepancy_MIMARKlist_ASMARK') then
955
+ trampCall(@__ASMARKdiscrepancy_MIMARKlist_ASMARK)
956
+ else raise NameError.new( "Error: undefined variable __ASMARKdiscrepancy_MIMARKlist_ASMARK", "__ASMARKdiscrepancy_MIMARKlist_ASMARK" ) end
957
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:101"] + __e.backtrace ) ; raise __e
958
+ end
959
+ )
960
+ end
832
961
  )
833
962
  end
834
- trampCall( self._test_MIMARKfail_PLMARK_PLMARK_METHOD( 'test-fail++',
835
- begin
836
- if @global_lisp_binding.has_key?('_test_MIMARKfail_PLMARK_PLMARK') then
837
- trampCall(@_test_MIMARKfail_PLMARK_PLMARK)
838
- else raise NameError.new( "Error: undefined variable _test_MIMARKfail_PLMARK_PLMARK", "_test_MIMARKfail_PLMARK_PLMARK" ) end
839
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:102"] + __e.backtrace ) ; raise __e
840
- end ,
841
- [
842
- ]
843
- ))
963
+ begin
964
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 102 );
965
+ trampCall( self._test_MIMARKfail_PLMARK_PLMARK_METHOD( 'test-fail++',
966
+ begin
967
+ if @global_lisp_binding.has_key?('_test_MIMARKfail_PLMARK_PLMARK') then
968
+ trampCall(@_test_MIMARKfail_PLMARK_PLMARK)
969
+ else raise NameError.new( "Error: undefined variable _test_MIMARKfail_PLMARK_PLMARK", "_test_MIMARKfail_PLMARK_PLMARK" ) end
970
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:102"] + __e.backtrace ) ; raise __e
971
+ end ,
972
+ [
973
+ ]
974
+ ))
975
+ end
844
976
  end
845
977
  else
846
978
  Cell.new()
@@ -853,26 +985,32 @@ trampCall(
853
985
  end
854
986
  true
855
987
  } ; ___lambda.call(
856
- trampCall( callProcedure( '_thunk', 'thunk',
857
- begin
858
- trampCall(_thunk)
859
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:94"] + __e.backtrace ) ; raise __e
860
- end ,
861
- [
862
- ]
863
- ))
988
+ begin
989
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 94 );
990
+ trampCall( callProcedure( '_thunk', 'thunk',
991
+ begin
992
+ trampCall(_thunk)
993
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:94"] + __e.backtrace ) ; raise __e
994
+ end ,
995
+ [
996
+ ]
997
+ ))
998
+ end
864
999
  )
865
1000
  end
866
1001
  } ; ___lambda.call(
867
1002
  begin
868
- ___lambda = lambda { |___gensym__da296d116d489ba951dcd8991bd44f36a977a621_20004|
1003
+ ___lambda = lambda { |___gensym__da296d116d489ba951dcd8991bd44f36a977a621_30009|
869
1004
  if (
870
- _null_QUMARK(
871
- begin
872
- trampCall(___gensym__da296d116d489ba951dcd8991bd44f36a977a621_20004)
873
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
874
- end
875
- )
1005
+ begin
1006
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 143 );
1007
+ _null_QUMARK(
1008
+ begin
1009
+ trampCall(___gensym__da296d116d489ba951dcd8991bd44f36a977a621_30009)
1010
+ rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1011
+ end
1012
+ )
1013
+ end
876
1014
  ) then
877
1015
  begin
878
1016
  if @global_lisp_binding.has_key?('_equal_QUMARK') then
@@ -881,20 +1019,23 @@ trampCall(
881
1019
  rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:89"] + __e.backtrace ) ; raise __e
882
1020
  end
883
1021
  else
884
- delayCall( '_car', 'car',
885
- begin
886
- if @global_lisp_binding.has_key?('_car') then
887
- trampCall(@_car)
888
- else raise NameError.new( "Error: undefined variable _car", "_car" ) end
889
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
890
- end ,
891
- [
892
- begin
893
- trampCall(___gensym__da296d116d489ba951dcd8991bd44f36a977a621_20004)
894
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
895
- end
896
- ]
897
- )
1022
+ begin
1023
+ embedBacktraceInfo( "./lib/nendo/experimental.nnd", 73 );
1024
+ delayCall( '_car', 'car',
1025
+ begin
1026
+ if @global_lisp_binding.has_key?('_car') then
1027
+ trampCall(@_car)
1028
+ else raise NameError.new( "Error: undefined variable _car", "_car" ) end
1029
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/experimental.nnd:73"] + __e.backtrace ) ; raise __e
1030
+ end ,
1031
+ [
1032
+ begin
1033
+ trampCall(___gensym__da296d116d489ba951dcd8991bd44f36a977a621_30009)
1034
+ rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1035
+ end
1036
+ ]
1037
+ )
1038
+ end
898
1039
  end
899
1040
  } ; ___lambda.call(
900
1041
  begin
@@ -924,40 +1065,61 @@ trampCall(
924
1065
  @_test_ASMARK =
925
1066
  trampCall(
926
1067
  LispMacro.new { |_msg,_expect,_form,*__rest__| _compare = __rest__[0] ;
927
- _cons(
928
- :"test" ,
1068
+ begin
1069
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 101 );
929
1070
  _cons(
1071
+ :"test" ,
930
1072
  begin
931
- trampCall(_msg)
932
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:109"] + __e.backtrace ) ; raise __e
933
- end ,
934
- _cons(
935
- begin
936
- trampCall(_expect)
937
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:109"] + __e.backtrace ) ; raise __e
938
- end ,
1073
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 101 );
939
1074
  _cons(
940
- _cons(
941
- :"lambda" ,
942
- _cons(
943
- Cell.new() ,
944
- _cons(
945
- begin
946
- trampCall(_form)
947
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:109"] + __e.backtrace ) ; raise __e
948
- end ,
949
- Cell.new()
950
- )
951
- )
952
- ) ,
953
1075
  begin
954
- trampCall(_compare)
1076
+ trampCall(_msg)
955
1077
  rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:109"] + __e.backtrace ) ; raise __e
1078
+ end ,
1079
+ begin
1080
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 101 );
1081
+ _cons(
1082
+ begin
1083
+ trampCall(_expect)
1084
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:109"] + __e.backtrace ) ; raise __e
1085
+ end ,
1086
+ begin
1087
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 101 );
1088
+ _cons(
1089
+ begin
1090
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 101 );
1091
+ _cons(
1092
+ :"lambda" ,
1093
+ begin
1094
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 101 );
1095
+ _cons(
1096
+ Cell.new() ,
1097
+ begin
1098
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 101 );
1099
+ _cons(
1100
+ begin
1101
+ trampCall(_form)
1102
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:109"] + __e.backtrace ) ; raise __e
1103
+ end ,
1104
+ Cell.new()
1105
+ )
1106
+ end
1107
+ )
1108
+ end
1109
+ )
1110
+ end ,
1111
+ begin
1112
+ trampCall(_compare)
1113
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:109"] + __e.backtrace ) ; raise __e
1114
+ end
1115
+ )
1116
+ end
1117
+ )
956
1118
  end
957
1119
  )
958
- )
1120
+ end
959
1121
  )
960
- )
1122
+ end
961
1123
  }
962
1124
  )
963
1125
  end
@@ -970,47 +1132,56 @@ trampCall(
970
1132
  @global_lisp_binding['_make_MIMARKpadding_MIMARKstring'] = self.method( :_make_MIMARKpadding_MIMARKstring_METHOD )
971
1133
  @_make_MIMARKpadding_MIMARKstring =
972
1134
  trampCall(
973
- Proc.new { |_num,_char|
974
- delayCall( '_string_MIMARKjoin', 'string-join',
975
- begin
976
- if @global_lisp_binding.has_key?('_string_MIMARKjoin') then
977
- trampCall(@_string_MIMARKjoin)
978
- else raise NameError.new( "Error: undefined variable _string_MIMARKjoin", "_string_MIMARKjoin" ) end
979
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:114"] + __e.backtrace ) ; raise __e
980
- end ,
981
- [
982
- trampCall( self._map_METHOD( 'map',
1135
+ Proc.new { |_num,_char|
1136
+ begin
1137
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 114 );
1138
+ delayCall( '_string_MIMARKjoin', 'string-join',
1139
+ begin
1140
+ if @global_lisp_binding.has_key?('_string_MIMARKjoin') then
1141
+ trampCall(@_string_MIMARKjoin)
1142
+ else raise NameError.new( "Error: undefined variable _string_MIMARKjoin", "_string_MIMARKjoin" ) end
1143
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:114"] + __e.backtrace ) ; raise __e
1144
+ end ,
1145
+ [
983
1146
  begin
984
- if @global_lisp_binding.has_key?('_map') then
985
- trampCall(@_map)
986
- else raise NameError.new( "Error: undefined variable _map", "_map" ) end
987
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:115"] + __e.backtrace ) ; raise __e
988
- end ,
989
- [
990
- Proc.new { |_x|
991
- begin
992
- trampCall(_char)
993
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:116"] + __e.backtrace ) ; raise __e
994
- end
995
- } ,
996
- trampCall( self._range_METHOD( 'range',
997
- begin
998
- if @global_lisp_binding.has_key?('_range') then
999
- trampCall(@_range)
1000
- else raise NameError.new( "Error: undefined variable _range", "_range" ) end
1001
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:117"] + __e.backtrace ) ; raise __e
1002
- end ,
1003
- [
1147
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 115 );
1148
+ trampCall( self._map_METHOD( 'map',
1004
1149
  begin
1005
- trampCall(_num)
1006
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:117"] + __e.backtrace ) ; raise __e
1007
- end
1008
- ]
1009
- ))
1010
- ]
1011
- ))
1012
- ]
1013
- )
1150
+ if @global_lisp_binding.has_key?('_map') then
1151
+ trampCall(@_map)
1152
+ else raise NameError.new( "Error: undefined variable _map", "_map" ) end
1153
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:115"] + __e.backtrace ) ; raise __e
1154
+ end ,
1155
+ [
1156
+ Proc.new { |_x|
1157
+ begin
1158
+ trampCall(_char)
1159
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:116"] + __e.backtrace ) ; raise __e
1160
+ end
1161
+ } ,
1162
+ begin
1163
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 117 );
1164
+ trampCall( self._range_METHOD( 'range',
1165
+ begin
1166
+ if @global_lisp_binding.has_key?('_range') then
1167
+ trampCall(@_range)
1168
+ else raise NameError.new( "Error: undefined variable _range", "_range" ) end
1169
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:117"] + __e.backtrace ) ; raise __e
1170
+ end ,
1171
+ [
1172
+ begin
1173
+ trampCall(_num)
1174
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:117"] + __e.backtrace ) ; raise __e
1175
+ end
1176
+ ]
1177
+ ))
1178
+ end
1179
+ ]
1180
+ ))
1181
+ end
1182
+ ]
1183
+ )
1184
+ end
1014
1185
  }
1015
1186
  )
1016
1187
  end
@@ -1034,35 +1205,44 @@ trampCall(
1034
1205
  trampCall(_msg)
1035
1206
  rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:123"] + __e.backtrace ) ; raise __e
1036
1207
  end ,
1037
- trampCall( self._make_MIMARKpadding_MIMARKstring_METHOD( 'make-padding-string',
1038
- begin
1039
- if @global_lisp_binding.has_key?('_make_MIMARKpadding_MIMARKstring') then
1040
- trampCall(@_make_MIMARKpadding_MIMARKstring)
1041
- else raise NameError.new( "Error: undefined variable _make_MIMARKpadding_MIMARKstring", "_make_MIMARKpadding_MIMARKstring" ) end
1042
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:122"] + __e.backtrace ) ; raise __e
1043
- end ,
1044
- [
1045
- trampCall( self._max_METHOD( 'max',
1208
+ begin
1209
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 122 );
1210
+ trampCall( self._make_MIMARKpadding_MIMARKstring_METHOD( 'make-padding-string',
1211
+ begin
1212
+ if @global_lisp_binding.has_key?('_make_MIMARKpadding_MIMARKstring') then
1213
+ trampCall(@_make_MIMARKpadding_MIMARKstring)
1214
+ else raise NameError.new( "Error: undefined variable _make_MIMARKpadding_MIMARKstring", "_make_MIMARKpadding_MIMARKstring" ) end
1215
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:122"] + __e.backtrace ) ; raise __e
1216
+ end ,
1217
+ [
1046
1218
  begin
1047
- if @global_lisp_binding.has_key?('_max') then
1048
- trampCall(@_max)
1049
- else raise NameError.new( "Error: undefined variable _max", "_max" ) end
1050
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:122"] + __e.backtrace ) ; raise __e
1219
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 122 );
1220
+ trampCall( self._max_METHOD( 'max',
1221
+ begin
1222
+ if @global_lisp_binding.has_key?('_max') then
1223
+ trampCall(@_max)
1224
+ else raise NameError.new( "Error: undefined variable _max", "_max" ) end
1225
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:122"] + __e.backtrace ) ; raise __e
1226
+ end ,
1227
+ [
1228
+ 5 ,
1229
+ begin
1230
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 122 );
1231
+ __MIMARK_ARGS2(
1232
+ 77 ,
1233
+ begin
1234
+ trampCall(_msglen)
1235
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:122"] + __e.backtrace ) ; raise __e
1236
+ end
1237
+ )
1238
+ end
1239
+ ]
1240
+ ))
1051
1241
  end ,
1052
- [
1053
- 5 ,
1054
- __MIMARK_ARGS2(
1055
- 77 ,
1056
- begin
1057
- trampCall(_msglen)
1058
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:122"] + __e.backtrace ) ; raise __e
1059
- end
1060
- )
1061
- ]
1062
- )) ,
1063
- "-"
1064
- ]
1065
- ))
1242
+ "-"
1243
+ ]
1244
+ ))
1245
+ end
1066
1246
  )
1067
1247
  rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:122"] + __e.backtrace ) ; raise __e
1068
1248
  end
@@ -1077,20 +1257,23 @@ trampCall(
1077
1257
  else raise NameError.new( "Error: undefined variable __ASMARKtest_MIMARKoutput_MIMARKfile_ASMARK", "__ASMARKtest_MIMARKoutput_MIMARKfile_ASMARK" ) end
1078
1258
  rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:120"] + __e.backtrace ) ; raise __e
1079
1259
  end ,
1080
- trampCall( self._string_MIMARKlength_METHOD( 'string-length',
1081
- begin
1082
- if @global_lisp_binding.has_key?('_string_MIMARKlength') then
1083
- trampCall(@_string_MIMARKlength)
1084
- else raise NameError.new( "Error: undefined variable _string_MIMARKlength", "_string_MIMARKlength" ) end
1085
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:121"] + __e.backtrace ) ; raise __e
1086
- end ,
1087
- [
1088
- begin
1089
- trampCall(_msg)
1090
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:123"] + __e.backtrace ) ; raise __e
1091
- end
1092
- ]
1093
- ))
1260
+ begin
1261
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 121 );
1262
+ trampCall( self._string_MIMARKlength_METHOD( 'string-length',
1263
+ begin
1264
+ if @global_lisp_binding.has_key?('_string_MIMARKlength') then
1265
+ trampCall(@_string_MIMARKlength)
1266
+ else raise NameError.new( "Error: undefined variable _string_MIMARKlength", "_string_MIMARKlength" ) end
1267
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:121"] + __e.backtrace ) ; raise __e
1268
+ end ,
1269
+ [
1270
+ begin
1271
+ trampCall(_msg)
1272
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:123"] + __e.backtrace ) ; raise __e
1273
+ end
1274
+ ]
1275
+ ))
1276
+ end
1094
1277
  )
1095
1278
  end
1096
1279
  }
@@ -1131,16 +1314,19 @@ trampCall(
1131
1314
  )
1132
1315
  rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:137"] + __e.backtrace ) ; raise __e
1133
1316
  end
1134
- trampCall( self._read_MIMARKsummary_METHOD( 'read-summary',
1135
- begin
1136
- if @global_lisp_binding.has_key?('_read_MIMARKsummary') then
1137
- trampCall(@_read_MIMARKsummary)
1138
- else raise NameError.new( "Error: undefined variable _read_MIMARKsummary", "_read_MIMARKsummary" ) end
1139
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:131"] + __e.backtrace ) ; raise __e
1140
- end ,
1141
- [
1142
- ]
1143
- ))
1317
+ begin
1318
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 131 );
1319
+ trampCall( self._read_MIMARKsummary_METHOD( 'read-summary',
1320
+ begin
1321
+ if @global_lisp_binding.has_key?('_read_MIMARKsummary') then
1322
+ trampCall(@_read_MIMARKsummary)
1323
+ else raise NameError.new( "Error: undefined variable _read_MIMARKsummary", "_read_MIMARKsummary" ) end
1324
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:131"] + __e.backtrace ) ; raise __e
1325
+ end ,
1326
+ [
1327
+ ]
1328
+ ))
1329
+ end
1144
1330
  begin
1145
1331
  trampCall(_f).printf(
1146
1332
  "
@@ -1166,35 +1352,44 @@ trampCall(
1166
1352
  trampCall(_msg)
1167
1353
  rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:138"] + __e.backtrace ) ; raise __e
1168
1354
  end ,
1169
- trampCall( self._make_MIMARKpadding_MIMARKstring_METHOD( 'make-padding-string',
1170
- begin
1171
- if @global_lisp_binding.has_key?('_make_MIMARKpadding_MIMARKstring') then
1172
- trampCall(@_make_MIMARKpadding_MIMARKstring)
1173
- else raise NameError.new( "Error: undefined variable _make_MIMARKpadding_MIMARKstring", "_make_MIMARKpadding_MIMARKstring" ) end
1174
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:136"] + __e.backtrace ) ; raise __e
1175
- end ,
1176
- [
1177
- trampCall( self._max_METHOD( 'max',
1355
+ begin
1356
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 136 );
1357
+ trampCall( self._make_MIMARKpadding_MIMARKstring_METHOD( 'make-padding-string',
1358
+ begin
1359
+ if @global_lisp_binding.has_key?('_make_MIMARKpadding_MIMARKstring') then
1360
+ trampCall(@_make_MIMARKpadding_MIMARKstring)
1361
+ else raise NameError.new( "Error: undefined variable _make_MIMARKpadding_MIMARKstring", "_make_MIMARKpadding_MIMARKstring" ) end
1362
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:136"] + __e.backtrace ) ; raise __e
1363
+ end ,
1364
+ [
1178
1365
  begin
1179
- if @global_lisp_binding.has_key?('_max') then
1180
- trampCall(@_max)
1181
- else raise NameError.new( "Error: undefined variable _max", "_max" ) end
1182
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:136"] + __e.backtrace ) ; raise __e
1366
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 136 );
1367
+ trampCall( self._max_METHOD( 'max',
1368
+ begin
1369
+ if @global_lisp_binding.has_key?('_max') then
1370
+ trampCall(@_max)
1371
+ else raise NameError.new( "Error: undefined variable _max", "_max" ) end
1372
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:136"] + __e.backtrace ) ; raise __e
1373
+ end ,
1374
+ [
1375
+ 5 ,
1376
+ begin
1377
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 136 );
1378
+ __MIMARK_ARGS2(
1379
+ 70 ,
1380
+ begin
1381
+ trampCall(_msglen)
1382
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:136"] + __e.backtrace ) ; raise __e
1383
+ end
1384
+ )
1385
+ end
1386
+ ]
1387
+ ))
1183
1388
  end ,
1184
- [
1185
- 5 ,
1186
- __MIMARK_ARGS2(
1187
- 70 ,
1188
- begin
1189
- trampCall(_msglen)
1190
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:136"] + __e.backtrace ) ; raise __e
1191
- end
1192
- )
1193
- ]
1194
- )) ,
1195
- "-"
1196
- ]
1197
- ))
1389
+ "-"
1390
+ ]
1391
+ ))
1392
+ end
1198
1393
  )
1199
1394
  rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:136"] + __e.backtrace ) ; raise __e
1200
1395
  end
@@ -1204,20 +1399,23 @@ trampCall(
1204
1399
  rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:137"] + __e.backtrace ) ; raise __e
1205
1400
  end
1206
1401
  } ; ___lambda.call(
1207
- trampCall( self._string_MIMARKlength_METHOD( 'string-length',
1208
- begin
1209
- if @global_lisp_binding.has_key?('_string_MIMARKlength') then
1210
- trampCall(@_string_MIMARKlength)
1211
- else raise NameError.new( "Error: undefined variable _string_MIMARKlength", "_string_MIMARKlength" ) end
1212
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:135"] + __e.backtrace ) ; raise __e
1213
- end ,
1214
- [
1215
- begin
1216
- trampCall(_msg)
1217
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:138"] + __e.backtrace ) ; raise __e
1218
- end
1219
- ]
1220
- ))
1402
+ begin
1403
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 135 );
1404
+ trampCall( self._string_MIMARKlength_METHOD( 'string-length',
1405
+ begin
1406
+ if @global_lisp_binding.has_key?('_string_MIMARKlength') then
1407
+ trampCall(@_string_MIMARKlength)
1408
+ else raise NameError.new( "Error: undefined variable _string_MIMARKlength", "_string_MIMARKlength" ) end
1409
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:135"] + __e.backtrace ) ; raise __e
1410
+ end ,
1411
+ [
1412
+ begin
1413
+ trampCall(_msg)
1414
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:138"] + __e.backtrace ) ; raise __e
1415
+ end
1416
+ ]
1417
+ ))
1418
+ end
1221
1419
  )
1222
1420
  end
1223
1421
  begin
@@ -1234,63 +1432,78 @@ trampCall(
1234
1432
  )
1235
1433
  end
1236
1434
  } ; ___lambda.call(
1237
- trampCall( self._make_MIMARKpadding_MIMARKstring_METHOD( 'make-padding-string',
1238
- begin
1239
- if @global_lisp_binding.has_key?('_make_MIMARKpadding_MIMARKstring') then
1240
- trampCall(@_make_MIMARKpadding_MIMARKstring)
1241
- else raise NameError.new( "Error: undefined variable _make_MIMARKpadding_MIMARKstring", "_make_MIMARKpadding_MIMARKstring" ) end
1242
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:136"] + __e.backtrace ) ; raise __e
1243
- end ,
1244
- [
1245
- trampCall( self._max_METHOD( 'max',
1435
+ begin
1436
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 136 );
1437
+ trampCall( self._make_MIMARKpadding_MIMARKstring_METHOD( 'make-padding-string',
1438
+ begin
1439
+ if @global_lisp_binding.has_key?('_make_MIMARKpadding_MIMARKstring') then
1440
+ trampCall(@_make_MIMARKpadding_MIMARKstring)
1441
+ else raise NameError.new( "Error: undefined variable _make_MIMARKpadding_MIMARKstring", "_make_MIMARKpadding_MIMARKstring" ) end
1442
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:136"] + __e.backtrace ) ; raise __e
1443
+ end ,
1444
+ [
1246
1445
  begin
1247
- if @global_lisp_binding.has_key?('_max') then
1248
- trampCall(@_max)
1249
- else raise NameError.new( "Error: undefined variable _max", "_max" ) end
1250
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:136"] + __e.backtrace ) ; raise __e
1251
- end ,
1252
- [
1253
- 3 ,
1254
- __MIMARK_ARGS2(
1255
- 65 ,
1256
- trampCall( self._string_MIMARKlength_METHOD( 'string-length',
1446
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 136 );
1447
+ trampCall( self._max_METHOD( 'max',
1448
+ begin
1449
+ if @global_lisp_binding.has_key?('_max') then
1450
+ trampCall(@_max)
1451
+ else raise NameError.new( "Error: undefined variable _max", "_max" ) end
1452
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:136"] + __e.backtrace ) ; raise __e
1453
+ end ,
1454
+ [
1455
+ 3 ,
1257
1456
  begin
1258
- if @global_lisp_binding.has_key?('_string_MIMARKlength') then
1259
- trampCall(@_string_MIMARKlength)
1260
- else raise NameError.new( "Error: undefined variable _string_MIMARKlength", "_string_MIMARKlength" ) end
1261
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:135"] + __e.backtrace ) ; raise __e
1262
- end ,
1263
- [
1264
- begin
1265
- trampCall(_s)
1266
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:129"] + __e.backtrace ) ; raise __e
1267
- end
1268
- ]
1269
- ))
1270
- )
1271
- ]
1272
- )) ,
1273
- " "
1274
- ]
1275
- ))
1457
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 136 );
1458
+ __MIMARK_ARGS2(
1459
+ 65 ,
1460
+ begin
1461
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 135 );
1462
+ trampCall( self._string_MIMARKlength_METHOD( 'string-length',
1463
+ begin
1464
+ if @global_lisp_binding.has_key?('_string_MIMARKlength') then
1465
+ trampCall(@_string_MIMARKlength)
1466
+ else raise NameError.new( "Error: undefined variable _string_MIMARKlength", "_string_MIMARKlength" ) end
1467
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:135"] + __e.backtrace ) ; raise __e
1468
+ end ,
1469
+ [
1470
+ begin
1471
+ trampCall(_s)
1472
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:129"] + __e.backtrace ) ; raise __e
1473
+ end
1474
+ ]
1475
+ ))
1476
+ end
1477
+ )
1478
+ end
1479
+ ]
1480
+ ))
1481
+ end ,
1482
+ " "
1483
+ ]
1484
+ ))
1485
+ end
1276
1486
  )
1277
1487
  end
1278
1488
  } ; ___lambda.call(
1279
- trampCall( self._sprintf_METHOD( 'sprintf',
1280
- begin
1281
- if @global_lisp_binding.has_key?('_sprintf') then
1282
- trampCall(@_sprintf)
1283
- else raise NameError.new( "Error: undefined variable _sprintf", "_sprintf" ) end
1284
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:126"] + __e.backtrace ) ; raise __e
1285
- end ,
1286
- [
1287
- "Testing %s ... " ,
1288
- begin
1289
- trampCall(_msg)
1290
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:138"] + __e.backtrace ) ; raise __e
1291
- end
1292
- ]
1293
- ))
1489
+ begin
1490
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 126 );
1491
+ trampCall( self._sprintf_METHOD( 'sprintf',
1492
+ begin
1493
+ if @global_lisp_binding.has_key?('_sprintf') then
1494
+ trampCall(@_sprintf)
1495
+ else raise NameError.new( "Error: undefined variable _sprintf", "_sprintf" ) end
1496
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:126"] + __e.backtrace ) ; raise __e
1497
+ end ,
1498
+ [
1499
+ "Testing %s ... " ,
1500
+ begin
1501
+ trampCall(_msg)
1502
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:138"] + __e.backtrace ) ; raise __e
1503
+ end
1504
+ ]
1505
+ ))
1506
+ end
1294
1507
  )
1295
1508
  end
1296
1509
  }
@@ -1309,14 +1522,17 @@ trampCall(
1309
1522
  begin
1310
1523
  ___lambda = lambda { |_f|
1311
1524
  if (
1312
- _null_QUMARK(
1313
- begin
1314
- if @global_lisp_binding.has_key?('__ASMARKdiscrepancy_MIMARKlist_ASMARK') then
1315
- trampCall(@__ASMARKdiscrepancy_MIMARKlist_ASMARK)
1316
- else raise NameError.new( "Error: undefined variable __ASMARKdiscrepancy_MIMARKlist_ASMARK", "__ASMARKdiscrepancy_MIMARKlist_ASMARK" ) end
1317
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:158"] + __e.backtrace ) ; raise __e
1318
- end
1319
- )
1525
+ begin
1526
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 143 );
1527
+ _null_QUMARK(
1528
+ begin
1529
+ if @global_lisp_binding.has_key?('__ASMARKdiscrepancy_MIMARKlist_ASMARK') then
1530
+ trampCall(@__ASMARKdiscrepancy_MIMARKlist_ASMARK)
1531
+ else raise NameError.new( "Error: undefined variable __ASMARKdiscrepancy_MIMARKlist_ASMARK", "__ASMARKdiscrepancy_MIMARKlist_ASMARK" ) end
1532
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:158"] + __e.backtrace ) ; raise __e
1533
+ end
1534
+ )
1535
+ end
1320
1536
  ) then
1321
1537
  begin
1322
1538
  trampCall(_f).printf(
@@ -1335,79 +1551,100 @@ discrepancies found. Errors are:
1335
1551
  )
1336
1552
  rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:148"] + __e.backtrace ) ; raise __e
1337
1553
  end
1338
- trampCall( self._for_MIMARKeach_METHOD( 'for-each',
1339
- begin
1340
- if @global_lisp_binding.has_key?('_for_MIMARKeach') then
1341
- trampCall(@_for_MIMARKeach)
1342
- else raise NameError.new( "Error: undefined variable _for_MIMARKeach", "_for_MIMARKeach" ) end
1343
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:147"] + __e.backtrace ) ; raise __e
1344
- end ,
1345
- [
1346
- Proc.new { |_r|
1347
- begin
1348
- trampCall(_f).printf(
1349
- "test %s: expects %s => got %s
1350
- " ,
1351
- trampCall( self._first_METHOD( 'first',
1554
+ begin
1555
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 147 );
1556
+ trampCall( self._for_MIMARKeach_METHOD( 'for-each',
1557
+ begin
1558
+ if @global_lisp_binding.has_key?('_for_MIMARKeach') then
1559
+ trampCall(@_for_MIMARKeach)
1560
+ else raise NameError.new( "Error: undefined variable _for_MIMARKeach", "_for_MIMARKeach" ) end
1561
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:147"] + __e.backtrace ) ; raise __e
1562
+ end ,
1563
+ [
1564
+ Proc.new { |_r|
1565
+ begin
1566
+ trampCall(_f).printf(
1567
+ "test %s: expects %s => got %s
1568
+ " ,
1569
+ begin
1570
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 149 );
1571
+ trampCall( self._first_METHOD( 'first',
1572
+ begin
1573
+ if @global_lisp_binding.has_key?('_first') then
1574
+ trampCall(@_first)
1575
+ else raise NameError.new( "Error: undefined variable _first", "_first" ) end
1576
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:149"] + __e.backtrace ) ; raise __e
1577
+ end ,
1578
+ [
1579
+ begin
1580
+ trampCall(_r)
1581
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:151"] + __e.backtrace ) ; raise __e
1582
+ end
1583
+ ]
1584
+ ))
1585
+ end ,
1352
1586
  begin
1353
- if @global_lisp_binding.has_key?('_first') then
1354
- trampCall(@_first)
1355
- else raise NameError.new( "Error: undefined variable _first", "_first" ) end
1356
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:149"] + __e.backtrace ) ; raise __e
1587
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 151 );
1588
+ _write_MIMARKto_MIMARKstring(
1589
+ begin
1590
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 150 );
1591
+ trampCall( self._second_METHOD( 'second',
1592
+ begin
1593
+ if @global_lisp_binding.has_key?('_second') then
1594
+ trampCall(@_second)
1595
+ else raise NameError.new( "Error: undefined variable _second", "_second" ) end
1596
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:150"] + __e.backtrace ) ; raise __e
1597
+ end ,
1598
+ [
1599
+ begin
1600
+ trampCall(_r)
1601
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:151"] + __e.backtrace ) ; raise __e
1602
+ end
1603
+ ]
1604
+ ))
1605
+ end
1606
+ )
1357
1607
  end ,
1358
- [
1359
- begin
1360
- trampCall(_r)
1361
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:151"] + __e.backtrace ) ; raise __e
1362
- end
1363
- ]
1364
- )) ,
1365
- _write_MIMARKto_MIMARKstring(
1366
- trampCall( self._second_METHOD( 'second',
1367
- begin
1368
- if @global_lisp_binding.has_key?('_second') then
1369
- trampCall(@_second)
1370
- else raise NameError.new( "Error: undefined variable _second", "_second" ) end
1371
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:150"] + __e.backtrace ) ; raise __e
1372
- end ,
1373
- [
1374
- begin
1375
- trampCall(_r)
1376
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:151"] + __e.backtrace ) ; raise __e
1377
- end
1378
- ]
1379
- ))
1380
- ) ,
1381
- _write_MIMARKto_MIMARKstring(
1382
- trampCall( self._third_METHOD( 'third',
1383
- begin
1384
- if @global_lisp_binding.has_key?('_third') then
1385
- trampCall(@_third)
1386
- else raise NameError.new( "Error: undefined variable _third", "_third" ) end
1387
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:151"] + __e.backtrace ) ; raise __e
1388
- end ,
1389
- [
1390
- begin
1391
- trampCall(_r)
1392
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:151"] + __e.backtrace ) ; raise __e
1393
- end
1394
- ]
1395
- ))
1608
+ begin
1609
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 151 );
1610
+ _write_MIMARKto_MIMARKstring(
1611
+ begin
1612
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 151 );
1613
+ trampCall( self._third_METHOD( 'third',
1614
+ begin
1615
+ if @global_lisp_binding.has_key?('_third') then
1616
+ trampCall(@_third)
1617
+ else raise NameError.new( "Error: undefined variable _third", "_third" ) end
1618
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:151"] + __e.backtrace ) ; raise __e
1619
+ end ,
1620
+ [
1621
+ begin
1622
+ trampCall(_r)
1623
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:151"] + __e.backtrace ) ; raise __e
1624
+ end
1625
+ ]
1626
+ ))
1627
+ end
1628
+ )
1629
+ end
1396
1630
  )
1397
- )
1398
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:148"] + __e.backtrace ) ; raise __e
1399
- end
1400
- } ,
1401
- _reverse(
1631
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:148"] + __e.backtrace ) ; raise __e
1632
+ end
1633
+ } ,
1402
1634
  begin
1403
- if @global_lisp_binding.has_key?('__ASMARKdiscrepancy_MIMARKlist_ASMARK') then
1404
- trampCall(@__ASMARKdiscrepancy_MIMARKlist_ASMARK)
1405
- else raise NameError.new( "Error: undefined variable __ASMARKdiscrepancy_MIMARKlist_ASMARK", "__ASMARKdiscrepancy_MIMARKlist_ASMARK" ) end
1406
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:158"] + __e.backtrace ) ; raise __e
1635
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 152 );
1636
+ _reverse(
1637
+ begin
1638
+ if @global_lisp_binding.has_key?('__ASMARKdiscrepancy_MIMARKlist_ASMARK') then
1639
+ trampCall(@__ASMARKdiscrepancy_MIMARKlist_ASMARK)
1640
+ else raise NameError.new( "Error: undefined variable __ASMARKdiscrepancy_MIMARKlist_ASMARK", "__ASMARKdiscrepancy_MIMARKlist_ASMARK" ) end
1641
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:158"] + __e.backtrace ) ; raise __e
1642
+ end
1643
+ )
1407
1644
  end
1408
- )
1409
- ]
1410
- ))
1645
+ ]
1646
+ ))
1647
+ end
1411
1648
  end
1412
1649
  end
1413
1650
  if (
@@ -1419,34 +1656,40 @@ discrepancies found. Errors are:
1419
1656
  end
1420
1657
  ) then
1421
1658
  begin
1422
- trampCall( self._write_MIMARKsummary_METHOD( 'write-summary',
1423
- begin
1424
- if @global_lisp_binding.has_key?('_write_MIMARKsummary') then
1425
- trampCall(@_write_MIMARKsummary)
1426
- else raise NameError.new( "Error: undefined variable _write_MIMARKsummary", "_write_MIMARKsummary" ) end
1427
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:155"] + __e.backtrace ) ; raise __e
1428
- end ,
1429
- [
1430
- ]
1431
- ))
1659
+ begin
1660
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 155 );
1661
+ trampCall( self._write_MIMARKsummary_METHOD( 'write-summary',
1662
+ begin
1663
+ if @global_lisp_binding.has_key?('_write_MIMARKsummary') then
1664
+ trampCall(@_write_MIMARKsummary)
1665
+ else raise NameError.new( "Error: undefined variable _write_MIMARKsummary", "_write_MIMARKsummary" ) end
1666
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:155"] + __e.backtrace ) ; raise __e
1667
+ end ,
1668
+ [
1669
+ ]
1670
+ ))
1671
+ end
1432
1672
  end
1433
1673
  end
1434
- delayCall( '_length', 'length',
1435
- begin
1436
- if @global_lisp_binding.has_key?('_length') then
1437
- trampCall(@_length)
1438
- else raise NameError.new( "Error: undefined variable _length", "_length" ) end
1439
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:158"] + __e.backtrace ) ; raise __e
1440
- end ,
1441
- [
1442
- begin
1443
- if @global_lisp_binding.has_key?('__ASMARKdiscrepancy_MIMARKlist_ASMARK') then
1444
- trampCall(@__ASMARKdiscrepancy_MIMARKlist_ASMARK)
1445
- else raise NameError.new( "Error: undefined variable __ASMARKdiscrepancy_MIMARKlist_ASMARK", "__ASMARKdiscrepancy_MIMARKlist_ASMARK" ) end
1446
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:158"] + __e.backtrace ) ; raise __e
1447
- end
1448
- ]
1449
- )
1674
+ begin
1675
+ embedBacktraceInfo( "./lib/nendo/test.nnd", 158 );
1676
+ delayCall( '_length', 'length',
1677
+ begin
1678
+ if @global_lisp_binding.has_key?('_length') then
1679
+ trampCall(@_length)
1680
+ else raise NameError.new( "Error: undefined variable _length", "_length" ) end
1681
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:158"] + __e.backtrace ) ; raise __e
1682
+ end ,
1683
+ [
1684
+ begin
1685
+ if @global_lisp_binding.has_key?('__ASMARKdiscrepancy_MIMARKlist_ASMARK') then
1686
+ trampCall(@__ASMARKdiscrepancy_MIMARKlist_ASMARK)
1687
+ else raise NameError.new( "Error: undefined variable __ASMARKdiscrepancy_MIMARKlist_ASMARK", "__ASMARKdiscrepancy_MIMARKlist_ASMARK" ) end
1688
+ rescue => __e ; __e.set_backtrace( ["./lib/nendo/test.nnd:158"] + __e.backtrace ) ; raise __e
1689
+ end
1690
+ ]
1691
+ )
1692
+ end
1450
1693
  } ; ___lambda.call(
1451
1694
  begin
1452
1695
  if @global_lisp_binding.has_key?('__ASMARKtest_MIMARKoutput_MIMARKfile_ASMARK') then