nendo 0.6.5 → 0.6.6

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.
Files changed (23) hide show
  1. checksums.yaml +8 -8
  2. data/README.md +13 -0
  3. data/Rakefile +5 -3
  4. data/VERSION.yml +1 -1
  5. data/benchmark/benchmark.nnd +46 -31
  6. data/bin/nendo +8 -0
  7. data/lib/nendo/debug/syslog.nndc +0 -10
  8. data/lib/nendo/init.nndc +0 -5012
  9. data/lib/nendo/nendo/experimental.nndc +0 -994
  10. data/lib/nendo/nendo/test.nndc +0 -474
  11. data/lib/nendo/rfc/json.nndc +0 -150
  12. data/lib/nendo/ruby/core.rb +5 -1
  13. data/lib/nendo/ruby/evaluator.rb +35 -14
  14. data/lib/nendo/srfi-1.nndc +0 -3375
  15. data/lib/nendo/srfi-2.nndc +0 -118
  16. data/lib/nendo/srfi-26.nndc +0 -431
  17. data/lib/nendo/text/html-lite.nndc +0 -625
  18. data/lib/nendo/text/tree.nndc +0 -40
  19. data/lib/nendo/util/combinations.nndc +0 -1178
  20. data/lib/nendo/util/list.nndc +0 -706
  21. data/lib/nendo/util/match.nndc +0 -8094
  22. metadata +9 -6
  23. data/README +0 -10
data/lib/nendo/rfc/json.nndc CHANGED
@@ -5,13 +5,9 @@
5
5
 
