nendo 0.3.3 → 0.3.4
Sign up to get free protection for your applications and to get access to all the features.
- data/bin/nendo +2 -2
- data/emacs/nendo-mode.el +126 -0
- data/example/KyotoCabinet/kcbench.rb +20 -0
- data/example/KyotoCabinet/kcbench1.nnd +29 -0
- data/example/KyotoCabinet/kcbench2.nnd +30 -0
- data/example/KyotoCabinet/kcbench3.nnd +31 -0
- data/example/export-lisp-functions.rb +20 -0
- data/example/scratch.nnd +8 -17
- data/example/tak_ruby_version.rb +14 -0
- data/lib/debug/syslog.nndc +1 -1
- data/lib/init.nnd +334 -202
- data/lib/init.nndc +5691 -4128
- data/lib/nendo/test.nnd +165 -0
- data/lib/nendo/test.nndc +1635 -0
- data/lib/nendo.rb +248 -37
- data/lib/srfi-1.nnd +15 -24
- data/lib/srfi-1.nndc +1247 -1607
- data/lib/text/html-lite.nnd +1 -1
- data/lib/text/html-lite.nndc +171 -171
- data/lib/text/tree.nndc +2 -2
- data/test/nendo_spec.rb +1281 -981
- data/test/nendo_util.nnd +98 -0
- data/test/srfi-1-test.nnd +28 -0
- data/test/textlib.nnd +24 -0
- metadata +13 -3
data/lib/text/tree.nndc
CHANGED
|
@@ -19,7 +19,7 @@ trampCall(
|
|
|
19
19
|
|
|
20
20
|
trampCall(
|
|
21
21
|
begin
|
|
22
|
-
def self._write_MIMARKtree_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
|
|
22
|
+
def self._write_MIMARKtree_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
|
|
23
23
|
@global_lisp_binding['_write_MIMARKtree'] = self.method( :_write_MIMARKtree_METHOD )
|
|
24
24
|
@_write_MIMARKtree =
|
|
25
25
|
trampCall(
|
|
@@ -193,7 +193,7 @@ trampCall(
|
|
|
193
193
|
|
|
194
194
|
trampCall(
|
|
195
195
|
begin
|
|
196
|
-
def self._tree_MIMARK_GTMARKstring_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
|
|
196
|
+
def self._tree_MIMARK_GTMARKstring_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
|
|
197
197
|
@global_lisp_binding['_tree_MIMARK_GTMARKstring'] = self.method( :_tree_MIMARK_GTMARKstring_METHOD )
|
|
198
198
|
@_tree_MIMARK_GTMARKstring =
|
|
199
199
|
trampCall(
|