nendo 0.3.1 → 0.3.2

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 (15) hide show
  1. data/bin/nendo +83 -14
  2. data/emacs/nendo-mode.el +7 -0
  3. data/example/cgi/dekamoji.cgi +74 -55
  4. data/example/fact.nnd +2 -5
  5. data/example/fizzbuzz1.nnd +5 -3
  6. data/example/nqueen.nnd +71 -0
  7. data/example/scratch.nnd +1 -2
  8. data/lib/debug/syslog.nnd +1 -1
  9. data/lib/debug/syslog.nndc +9 -0
  10. data/lib/init.nnd +248 -16
  11. data/lib/init.nndc +7194 -4456
  12. data/lib/nendo.rb +220 -50
  13. data/lib/text/html-lite.nndc +74 -57
  14. data/lib/text/tree.nndc +9 -0
  15. metadata +6 -12
data/lib/text/html-lite.nndc CHANGED
@@ -1,21 +1,25 @@
1
+ #
2
+ # This file is nendo's compiled library file.
3
+ # generated "nendo -c src" command.
4
+ #
1
5
 
2
6
  begin
3
7
  @global_lisp_binding['_html_MIMARKescape'] = true
4
8
  @_html_MIMARKescape =
5
9
  Proc.new { |_c|
6
10
  begin
7
- ___lambda = lambda { |___gensym__10068|
11
+ ___lambda = lambda { |___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20023|
8
12
  if (
9
13
  begin
10
- ___lambda = lambda { |___gensym__10074|
14
+ ___lambda = lambda { |___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20029|
11
15
  if (
12
16
  begin
13
- ___gensym__10074
17
+ ___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20029
14
18
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
15
19
  end
16
20
  ) then
17
21
  begin
18
- ___gensym__10074
22
+ ___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20029
19
23
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
20
24
  end
21
25
  else
@@ -27,12 +31,12 @@
27
31
  if @global_lisp_binding.has_key?('_eqv_QUMARK') then
28
32
  @_eqv_QUMARK
29
33
  else raise NameError.new( "Error: undefined variable _eqv_QUMARK", "_eqv_QUMARK" ) end
30
- rescue => __e ; __e.set_backtrace( ["./lib/init.nnd:497"] + __e.backtrace ) ; raise __e
34
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:143"] + __e.backtrace ) ; raise __e
31
35
  end ,
32
36
  Cell.new(
33
37
  "<" ,Cell.new(
34
38
  begin
35
- ___gensym__10068
39
+ ___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20023
36
40
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
37
41
  end
38
42
  )))
@@ -45,15 +49,15 @@
45
49
  else
46
50
  if (
47
51
  begin
48
- ___lambda = lambda { |___gensym__10075|
52
+ ___lambda = lambda { |___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20030|
49
53
  if (
50
54
  begin
51
- ___gensym__10075
55
+ ___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20030
52
56
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
53
57
  end
54
58
  ) then
55
59
  begin
56
- ___gensym__10075
60
+ ___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20030
57
61
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
58
62
  end
59
63
  else
@@ -65,12 +69,12 @@
65
69
  if @global_lisp_binding.has_key?('_eqv_QUMARK') then
66
70
  @_eqv_QUMARK
67
71
  else raise NameError.new( "Error: undefined variable _eqv_QUMARK", "_eqv_QUMARK" ) end
68
- rescue => __e ; __e.set_backtrace( ["./lib/init.nnd:497"] + __e.backtrace ) ; raise __e
72
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:143"] + __e.backtrace ) ; raise __e
69
73
  end ,
70
74
  Cell.new(
71
75
  ">" ,Cell.new(
72
76
  begin
73
- ___gensym__10068
77
+ ___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20023
74
78
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
75
79
  end
76
80
  )))
@@ -83,15 +87,15 @@
83
87
  else
84
88
  if (
85
89
  begin
86
- ___lambda = lambda { |___gensym__10076|
90
+ ___lambda = lambda { |___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20031|
87
91
  if (
88
92
  begin
89
- ___gensym__10076
93
+ ___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20031
90
94
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
91
95
  end
92
96
  ) then
93
97
  begin
94
- ___gensym__10076
98
+ ___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20031
95
99
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
96
100
  end
97
101
  else
@@ -103,12 +107,12 @@
103
107
  if @global_lisp_binding.has_key?('_eqv_QUMARK') then
104
108
  @_eqv_QUMARK
105
109
  else raise NameError.new( "Error: undefined variable _eqv_QUMARK", "_eqv_QUMARK" ) end
106
- rescue => __e ; __e.set_backtrace( ["./lib/init.nnd:497"] + __e.backtrace ) ; raise __e
110
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:143"] + __e.backtrace ) ; raise __e
107
111
  end ,
108
112
  Cell.new(
109
113
  "&" ,Cell.new(
110
114
  begin
111
- ___gensym__10068
115
+ ___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20023
112
116
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
113
117
  end
114
118
  )))
@@ -121,15 +125,15 @@
121
125
  else
122
126
  if (
123
127
  begin
124
- ___lambda = lambda { |___gensym__10077|
128
+ ___lambda = lambda { |___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20032|
125
129
  if (
126
130
  begin
127
- ___gensym__10077
131
+ ___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20032
128
132
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
129
133
  end
130
134
  ) then
131
135
  begin
132
- ___gensym__10077
136
+ ___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20032
133
137
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
134
138
  end
135
139
  else
@@ -141,12 +145,12 @@
141
145
  if @global_lisp_binding.has_key?('_eqv_QUMARK') then
142
146
  @_eqv_QUMARK
143
147
  else raise NameError.new( "Error: undefined variable _eqv_QUMARK", "_eqv_QUMARK" ) end
144
- rescue => __e ; __e.set_backtrace( ["./lib/init.nnd:497"] + __e.backtrace ) ; raise __e
148
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:143"] + __e.backtrace ) ; raise __e
145
149
  end ,
146
150
  Cell.new(
147
151
  "\"" ,Cell.new(
148
152
  begin
149
- ___gensym__10068
153
+ ___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20023
150
154
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
151
155
  end
152
156
  )))
@@ -236,13 +240,20 @@
236
240
  @global_lisp_binding['__ASMARKdoctype_MIMARKalist_ASMARK'] = true
237
241
  @__ASMARKdoctype_MIMARKalist_ASMARK =
238
242
  Cell.new(Cell.new(Cell.new(LispKeyword.new( "strict" ),Cell.new(LispKeyword.new( "html" ),Cell.new(LispKeyword.new( "html-strict" ),Cell.new(LispKeyword.new( "html-4.01" ),Cell.new(LispKeyword.new( "html-4.01-strict" )))))),Cell.new(false,Cell.new("<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.01//EN\"
239
- \"http://www.w3.org/TR/html4/strict.dtd\">\n"))),Cell.new(Cell.new(Cell.new(LispKeyword.new( "transitional" ),Cell.new(LispKeyword.new( "html-transitional" ),Cell.new(LispKeyword.new( "html-4.01-transitional" )))),Cell.new(false,Cell.new("<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.01 Transitional//EN\"
240
- \"http://www.w3.org/TR/html4/loose.dtd\">\n"))),Cell.new(Cell.new(Cell.new(LispKeyword.new( "frameset" ),Cell.new(LispKeyword.new( "html-frameset" ),Cell.new(LispKeyword.new( "html-4.01-frameset" )))),Cell.new(false,Cell.new("<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.01 Frameset//EN\"
241
- \"http://www.w3.org/TR/html4/frameset.dtd\">\n"))),Cell.new(Cell.new(Cell.new(LispKeyword.new( "xhtml-1.0-strict" ),Cell.new(LispKeyword.new( "xhtml-1.0" ))),Cell.new(true,Cell.new("<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Strict//EN\"
242
- \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd\">\n"))),Cell.new(Cell.new(Cell.new(LispKeyword.new( "xhtml-1.0-transitional" )),Cell.new(true,Cell.new("<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Transitional//EN\"
243
- \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd\">\n"))),Cell.new(Cell.new(Cell.new(LispKeyword.new( "xhtml-1.0-frameset" )),Cell.new(true,Cell.new("<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Frameset//EN\"
244
- \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-frameset.dtd\">\n"))),Cell.new(Cell.new(Cell.new(LispKeyword.new( "xhtml-1.1" )),Cell.new(true,Cell.new("<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.1//EN\"
245
- \"http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd\">\n"))))))))))
243
+ \"http://www.w3.org/TR/html4/strict.dtd\">
244
+ "))),Cell.new(Cell.new(Cell.new(LispKeyword.new( "transitional" ),Cell.new(LispKeyword.new( "html-transitional" ),Cell.new(LispKeyword.new( "html-4.01-transitional" )))),Cell.new(false,Cell.new("<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.01 Transitional//EN\"
245
+ \"http://www.w3.org/TR/html4/loose.dtd\">
246
+ "))),Cell.new(Cell.new(Cell.new(LispKeyword.new( "frameset" ),Cell.new(LispKeyword.new( "html-frameset" ),Cell.new(LispKeyword.new( "html-4.01-frameset" )))),Cell.new(false,Cell.new("<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.01 Frameset//EN\"
247
+ \"http://www.w3.org/TR/html4/frameset.dtd\">
248
+ "))),Cell.new(Cell.new(Cell.new(LispKeyword.new( "xhtml-1.0-strict" ),Cell.new(LispKeyword.new( "xhtml-1.0" ))),Cell.new(true,Cell.new("<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Strict//EN\"
249
+ \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd\">
250
+ "))),Cell.new(Cell.new(Cell.new(LispKeyword.new( "xhtml-1.0-transitional" )),Cell.new(true,Cell.new("<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Transitional//EN\"
251
+ \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd\">
252
+ "))),Cell.new(Cell.new(Cell.new(LispKeyword.new( "xhtml-1.0-frameset" )),Cell.new(true,Cell.new("<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Frameset//EN\"
253
+ \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-frameset.dtd\">
254
+ "))),Cell.new(Cell.new(Cell.new(LispKeyword.new( "xhtml-1.1" )),Cell.new(true,Cell.new("<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.1//EN\"
255
+ \"http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd\">
256
+ "))))))))))
246
257
  end
247
258
  #--------------------
248
259
 
@@ -254,8 +265,8 @@
254
265
  ___lambda = lambda { |_type|
255
266
  if (
256
267
  begin
257
- @global_lisp_binding['___gensym__10079'] = true
258
- @___gensym__10079 =
268
+ @global_lisp_binding['___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20034'] = true
269
+ @___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20034 =
259
270
  callProcedure( 'find',
260
271
  begin
261
272
  if @global_lisp_binding.has_key?('_find') then
@@ -310,9 +321,9 @@
310
321
  end ,
311
322
  Cell.new(
312
323
  begin
313
- if @global_lisp_binding.has_key?('___gensym__10079') then
314
- @___gensym__10079
315
- else raise NameError.new( "Error: undefined variable ___gensym__10079", "___gensym__10079" ) end
324
+ if @global_lisp_binding.has_key?('___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20034') then
325
+ @___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20034
326
+ else raise NameError.new( "Error: undefined variable ___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20034", "___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20034" ) end
316
327
  rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
317
328
  end
318
329
  ))
@@ -793,7 +804,7 @@
793
804
  if @global_lisp_binding.has_key?('_call_MIMARKwith_MIMARKvalues') then
794
805
  @_call_MIMARKwith_MIMARKvalues
795
806
  else raise NameError.new( "Error: undefined variable _call_MIMARKwith_MIMARKvalues", "_call_MIMARKwith_MIMARKvalues" ) end
796
- rescue => __e ; __e.set_backtrace( ["./lib/init.nnd:556"] + __e.backtrace ) ; raise __e
807
+ rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
797
808
  end ,
798
809
  Cell.new(
799
810
  Proc.new { ||
@@ -817,7 +828,7 @@
817
828
  if @global_lisp_binding.has_key?('_not') then
818
829
  @_not
819
830
  else raise NameError.new( "Error: undefined variable _not", "_not" ) end
820
- rescue => __e ; __e.set_backtrace( ["./lib/init.nnd:702"] + __e.backtrace ) ; raise __e
831
+ rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
821
832
  end ,
822
833
  Cell.new(
823
834
  callProcedure( 'null?',
@@ -899,7 +910,7 @@
899
910
  if @global_lisp_binding.has_key?('_call_MIMARKwith_MIMARKvalues') then
900
911
  @_call_MIMARKwith_MIMARKvalues
901
912
  else raise NameError.new( "Error: undefined variable _call_MIMARKwith_MIMARKvalues", "_call_MIMARKwith_MIMARKvalues" ) end
902
- rescue => __e ; __e.set_backtrace( ["./lib/init.nnd:556"] + __e.backtrace ) ; raise __e
913
+ rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
903
914
  end ,
904
915
  Cell.new(
905
916
  Proc.new { ||
@@ -944,7 +955,8 @@
944
955
  _name
945
956
  rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:131"] + __e.backtrace ) ; raise __e
946
957
  end ,Cell.new(
947
- "\n>"
958
+ "
959
+ >"
948
960
  )))))))))
949
961
  }
950
962
  )))
@@ -1033,7 +1045,7 @@
1033
1045
  if @global_lisp_binding.has_key?('_cons') then
1034
1046
  @_cons
1035
1047
  else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1036
- rescue => __e ; __e.set_backtrace( ["./lib/init.nnd:698"] + __e.backtrace ) ; raise __e
1048
+ rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1037
1049
  end ,
1038
1050
  Cell.new(
1039
1051
  :"begin" ,Cell.new(
@@ -1060,7 +1072,7 @@
1060
1072
  if @global_lisp_binding.has_key?('_not') then
1061
1073
  @_not
1062
1074
  else raise NameError.new( "Error: undefined variable _not", "_not" ) end
1063
- rescue => __e ; __e.set_backtrace( ["./lib/init.nnd:702"] + __e.backtrace ) ; raise __e
1075
+ rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1064
1076
  end ,
1065
1077
  Cell.new(
1066
1078
  callProcedure( 'eq?',
@@ -1157,7 +1169,7 @@
1157
1169
  if @global_lisp_binding.has_key?('_cons') then
1158
1170
  @_cons
1159
1171
  else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1160
- rescue => __e ; __e.set_backtrace( ["./lib/init.nnd:698"] + __e.backtrace ) ; raise __e
1172
+ rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1161
1173
  end ,
1162
1174
  Cell.new(
1163
1175
  :"define" ,Cell.new(
@@ -1166,7 +1178,7 @@
1166
1178
  if @global_lisp_binding.has_key?('_cons') then
1167
1179
  @_cons
1168
1180
  else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1169
- rescue => __e ; __e.set_backtrace( ["./lib/init.nnd:698"] + __e.backtrace ) ; raise __e
1181
+ rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1170
1182
  end ,
1171
1183
  Cell.new(
1172
1184
  callProcedure( 'make-scheme-name',
@@ -1194,7 +1206,7 @@
1194
1206
  if @global_lisp_binding.has_key?('_cons') then
1195
1207
  @_cons
1196
1208
  else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1197
- rescue => __e ; __e.set_backtrace( ["./lib/init.nnd:698"] + __e.backtrace ) ; raise __e
1209
+ rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1198
1210
  end ,
1199
1211
  Cell.new(
1200
1212
  callProcedure( 'cons',
@@ -1202,7 +1214,7 @@
1202
1214
  if @global_lisp_binding.has_key?('_cons') then
1203
1215
  @_cons
1204
1216
  else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1205
- rescue => __e ; __e.set_backtrace( ["./lib/init.nnd:698"] + __e.backtrace ) ; raise __e
1217
+ rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1206
1218
  end ,
1207
1219
  Cell.new(
1208
1220
  :"make-html-element" ,Cell.new(
@@ -1211,7 +1223,7 @@
1211
1223
  if @global_lisp_binding.has_key?('_cons') then
1212
1224
  @_cons
1213
1225
  else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1214
- rescue => __e ; __e.set_backtrace( ["./lib/init.nnd:698"] + __e.backtrace ) ; raise __e
1226
+ rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1215
1227
  end ,
1216
1228
  Cell.new(
1217
1229
  callProcedure( 'cons',
@@ -1219,7 +1231,7 @@
1219
1231
  if @global_lisp_binding.has_key?('_cons') then
1220
1232
  @_cons
1221
1233
  else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1222
- rescue => __e ; __e.set_backtrace( ["./lib/init.nnd:698"] + __e.backtrace ) ; raise __e
1234
+ rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1223
1235
  end ,
1224
1236
  Cell.new(
1225
1237
  :"quote" ,Cell.new(
@@ -1228,7 +1240,7 @@
1228
1240
  if @global_lisp_binding.has_key?('_cons') then
1229
1241
  @_cons
1230
1242
  else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1231
- rescue => __e ; __e.set_backtrace( ["./lib/init.nnd:698"] + __e.backtrace ) ; raise __e
1243
+ rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1232
1244
  end ,
1233
1245
  Cell.new(
1234
1246
  callProcedure( 'car',
@@ -1259,7 +1271,7 @@
1259
1271
  if @global_lisp_binding.has_key?('_cons') then
1260
1272
  @_cons
1261
1273
  else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1262
- rescue => __e ; __e.set_backtrace( ["./lib/init.nnd:698"] + __e.backtrace ) ; raise __e
1274
+ rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1263
1275
  end ,
1264
1276
  Cell.new(
1265
1277
  :"export" ,Cell.new(
@@ -1268,7 +1280,7 @@
1268
1280
  if @global_lisp_binding.has_key?('_cons') then
1269
1281
  @_cons
1270
1282
  else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1271
- rescue => __e ; __e.set_backtrace( ["./lib/init.nnd:698"] + __e.backtrace ) ; raise __e
1283
+ rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1272
1284
  end ,
1273
1285
  Cell.new(
1274
1286
  callProcedure( 'make-scheme-name',
@@ -1338,7 +1350,7 @@
1338
1350
  if @global_lisp_binding.has_key?('_cons') then
1339
1351
  @_cons
1340
1352
  else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1341
- rescue => __e ; __e.set_backtrace( ["./lib/init.nnd:698"] + __e.backtrace ) ; raise __e
1353
+ rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1342
1354
  end ,
1343
1355
  Cell.new(
1344
1356
  :"define" ,Cell.new(
@@ -1347,7 +1359,7 @@
1347
1359
  if @global_lisp_binding.has_key?('_cons') then
1348
1360
  @_cons
1349
1361
  else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1350
- rescue => __e ; __e.set_backtrace( ["./lib/init.nnd:698"] + __e.backtrace ) ; raise __e
1362
+ rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1351
1363
  end ,
1352
1364
  Cell.new(
1353
1365
  callProcedure( 'make-scheme-name',
@@ -1375,7 +1387,7 @@
1375
1387
  if @global_lisp_binding.has_key?('_cons') then
1376
1388
  @_cons
1377
1389
  else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1378
- rescue => __e ; __e.set_backtrace( ["./lib/init.nnd:698"] + __e.backtrace ) ; raise __e
1390
+ rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1379
1391
  end ,
1380
1392
  Cell.new(
1381
1393
  callProcedure( 'cons',
@@ -1383,7 +1395,7 @@
1383
1395
  if @global_lisp_binding.has_key?('_cons') then
1384
1396
  @_cons
1385
1397
  else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1386
- rescue => __e ; __e.set_backtrace( ["./lib/init.nnd:698"] + __e.backtrace ) ; raise __e
1398
+ rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1387
1399
  end ,
1388
1400
  Cell.new(
1389
1401
  :"make-html-element" ,Cell.new(
@@ -1392,7 +1404,7 @@
1392
1404
  if @global_lisp_binding.has_key?('_cons') then
1393
1405
  @_cons
1394
1406
  else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1395
- rescue => __e ; __e.set_backtrace( ["./lib/init.nnd:698"] + __e.backtrace ) ; raise __e
1407
+ rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1396
1408
  end ,
1397
1409
  Cell.new(
1398
1410
  callProcedure( 'cons',
@@ -1400,7 +1412,7 @@
1400
1412
  if @global_lisp_binding.has_key?('_cons') then
1401
1413
  @_cons
1402
1414
  else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1403
- rescue => __e ; __e.set_backtrace( ["./lib/init.nnd:698"] + __e.backtrace ) ; raise __e
1415
+ rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1404
1416
  end ,
1405
1417
  Cell.new(
1406
1418
  :"quote" ,Cell.new(
@@ -1409,7 +1421,7 @@
1409
1421
  if @global_lisp_binding.has_key?('_cons') then
1410
1422
  @_cons
1411
1423
  else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1412
- rescue => __e ; __e.set_backtrace( ["./lib/init.nnd:698"] + __e.backtrace ) ; raise __e
1424
+ rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1413
1425
  end ,
1414
1426
  Cell.new(
1415
1427
  callProcedure( 'car',
@@ -1440,7 +1452,7 @@
1440
1452
  if @global_lisp_binding.has_key?('_cons') then
1441
1453
  @_cons
1442
1454
  else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1443
- rescue => __e ; __e.set_backtrace( ["./lib/init.nnd:698"] + __e.backtrace ) ; raise __e
1455
+ rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1444
1456
  end ,
1445
1457
  Cell.new(
1446
1458
  :"export" ,Cell.new(
@@ -1449,7 +1461,7 @@
1449
1461
  if @global_lisp_binding.has_key?('_cons') then
1450
1462
  @_cons
1451
1463
  else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1452
- rescue => __e ; __e.set_backtrace( ["./lib/init.nnd:698"] + __e.backtrace ) ; raise __e
1464
+ rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1453
1465
  end ,
1454
1466
  Cell.new(
1455
1467
  callProcedure( 'make-scheme-name',
@@ -3157,3 +3169,8 @@
3157
3169
  ))
3158
3170
  end
3159
3171
  end
3172
+
3173
+
3174
+ # -------------------------------------------------------
3175
+ # [EOF]
3176
+ # -------------------------------------------------------
data/lib/text/tree.nndc CHANGED
@@ -1,3 +1,7 @@
1
+ #
2
+ # This file is nendo's compiled library file.
3
+ # generated "nendo -c src" command.
4
+ #
1
5
 
2
6
  callProcedure( 'require',
3
7
  begin
@@ -219,3 +223,8 @@
219
223
  end
220
224
  }
221
225
  end
226
+
227
+
228
+ # -------------------------------------------------------
229
+ # [EOF]
230
+ # -------------------------------------------------------
metadata CHANGED
@@ -1,12 +1,7 @@
1
1
  --- !ruby/object:Gem::Specification
2
2
  name: nendo
3
3
  version: !ruby/object:Gem::Version
4
- prerelease: false
5
- segments:
6
- - 0
7
- - 3
8
- - 1
9
- version: 0.3.1
4
+ version: 0.3.2
10
5
  platform: ruby
11
6
  authors:
12
7
  - Kiyoka Nishiyama
@@ -14,7 +9,7 @@ autorequire:
14
9
  bindir: bin
15
10
  cert_chain: []
16
11
 
17
- date: 2010-04-30 00:00:00 +09:00
12
+ date: 2010-05-27 00:00:00 +09:00
18
13
  default_executable: nendo
19
14
  dependencies: []
20
15
 
@@ -35,6 +30,7 @@ files:
35
30
  - example/fact.nnd
36
31
  - example/fizzbuzz1.nnd
37
32
  - example/html-lite-sample.nnd
33
+ - example/nqueen.nnd
38
34
  - example/scratch.nnd
39
35
  - example/tak.nnd
40
36
  - lib/debug/syslog.nnd
@@ -60,20 +56,18 @@ required_ruby_version: !ruby/object:Gem::Requirement
60
56
  requirements:
61
57
  - - ">="
62
58
  - !ruby/object:Gem::Version
63
- segments:
64
- - 0
65
59
  version: "0"
60
+ version:
66
61
  required_rubygems_version: !ruby/object:Gem::Requirement
67
62
  requirements:
68
63
  - - ">="
69
64
  - !ruby/object:Gem::Version
70
- segments:
71
- - 0
72
65
  version: "0"
66
+ version:
73
67
  requirements: []
74
68
 
75
69
  rubyforge_project:
76
- rubygems_version: 1.3.6
70
+ rubygems_version: 1.3.4
77
71
  signing_key:
78
72
  specification_version: 3
79
73
  summary: Nendo is a dialect of Lisp.