6
6
  trampCall(
7
7
  begin
8
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 37 );
9
8
  delayCall( '_require', 'require',
10
9
  begin
11
- if @global_lisp_binding.has_key?('_require') then
12
10
  trampCall(@_require)
13
- else raise NameError.new( "Error: undefined variable _require", "_require" ) end
14
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:37"] + __e.backtrace ) ; raise __e
15
11
  end ,
16
12
  [
17
13
  "json"
@@ -23,13 +19,9 @@ trampCall(
23
19
 
24
20
  trampCall(
25
21
  begin
26
- embedBacktraceInfo( "", 1 );
27
22
  delayCall( '_load', 'load',
28
23
  begin
29
- if @global_lisp_binding.has_key?('_load') then
30
24
  trampCall(@_load)
31
- else raise NameError.new( "Error: undefined variable _load", "_load" ) end
32
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
33
25
  end ,
34
26
  [
35
27
  "util/list"
@@ -48,11 +40,9 @@ trampCall(
48
40
  Proc.new { |_obj|
49
41
  if (
50
42
  begin
51
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 43 );
52
43
  _null_QUMARK(
53
44
  begin
54
45
  trampCall(_obj)
55
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:58"] + __e.backtrace ) ; raise __e
56
46
  end
57
47
  )
58
48
  end
@@ -60,24 +50,18 @@ trampCall(
60
50
  begin
61
51
  begin
62
52
  trampCall(_obj)
63
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:58"] + __e.backtrace ) ; raise __e
64
53
  end
65
54
  end
66
55
  else
67
56
  if (
68
57
  begin
69
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 45 );
70
58
  trampCall( self._vector_QUMARK_METHOD( 'vector?',
71
59
  begin
72
- if @global_lisp_binding.has_key?('_vector_QUMARK') then
73
60
  trampCall(@_vector_QUMARK)
74
- else raise NameError.new( "Error: undefined variable _vector_QUMARK", "_vector_QUMARK" ) end
75
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:45"] + __e.backtrace ) ; raise __e
76
61
  end ,
77
62
  [
78
63
  begin
79
64
  trampCall(_obj)
80
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:58"] + __e.backtrace ) ; raise __e
81
65
  end
82
66
  ]
83
67
  ))
@@ -85,57 +69,39 @@ trampCall(
85
69
  ) then
86
70
  begin
87
71
  begin
88
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 46 );
89
72
  delayCall( '_list_MIMARK_GTMARKvector', 'list->vector',
90
73
  begin
91
- if @global_lisp_binding.has_key?('_list_MIMARK_GTMARKvector') then
92
74
  trampCall(@_list_MIMARK_GTMARKvector)
93
- else raise NameError.new( "Error: undefined variable _list_MIMARK_GTMARKvector", "_list_MIMARK_GTMARKvector" ) end
94
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:46"] + __e.backtrace ) ; raise __e
95
75
  end ,
96
76
  [
97
77
  begin
98
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 52 );
99
78
  trampCall( self._map_METHOD( 'map',
100
79
  begin
101
- if @global_lisp_binding.has_key?('_map') then
102
80
  trampCall(@_map)
103
- else raise NameError.new( "Error: undefined variable _map", "_map" ) end
104
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:52"] + __e.backtrace ) ; raise __e
105
81
  end ,
106
82
  [
107
83
  Proc.new { |_x|
108
84
  begin
109
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 55 );
110
85
  trampCall( self.__PAMARKjson_COMARKhash_MIMARKtable_MIMARK_GTMARKalist_METHOD( '%json:hash-table->alist',
111
86
  begin
112
- if @global_lisp_binding.has_key?('__PAMARKjson_COMARKhash_MIMARKtable_MIMARK_GTMARKalist') then
113
87
  trampCall(@__PAMARKjson_COMARKhash_MIMARKtable_MIMARK_GTMARKalist)
114
- else raise NameError.new( "Error: undefined variable __PAMARKjson_COMARKhash_MIMARKtable_MIMARK_GTMARKalist", "__PAMARKjson_COMARKhash_MIMARKtable_MIMARK_GTMARKalist" ) end
115
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:55"] + __e.backtrace ) ; raise __e
116
88
  end ,
117
89
  [
118
90
  begin
119
91
  trampCall(_x)
120
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:49"] + __e.backtrace ) ; raise __e
121
92
  end
122
93
  ]
123
94
  ))
124
95
  end
125
96
  } ,
126
97
  begin
127
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 50 );
128
98
  trampCall( self._vector_MIMARK_GTMARKlist_METHOD( 'vector->list',
129
99
  begin
130
- if @global_lisp_binding.has_key?('_vector_MIMARK_GTMARKlist') then
131
100
  trampCall(@_vector_MIMARK_GTMARKlist)
132
- else raise NameError.new( "Error: undefined variable _vector_MIMARK_GTMARKlist", "_vector_MIMARK_GTMARKlist" ) end
133
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:50"] + __e.backtrace ) ; raise __e
134
101
  end ,
135
102
  [
136
103
  begin
137
104
  trampCall(_obj)
138
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:58"] + __e.backtrace ) ; raise __e
139
105
  end
140
106
  ]
141
107
  ))
@@ -150,18 +116,13 @@ trampCall(
150
116
  else
151
117
  if (
152
118
  begin
153
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 51 );
154
119
  trampCall( self._hash_MIMARKtable_QUMARK_METHOD( 'hash-table?',
155
120
  begin
156
- if @global_lisp_binding.has_key?('_hash_MIMARKtable_QUMARK') then
157
121
  trampCall(@_hash_MIMARKtable_QUMARK)
158
- else raise NameError.new( "Error: undefined variable _hash_MIMARKtable_QUMARK", "_hash_MIMARKtable_QUMARK" ) end
159
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:51"] + __e.backtrace ) ; raise __e
160
122
  end ,
161
123
  [
162
124
  begin
163
125
  trampCall(_obj)
164
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:58"] + __e.backtrace ) ; raise __e
165
126
  end
166
127
  ]
167
128
  ))
@@ -169,44 +130,31 @@ trampCall(
169
130
  ) then
170
131
  begin
171
132
  begin
172
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 52 );
173
133
  delayCall( '_map', 'map',
174
134
  begin
175
- if @global_lisp_binding.has_key?('_map') then
176
135
  trampCall(@_map)
177
- else raise NameError.new( "Error: undefined variable _map", "_map" ) end
178
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:52"] + __e.backtrace ) ; raise __e
179
136
  end ,
180
137
  [
181
138
  Proc.new { |_entry|
182
139
  begin
183
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 54 );
184
140
  _cons(
185
141
  begin
186
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 54 );
187
142
  _car(
188
143
  begin
189
144
  trampCall(_entry)
190
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:55"] + __e.backtrace ) ; raise __e
191
145
  end
192
146
  )
193
147
  end ,
194
148
  begin
195
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 55 );
196
149
  trampCall( self.__PAMARKjson_COMARKhash_MIMARKtable_MIMARK_GTMARKalist_METHOD( '%json:hash-table->alist',
197
150
  begin
198
- if @global_lisp_binding.has_key?('__PAMARKjson_COMARKhash_MIMARKtable_MIMARK_GTMARKalist') then
199
151
  trampCall(@__PAMARKjson_COMARKhash_MIMARKtable_MIMARK_GTMARKalist)
200
- else raise NameError.new( "Error: undefined variable __PAMARKjson_COMARKhash_MIMARKtable_MIMARK_GTMARKalist", "__PAMARKjson_COMARKhash_MIMARKtable_MIMARK_GTMARKalist" ) end
201
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:55"] + __e.backtrace ) ; raise __e
202
152
  end ,
203
153
  [
204
154
  begin
205
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 55 );
206
155
  _cdr(
207
156
  begin
208
157
  trampCall(_entry)
209
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:55"] + __e.backtrace ) ; raise __e
210
158
  end
211
159
  )
212
160
  end
@@ -217,18 +165,13 @@ trampCall(
217
165
  end
218
166
  } ,
219
167
  begin
220
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 56 );
221
168
  trampCall( self._hash_MIMARKtable_MIMARK_GTMARKalist_METHOD( 'hash-table->alist',
222
169
  begin
223
- if @global_lisp_binding.has_key?('_hash_MIMARKtable_MIMARK_GTMARKalist') then
224
170
  trampCall(@_hash_MIMARKtable_MIMARK_GTMARKalist)
225
- else raise NameError.new( "Error: undefined variable _hash_MIMARKtable_MIMARK_GTMARKalist", "_hash_MIMARKtable_MIMARK_GTMARKalist" ) end
226
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:56"] + __e.backtrace ) ; raise __e
227
171
  end ,
228
172
  [
229
173
  begin
230
174
  trampCall(_obj)
231
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:58"] + __e.backtrace ) ; raise __e
232
175
  end
233
176
  ]
234
177
  ))
@@ -244,7 +187,6 @@ trampCall(
244
187
  begin
245
188
  begin
246
189
  trampCall(_obj)
247
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:58"] + __e.backtrace ) ; raise __e
248
190
  end
249
191
  end
250
192
  else
@@ -268,24 +210,18 @@ trampCall(
268
210
  Proc.new { |_obj|
269
211
  if (
270
212
  begin
271
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 62 );
272
213
  _null_QUMARK(
273
214
  begin
274
215
  trampCall(_obj)
275
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:78"] + __e.backtrace ) ; raise __e
276
216
  end
277
217
  )
278
218
  end
279
219
  ) then
280
220
  begin
281
221
  begin
282
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 63 );
283
222
  delayCall( '_make_MIMARKhash_MIMARKtable', 'make-hash-table',
284
223
  begin
285
- if @global_lisp_binding.has_key?('_make_MIMARKhash_MIMARKtable') then
286
224
  trampCall(@_make_MIMARKhash_MIMARKtable)
287
- else raise NameError.new( "Error: undefined variable _make_MIMARKhash_MIMARKtable", "_make_MIMARKhash_MIMARKtable" ) end
288
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:63"] + __e.backtrace ) ; raise __e
289
225
  end ,
290
226
  [
291
227
  ]
@@ -295,18 +231,13 @@ trampCall(
295
231
  else
296
232
  if (
297
233
  begin
298
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 64 );
299
234
  trampCall( self._vector_QUMARK_METHOD( 'vector?',
300
235
  begin
301
- if @global_lisp_binding.has_key?('_vector_QUMARK') then
302
236
  trampCall(@_vector_QUMARK)
303
- else raise NameError.new( "Error: undefined variable _vector_QUMARK", "_vector_QUMARK" ) end
304
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:64"] + __e.backtrace ) ; raise __e
305
237
  end ,
306
238
  [
307
239
  begin
308
240
  trampCall(_obj)
309
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:78"] + __e.backtrace ) ; raise __e
310
241
  end
311
242
  ]
312
243
  ))
@@ -314,57 +245,39 @@ trampCall(
314
245
  ) then
315
246
  begin
316
247
  begin
317
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 65 );
318
248
  delayCall( '_list_MIMARK_GTMARKvector', 'list->vector',
319
249
  begin
320
- if @global_lisp_binding.has_key?('_list_MIMARK_GTMARKvector') then
321
250
  trampCall(@_list_MIMARK_GTMARKvector)
322
- else raise NameError.new( "Error: undefined variable _list_MIMARK_GTMARKvector", "_list_MIMARK_GTMARKvector" ) end
323
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:65"] + __e.backtrace ) ; raise __e
324
251
  end ,
325
252
  [
326
253
  begin
327
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 72 );
328
254
  trampCall( self._map_METHOD( 'map',
329
255
  begin
330
- if @global_lisp_binding.has_key?('_map') then
331
256
  trampCall(@_map)
332
- else raise NameError.new( "Error: undefined variable _map", "_map" ) end
333
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:72"] + __e.backtrace ) ; raise __e
334
257
  end ,
335
258
  [
336
259
  Proc.new { |_x|
337
260
  begin
338
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 75 );
339
261
  trampCall( self.__PAMARKjson_COMARKalist_MIMARK_GTMARKhash_MIMARKtable_METHOD( '%json:alist->hash-table',
340
262
  begin
341
- if @global_lisp_binding.has_key?('__PAMARKjson_COMARKalist_MIMARK_GTMARKhash_MIMARKtable') then
342
263
  trampCall(@__PAMARKjson_COMARKalist_MIMARK_GTMARKhash_MIMARKtable)
343
- else raise NameError.new( "Error: undefined variable __PAMARKjson_COMARKalist_MIMARK_GTMARKhash_MIMARKtable", "__PAMARKjson_COMARKalist_MIMARK_GTMARKhash_MIMARKtable" ) end
344
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:75"] + __e.backtrace ) ; raise __e
345
264
  end ,
346
265
  [
347
266
  begin
348
267
  trampCall(_x)
349
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:68"] + __e.backtrace ) ; raise __e
350
268
  end
351
269
  ]
352
270
  ))
353
271
  end
354
272
  } ,
355
273
  begin
356
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 69 );
357
274
  trampCall( self._vector_MIMARK_GTMARKlist_METHOD( 'vector->list',
358
275
  begin
359
- if @global_lisp_binding.has_key?('_vector_MIMARK_GTMARKlist') then
360
276
  trampCall(@_vector_MIMARK_GTMARKlist)
361
- else raise NameError.new( "Error: undefined variable _vector_MIMARK_GTMARKlist", "_vector_MIMARK_GTMARKlist" ) end
362
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:69"] + __e.backtrace ) ; raise __e
363
277
  end ,
364
278
  [
365
279
  begin
366
280
  trampCall(_obj)
367
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:78"] + __e.backtrace ) ; raise __e
368
281
  end
369
282
  ]
370
283
  ))
@@ -379,65 +292,46 @@ trampCall(
379
292
  else
380
293
  if (
381
294
  begin
382
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 70 );
383
295
  _pair_QUMARK(
384
296
  begin
385
297
  trampCall(_obj)
386
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:78"] + __e.backtrace ) ; raise __e
387
298
  end
388
299
  )
389
300
  end
390
301
  ) then
391
302
  begin
392
303
  begin
393
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 71 );
394
304
  delayCall( '_alist_MIMARK_GTMARKhash_MIMARKtable', 'alist->hash-table',
395
305
  begin
396
- if @global_lisp_binding.has_key?('_alist_MIMARK_GTMARKhash_MIMARKtable') then
397
306
  trampCall(@_alist_MIMARK_GTMARKhash_MIMARKtable)
398
- else raise NameError.new( "Error: undefined variable _alist_MIMARK_GTMARKhash_MIMARKtable", "_alist_MIMARK_GTMARKhash_MIMARKtable" ) end
399
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:71"] + __e.backtrace ) ; raise __e
400
307
  end ,
401
308
  [
402
309
  begin
403
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 72 );
404
310
  trampCall( self._map_METHOD( 'map',
405
311
  begin
406
- if @global_lisp_binding.has_key?('_map') then
407
312
  trampCall(@_map)
408
- else raise NameError.new( "Error: undefined variable _map", "_map" ) end
409
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:72"] + __e.backtrace ) ; raise __e
410
313
  end ,
411
314
  [
412
315
  Proc.new { |_entry|
413
316
  begin
414
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 74 );
415
317
  _cons(
416
318
  begin
417
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 74 );
418
319
  _car(
419
320
  begin
420
321
  trampCall(_entry)
421
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:75"] + __e.backtrace ) ; raise __e
422
322
  end
423
323
  )
424
324
  end ,
425
325
  begin
426
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 75 );
427
326
  trampCall( self.__PAMARKjson_COMARKalist_MIMARK_GTMARKhash_MIMARKtable_METHOD( '%json:alist->hash-table',
428
327
  begin
429
- if @global_lisp_binding.has_key?('__PAMARKjson_COMARKalist_MIMARK_GTMARKhash_MIMARKtable') then
430
328
  trampCall(@__PAMARKjson_COMARKalist_MIMARK_GTMARKhash_MIMARKtable)
431
- else raise NameError.new( "Error: undefined variable __PAMARKjson_COMARKalist_MIMARK_GTMARKhash_MIMARKtable", "__PAMARKjson_COMARKalist_MIMARK_GTMARKhash_MIMARKtable" ) end
432
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:75"] + __e.backtrace ) ; raise __e
433
329
  end ,
434
330
  [
435
331
  begin
436
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 75 );
437
332
  _cdr(
438
333
  begin
439
334
  trampCall(_entry)
440
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:75"] + __e.backtrace ) ; raise __e
441
335
  end
442
336
  )
443
337
  end
@@ -449,7 +343,6 @@ trampCall(
449
343
  } ,
450
344
  begin
451
345
  trampCall(_obj)
452
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:78"] + __e.backtrace ) ; raise __e
453
346
  end
454
347
  ]
455
348
  ))
@@ -465,7 +358,6 @@ trampCall(
465
358
  begin
466
359
  begin
467
360
  trampCall(_obj)
468
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:78"] + __e.backtrace ) ; raise __e
469
361
  end
470
362
  end
471
363
  else
@@ -488,23 +380,17 @@ trampCall(
488
380
  trampCall(
489
381
  Proc.new { |_str|
490
382
  begin
491
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 85 );
492
383
  delayCall( '__PAMARKjson_COMARKhash_MIMARKtable_MIMARK_GTMARKalist', '%json:hash-table->alist',
493
384
  begin
494
- if @global_lisp_binding.has_key?('__PAMARKjson_COMARKhash_MIMARKtable_MIMARK_GTMARKalist') then
495
385
  trampCall(@__PAMARKjson_COMARKhash_MIMARKtable_MIMARK_GTMARKalist)
496
- else raise NameError.new( "Error: undefined variable __PAMARKjson_COMARKhash_MIMARKtable_MIMARK_GTMARKalist", "__PAMARKjson_COMARKhash_MIMARKtable_MIMARK_GTMARKalist" ) end
497
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:85"] + __e.backtrace ) ; raise __e
498
386
  end ,
499
387
  [
500
388
  begin
501
389
  trampCall(JSON).parse(
502
390
  begin
503
391
  trampCall(_str)
504
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:86"] + __e.backtrace ) ; raise __e
505
392
  end
506
393
  )
507
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:86"] + __e.backtrace ) ; raise __e
508
394
  end
509
395
  ]
510
396
  )
@@ -527,18 +413,13 @@ trampCall(
527
413
  begin
528
414
  ___lambda = lambda { |_str|
529
415
  begin
530
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 91 );
531
416
  delayCall( '_parse_MIMARKjson_MIMARKstring', 'parse-json-string',
532
417
  begin
533
- if @global_lisp_binding.has_key?('_parse_MIMARKjson_MIMARKstring') then
534
418
  trampCall(@_parse_MIMARKjson_MIMARKstring)
535
- else raise NameError.new( "Error: undefined variable _parse_MIMARKjson_MIMARKstring", "_parse_MIMARKjson_MIMARKstring" ) end
536
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:91"] + __e.backtrace ) ; raise __e
537
419
  end ,
538
420
  [
539
421
  begin
540
422
  trampCall(_str)
541
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:91"] + __e.backtrace ) ; raise __e
542
423
  end
543
424
  ]
544
425
  )
@@ -547,7 +428,6 @@ trampCall(
547
428
  begin
548
429
  trampCall(__).read(
549
430
  )
550
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:90"] + __e.backtrace ) ; raise __e
551
431
  end
552
432
  )
553
433
  end
@@ -556,33 +436,25 @@ trampCall(
556
436
  ___lambda = lambda { |___gensym__6d159efe5170a605fc9e84dcf91a427e3f7e5718_90188|
557
437
  if (
558
438
  begin
559
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 62 );
560
439
  _null_QUMARK(
561
440
  begin
562
441
  trampCall(___gensym__6d159efe5170a605fc9e84dcf91a427e3f7e5718_90188)
563
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
564
442
  end
565
443
  )
566
444
  end
567
445
  ) then
568
446
  begin
569
447
  trampCall(STDIN)
570
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:89"] + __e.backtrace ) ; raise __e
571
448
  end
572
449
  else
573
450
  begin
574
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 74 );
575
451
  delayCall( '_car', 'car',
576
452
  begin
577
- if @global_lisp_binding.has_key?('_car') then
578
453
  trampCall(@_car)
579
- else raise NameError.new( "Error: undefined variable _car", "_car" ) end
580
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:74"] + __e.backtrace ) ; raise __e
581
454
  end ,
582
455
  [
583
456
  begin
584
457
  trampCall(___gensym__6d159efe5170a605fc9e84dcf91a427e3f7e5718_90188)
585
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
586
458
  end
587
459
  ]
588
460
  )
@@ -591,7 +463,6 @@ trampCall(
591
463
  } ; ___lambda.call(
592
464
  begin
593
465
  trampCall(_io)
594
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:89"] + __e.backtrace ) ; raise __e
595
466
  end
596
467
  )
597
468
  end
@@ -613,24 +484,18 @@ trampCall(
613
484
  begin
614
485
  trampCall(JSON).dump(
615
486
  begin
616
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 98 );
617
487
  trampCall( self.__PAMARKjson_COMARKalist_MIMARK_GTMARKhash_MIMARKtable_METHOD( '%json:alist->hash-table',
618
488
  begin
619
- if @global_lisp_binding.has_key?('__PAMARKjson_COMARKalist_MIMARK_GTMARKhash_MIMARKtable') then
620
489
  trampCall(@__PAMARKjson_COMARKalist_MIMARK_GTMARKhash_MIMARKtable)
621
- else raise NameError.new( "Error: undefined variable __PAMARKjson_COMARKalist_MIMARK_GTMARKhash_MIMARKtable", "__PAMARKjson_COMARKalist_MIMARK_GTMARKhash_MIMARKtable" ) end
622
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:98"] + __e.backtrace ) ; raise __e
623
490
  end ,
624
491
  [
625
492
  begin
626
493
  trampCall(_obj)
627
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:98"] + __e.backtrace ) ; raise __e
628
494
  end
629
495
  ]
630
496
  ))
631
497
  end
632
498
  )
633
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:97"] + __e.backtrace ) ; raise __e
634
499
  end
635
500
  }
636
501
  )
@@ -650,57 +515,43 @@ trampCall(
650
515
  begin
651
516
  trampCall(__).print(
652
517
  begin
653
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 103 );
654
518
  trampCall( self._construct_MIMARKjson_MIMARKstring_METHOD( 'construct-json-string',
655
519
  begin
656
- if @global_lisp_binding.has_key?('_construct_MIMARKjson_MIMARKstring') then
657
520
  trampCall(@_construct_MIMARKjson_MIMARKstring)
658
- else raise NameError.new( "Error: undefined variable _construct_MIMARKjson_MIMARKstring", "_construct_MIMARKjson_MIMARKstring" ) end
659
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:103"] + __e.backtrace ) ; raise __e
660
521
  end ,
661
522
  [
662
523
  begin
663
524
  trampCall(_obj)
664
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:103"] + __e.backtrace ) ; raise __e
665
525
  end
666
526
  ]
667
527
  ))
668
528
  end
669
529
  )
670
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:102"] + __e.backtrace ) ; raise __e
671
530
  end
672
531
  } ; ___lambda.call(
673
532
  begin
674
533
  ___lambda = lambda { |___gensym__6d159efe5170a605fc9e84dcf91a427e3f7e5718_90189|
675
534
  if (
676
535
  begin
677
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 62 );
678
536
  _null_QUMARK(
679
537
  begin
680
538
  trampCall(___gensym__6d159efe5170a605fc9e84dcf91a427e3f7e5718_90189)
681
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
682
539
  end
683
540
  )
684
541
  end
685
542
  ) then
686
543
  begin
687
544
  trampCall(STDOUT)
688
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:101"] + __e.backtrace ) ; raise __e
689
545
  end
690
546
  else
691
547
  begin
692
- embedBacktraceInfo( "./lib/nendo/rfc/json.nnd", 74 );
693
548
  delayCall( '_car', 'car',
694
549
  begin
695
- if @global_lisp_binding.has_key?('_car') then
696
550
  trampCall(@_car)
697
- else raise NameError.new( "Error: undefined variable _car", "_car" ) end
698
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:74"] + __e.backtrace ) ; raise __e
699
551
  end ,
700
552
  [
701
553
  begin
702
554
  trampCall(___gensym__6d159efe5170a605fc9e84dcf91a427e3f7e5718_90189)
703
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
704
555
  end
705
556
  ]
706
557
  )
@@ -709,7 +560,6 @@ trampCall(
709
560
  } ; ___lambda.call(
710
561
  begin
711
562
  trampCall(_io)
712
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/rfc/json.nnd:101"] + __e.backtrace ) ; raise __e
713
563
  end
714
564
  )
715
565
  end
data/lib/nendo/ruby/core.rb CHANGED
@@ -42,7 +42,7 @@ module Nendo
42
42
  end
43
43
 
44
44
  def self.version
45
- "0.6.5" ##NENDO-VERSION
45
+ "0.6.6" ##NENDO-VERSION
46
46
  end
47
47
 
48
48
  attr_reader :evaluator
@@ -82,6 +82,10 @@ module Nendo
82
82
  @evaluator.setOptimizeLevel( level )
83
83
  end
84
84
 
85
+ def disableRuntimeCheck( )
86
+ @evaluator.runtimeCheck = false
87
+ end
88
+
85
89
  def setDisplayErrors( flag )
86
90
  @evaluator.setDisplayErrors( flag )
87
91
  end