nendo 0.6.5 → 0.6.6

Sign up to get free protection for your applications and to get access to all the features.
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/text/tree.nndc CHANGED
@@ -5,13 +5,9 @@
5
5
 
6
6
  trampCall(
7
7
  begin
8
- embedBacktraceInfo( "./lib/nendo/text/tree.nnd", 10 );
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/text/tree.nnd:10"] + __e.backtrace ) ; raise __e
15
11
  end ,
16
12
  [
17
13
  "stringio"
@@ -36,11 +32,9 @@ trampCall(
36
32
  Proc.new { |_tree|
37
33
  if (
38
34
  begin
39
- embedBacktraceInfo( "./lib/nendo/text/tree.nnd", 17 );
40
35
  _null_QUMARK(
41
36
  begin
42
37
  trampCall(_tree)
43
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:20"] + __e.backtrace ) ; raise __e
44
38
  end
45
39
  )
46
40
  end
@@ -51,56 +45,43 @@ trampCall(
51
45
  else
52
46
  if (
53
47
  begin
54
- embedBacktraceInfo( "./lib/nendo/text/tree.nnd", 18 );
55
48
  _pair_QUMARK(
56
49
  begin
57
50
  trampCall(_tree)
58
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:20"] + __e.backtrace ) ; raise __e
59
51
  end
60
52
  )
61
53
  end
62
54
  ) then
63
55
  begin
64
56
  begin
65
- embedBacktraceInfo( "./lib/nendo/text/tree.nnd", 18 );
66
57
  trampCall( self._write_MIMARKtree_METHOD( 'write-tree',
67
58
  begin
68
- if @global_lisp_binding.has_key?('_write_MIMARKtree') then
69
59
  trampCall(@_write_MIMARKtree)
70
- else raise NameError.new( "Error: undefined variable _write_MIMARKtree", "_write_MIMARKtree" ) end
71
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:18"] + __e.backtrace ) ; raise __e
72
60
  end ,
73
61
  [
74
62
  begin
75
- embedBacktraceInfo( "./lib/nendo/text/tree.nnd", 18 );
76
63
  _car(
77
64
  begin
78
65
  trampCall(_tree)
79
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:20"] + __e.backtrace ) ; raise __e
80
66
  end
81
67
  )
82
68
  end ,
83
69
  begin
84
70
  trampCall(_out)
85
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:18"] + __e.backtrace ) ; raise __e
86
71
  end
87
72
  ]
88
73
  ))
89
74
  end
90
75
  begin
91
- embedBacktraceInfo( "./lib/nendo/text/tree.nnd", 18 );
92
76
  delayCall( '_loop', 'loop',
93
77
  begin
94
78
  trampCall(_loop)
95
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:18"] + __e.backtrace ) ; raise __e
96
79
  end ,
97
80
  [
98
81
  begin
99
- embedBacktraceInfo( "./lib/nendo/text/tree.nnd", 18 );
100
82
  _cdr(
101
83
  begin
102
84
  trampCall(_tree)
103
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:20"] + __e.backtrace ) ; raise __e
104
85
  end
105
86
  )
106
87
  end
@@ -117,10 +98,8 @@ trampCall(
117
98
  trampCall(_out).print(
118
99
  begin
119
100
  trampCall(_tree)
120
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:20"] + __e.backtrace ) ; raise __e
121
101
  end
122
102
  )
123
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:20"] + __e.backtrace ) ; raise __e
124
103
  end
125
104
  end
126
105
  else
@@ -130,16 +109,13 @@ trampCall(
130
109
  end
131
110
  }
132
111
  begin
133
- embedBacktraceInfo( "./lib/nendo/text/tree.nnd", 18 );
134
112
  delayCall( '_loop', 'loop',
135
113
  begin
136
114
  trampCall(_loop)
137
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:18"] + __e.backtrace ) ; raise __e
138
115
  end ,
139
116
  [
140
117
  begin
141
118
  trampCall(_tree)
142
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:20"] + __e.backtrace ) ; raise __e
143
119
  end
144
120
  ]
145
121
  )
@@ -151,33 +127,25 @@ trampCall(
151
127
  } ; ___lambda.call(
152
128
  if (
153
129
  begin
154
- embedBacktraceInfo( "./lib/nendo/text/tree.nnd", 17 );
155
130
  _null_QUMARK(
156
131
  begin
157
132
  trampCall(_out)
158
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:18"] + __e.backtrace ) ; raise __e
159
133
  end
160
134
  )
161
135
  end
162
136
  ) then
163
137
  begin
164
138
  trampCall(STDOUT)
165
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:14"] + __e.backtrace ) ; raise __e
166
139
  end
167
140
  else
168
141
  begin
169
- embedBacktraceInfo( "./lib/nendo/text/tree.nnd", 18 );
170
142
  delayCall( '_car', 'car',
171
143
  begin
172
- if @global_lisp_binding.has_key?('_car') then
173
144
  trampCall(@_car)
174
- else raise NameError.new( "Error: undefined variable _car", "_car" ) end
175
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:18"] + __e.backtrace ) ; raise __e
176
145
  end ,
177
146
  [
178
147
  begin
179
148
  trampCall(_out)
180
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:18"] + __e.backtrace ) ; raise __e
181
149
  end
182
150
  ]
183
151
  )
@@ -201,22 +169,16 @@ trampCall(
201
169
  begin
202
170
  ___lambda = lambda { |_sio|
203
171
  begin
204
- embedBacktraceInfo( "./lib/nendo/text/tree.nnd", 24 );
205
172
  trampCall( self._write_MIMARKtree_METHOD( 'write-tree',
206
173
  begin
207
- if @global_lisp_binding.has_key?('_write_MIMARKtree') then
208
174
  trampCall(@_write_MIMARKtree)
209
- else raise NameError.new( "Error: undefined variable _write_MIMARKtree", "_write_MIMARKtree" ) end
210
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:24"] + __e.backtrace ) ; raise __e
211
175
  end ,
212
176
  [
213
177
  begin
214
178
  trampCall(_tree)
215
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:24"] + __e.backtrace ) ; raise __e
216
179
  end ,
217
180
  begin
218
181
  trampCall(_sio)
219
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:24"] + __e.backtrace ) ; raise __e
220
182
  end
221
183
  ]
222
184
  ))
@@ -224,14 +186,12 @@ trampCall(
224
186
  begin
225
187
  trampCall(_sio).string(
226
188
  )
227
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:25"] + __e.backtrace ) ; raise __e
228
189
  end
229
190
  } ; ___lambda.call(
230
191
  begin
231
192
  trampCall(StringIO).new(
232
193
  ""
233
194
  )
234
- rescue => __e ; __e.set_backtrace( ["./lib/nendo/text/tree.nnd:23"] + __e.backtrace ) ; raise __e
235
195
  end
236
196
  )
237
197
  end