nendo 0.3.3 → 0.3.4

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 (25) hide show
  1. data/bin/nendo +2 -2
  2. data/emacs/nendo-mode.el +126 -0
  3. data/example/KyotoCabinet/kcbench.rb +20 -0
  4. data/example/KyotoCabinet/kcbench1.nnd +29 -0
  5. data/example/KyotoCabinet/kcbench2.nnd +30 -0
  6. data/example/KyotoCabinet/kcbench3.nnd +31 -0
  7. data/example/export-lisp-functions.rb +20 -0
  8. data/example/scratch.nnd +8 -17
  9. data/example/tak_ruby_version.rb +14 -0
  10. data/lib/debug/syslog.nndc +1 -1
  11. data/lib/init.nnd +334 -202
  12. data/lib/init.nndc +5691 -4128
  13. data/lib/nendo/test.nnd +165 -0
  14. data/lib/nendo/test.nndc +1635 -0
  15. data/lib/nendo.rb +248 -37
  16. data/lib/srfi-1.nnd +15 -24
  17. data/lib/srfi-1.nndc +1247 -1607
  18. data/lib/text/html-lite.nnd +1 -1
  19. data/lib/text/html-lite.nndc +171 -171
  20. data/lib/text/tree.nndc +2 -2
  21. data/test/nendo_spec.rb +1281 -981
  22. data/test/nendo_util.nnd +98 -0
  23. data/test/srfi-1-test.nnd +28 -0
  24. data/test/textlib.nnd +24 -0
  25. metadata +13 -3
data/lib/text/html-lite.nndc CHANGED
@@ -5,7 +5,7 @@
5
5
 
6
6
  trampCall(
7
7
  begin
8
- def self._html_MIMARKescape_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
8
+ def self._html_MIMARKescape_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
9
9
  @global_lisp_binding['_html_MIMARKescape'] = self.method( :_html_MIMARKescape_METHOD )
10
10
  @_html_MIMARKescape =
11
11
  trampCall(
@@ -195,7 +195,7 @@ trampCall(
195
195
 
196
196
  trampCall(
197
197
  begin
198
- def self._html_MIMARKescape_MIMARKstring_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
198
+ def self._html_MIMARKescape_MIMARKstring_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
199
199
  @global_lisp_binding['_html_MIMARKescape_MIMARKstring'] = self.method( :_html_MIMARKescape_MIMARKstring_METHOD )
200
200
  @_html_MIMARKescape_MIMARKstring =
201
201
  trampCall(
@@ -231,7 +231,7 @@ trampCall(
231
231
  end ,
232
232
  Cell.new(
233
233
  begin
234
- trampCall(_string).split(
234
+ trampCall(_string).to_s.split(
235
235
  ""
236
236
  )
237
237
  rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:52"] + __e.backtrace ) ; raise __e
@@ -248,7 +248,7 @@ trampCall(
248
248
 
249
249
  trampCall(
250
250
  begin
251
- def self.__ASMARKdoctype_MIMARKalist_ASMARK_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
251
+ def self.__ASMARKdoctype_MIMARKalist_ASMARK_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
252
252
  @global_lisp_binding['__ASMARKdoctype_MIMARKalist_ASMARK'] = self.method( :__ASMARKdoctype_MIMARKalist_ASMARK_METHOD )
253
253
  @__ASMARKdoctype_MIMARKalist_ASMARK =
254
254
  trampCall(
@@ -274,7 +274,7 @@ trampCall(
274
274
 
275
275
  trampCall(
276
276
  begin
277
- def self._html_MIMARKdoctype_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
277
+ def self._html_MIMARKdoctype_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
278
278
  @global_lisp_binding['_html_MIMARKdoctype'] = self.method( :_html_MIMARKdoctype_METHOD )
279
279
  @_html_MIMARKdoctype =
280
280
  trampCall(
@@ -283,7 +283,7 @@ trampCall(
283
283
  ___lambda = lambda { |_type|
284
284
  if (
285
285
  begin
286
- def self.___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20034_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
286
+ def self.___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20034_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
287
287
  @global_lisp_binding['___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20034'] = self.method( :___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20034_METHOD )
288
288
  @___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20034 =
289
289
  trampCall(
@@ -397,7 +397,7 @@ trampCall(
397
397
 
398
398
  trampCall(
399
399
  begin
400
- def self._make_MIMARKhtml_MIMARKelement_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
400
+ def self._make_MIMARKhtml_MIMARKelement_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
401
401
  @global_lisp_binding['_make_MIMARKhtml_MIMARKelement'] = self.method( :_make_MIMARKhtml_MIMARKelement_METHOD )
402
402
  @_make_MIMARKhtml_MIMARKelement =
403
403
  trampCall(
@@ -1018,7 +1018,7 @@ trampCall(
1018
1018
 
1019
1019
  trampCall(
1020
1020
  begin
1021
- def self._define_MIMARKhtml_MIMARKelements_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1021
+ def self._define_MIMARKhtml_MIMARKelements_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1022
1022
  @global_lisp_binding['_define_MIMARKhtml_MIMARKelements'] = self.method( :_define_MIMARKhtml_MIMARKelements_METHOD )
1023
1023
  @_define_MIMARKhtml_MIMARKelements =
1024
1024
  trampCall(
@@ -1526,7 +1526,7 @@ trampCall(
1526
1526
  ))))
1527
1527
  end
1528
1528
  else
1529
- Nil.new
1529
+ Cell.new()
1530
1530
  end
1531
1531
  end
1532
1532
  end
@@ -1560,7 +1560,7 @@ trampCall(
1560
1560
  trampCall(
1561
1561
  begin
1562
1562
  begin
1563
- def self._html_COMARKtt_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1563
+ def self._html_COMARKtt_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1564
1564
  @global_lisp_binding['_html_COMARKtt'] = self.method( :_html_COMARKtt_METHOD )
1565
1565
  @_html_COMARKtt =
1566
1566
  trampCall(
@@ -1568,7 +1568,7 @@ trampCall(
1568
1568
  )
1569
1569
  end
1570
1570
  begin
1571
- def self._html_COMARKtt_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1571
+ def self._html_COMARKtt_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1572
1572
  @global_lisp_binding['_html_COMARKtt'] = self.method( :_html_COMARKtt_METHOD )
1573
1573
  @_html_COMARKtt =
1574
1574
  trampCall(
@@ -1585,7 +1585,7 @@ trampCall(
1585
1585
  )
1586
1586
  end
1587
1587
  begin
1588
- def self._html_COMARKi_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1588
+ def self._html_COMARKi_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1589
1589
  @global_lisp_binding['_html_COMARKi'] = self.method( :_html_COMARKi_METHOD )
1590
1590
  @_html_COMARKi =
1591
1591
  trampCall(
@@ -1593,7 +1593,7 @@ trampCall(
1593
1593
  )
1594
1594
  end
1595
1595
  begin
1596
- def self._html_COMARKi_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1596
+ def self._html_COMARKi_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1597
1597
  @global_lisp_binding['_html_COMARKi'] = self.method( :_html_COMARKi_METHOD )
1598
1598
  @_html_COMARKi =
1599
1599
  trampCall(
@@ -1610,7 +1610,7 @@ trampCall(
1610
1610
  )
1611
1611
  end
1612
1612
  begin
1613
- def self._html_COMARKb_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1613
+ def self._html_COMARKb_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1614
1614
  @global_lisp_binding['_html_COMARKb'] = self.method( :_html_COMARKb_METHOD )
1615
1615
  @_html_COMARKb =
1616
1616
  trampCall(
@@ -1618,7 +1618,7 @@ trampCall(
1618
1618
  )
1619
1619
  end
1620
1620
  begin
1621
- def self._html_COMARKb_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1621
+ def self._html_COMARKb_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1622
1622
  @global_lisp_binding['_html_COMARKb'] = self.method( :_html_COMARKb_METHOD )
1623
1623
  @_html_COMARKb =
1624
1624
  trampCall(
@@ -1635,7 +1635,7 @@ trampCall(
1635
1635
  )
1636
1636
  end
1637
1637
  begin
1638
- def self._html_COMARKbig_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1638
+ def self._html_COMARKbig_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1639
1639
  @global_lisp_binding['_html_COMARKbig'] = self.method( :_html_COMARKbig_METHOD )
1640
1640
  @_html_COMARKbig =
1641
1641
  trampCall(
@@ -1643,7 +1643,7 @@ trampCall(
1643
1643
  )
1644
1644
  end
1645
1645
  begin
1646
- def self._html_COMARKbig_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1646
+ def self._html_COMARKbig_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1647
1647
  @global_lisp_binding['_html_COMARKbig'] = self.method( :_html_COMARKbig_METHOD )
1648
1648
  @_html_COMARKbig =
1649
1649
  trampCall(
@@ -1660,7 +1660,7 @@ trampCall(
1660
1660
  )
1661
1661
  end
1662
1662
  begin
1663
- def self._html_COMARKsmall_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1663
+ def self._html_COMARKsmall_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1664
1664
  @global_lisp_binding['_html_COMARKsmall'] = self.method( :_html_COMARKsmall_METHOD )
1665
1665
  @_html_COMARKsmall =
1666
1666
  trampCall(
@@ -1668,7 +1668,7 @@ trampCall(
1668
1668
  )
1669
1669
  end
1670
1670
  begin
1671
- def self._html_COMARKsmall_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1671
+ def self._html_COMARKsmall_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1672
1672
  @global_lisp_binding['_html_COMARKsmall'] = self.method( :_html_COMARKsmall_METHOD )
1673
1673
  @_html_COMARKsmall =
1674
1674
  trampCall(
@@ -1691,7 +1691,7 @@ trampCall(
1691
1691
  trampCall(
1692
1692
  begin
1693
1693
  begin
1694
- def self._html_COMARKem_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1694
+ def self._html_COMARKem_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1695
1695
  @global_lisp_binding['_html_COMARKem'] = self.method( :_html_COMARKem_METHOD )
1696
1696
  @_html_COMARKem =
1697
1697
  trampCall(
@@ -1699,7 +1699,7 @@ trampCall(
1699
1699
  )
1700
1700
  end
1701
1701
  begin
1702
- def self._html_COMARKem_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1702
+ def self._html_COMARKem_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1703
1703
  @global_lisp_binding['_html_COMARKem'] = self.method( :_html_COMARKem_METHOD )
1704
1704
  @_html_COMARKem =
1705
1705
  trampCall(
@@ -1716,7 +1716,7 @@ trampCall(
1716
1716
  )
1717
1717
  end
1718
1718
  begin
1719
- def self._html_COMARKstrong_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1719
+ def self._html_COMARKstrong_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1720
1720
  @global_lisp_binding['_html_COMARKstrong'] = self.method( :_html_COMARKstrong_METHOD )
1721
1721
  @_html_COMARKstrong =
1722
1722
  trampCall(
@@ -1724,7 +1724,7 @@ trampCall(
1724
1724
  )
1725
1725
  end
1726
1726
  begin
1727
- def self._html_COMARKstrong_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1727
+ def self._html_COMARKstrong_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1728
1728
  @global_lisp_binding['_html_COMARKstrong'] = self.method( :_html_COMARKstrong_METHOD )
1729
1729
  @_html_COMARKstrong =
1730
1730
  trampCall(
@@ -1741,7 +1741,7 @@ trampCall(
1741
1741
  )
1742
1742
  end
1743
1743
  begin
1744
- def self._html_COMARKdfn_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1744
+ def self._html_COMARKdfn_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1745
1745
  @global_lisp_binding['_html_COMARKdfn'] = self.method( :_html_COMARKdfn_METHOD )
1746
1746
  @_html_COMARKdfn =
1747
1747
  trampCall(
@@ -1749,7 +1749,7 @@ trampCall(
1749
1749
  )
1750
1750
  end
1751
1751
  begin
1752
- def self._html_COMARKdfn_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1752
+ def self._html_COMARKdfn_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1753
1753
  @global_lisp_binding['_html_COMARKdfn'] = self.method( :_html_COMARKdfn_METHOD )
1754
1754
  @_html_COMARKdfn =
1755
1755
  trampCall(
@@ -1766,7 +1766,7 @@ trampCall(
1766
1766
  )
1767
1767
  end
1768
1768
  begin
1769
- def self._html_COMARKcode_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1769
+ def self._html_COMARKcode_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1770
1770
  @global_lisp_binding['_html_COMARKcode'] = self.method( :_html_COMARKcode_METHOD )
1771
1771
  @_html_COMARKcode =
1772
1772
  trampCall(
@@ -1774,7 +1774,7 @@ trampCall(
1774
1774
  )
1775
1775
  end
1776
1776
  begin
1777
- def self._html_COMARKcode_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1777
+ def self._html_COMARKcode_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1778
1778
  @global_lisp_binding['_html_COMARKcode'] = self.method( :_html_COMARKcode_METHOD )
1779
1779
  @_html_COMARKcode =
1780
1780
  trampCall(
@@ -1791,7 +1791,7 @@ trampCall(
1791
1791
  )
1792
1792
  end
1793
1793
  begin
1794
- def self._html_COMARKsamp_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1794
+ def self._html_COMARKsamp_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1795
1795
  @global_lisp_binding['_html_COMARKsamp'] = self.method( :_html_COMARKsamp_METHOD )
1796
1796
  @_html_COMARKsamp =
1797
1797
  trampCall(
@@ -1799,7 +1799,7 @@ trampCall(
1799
1799
  )
1800
1800
  end
1801
1801
  begin
1802
- def self._html_COMARKsamp_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1802
+ def self._html_COMARKsamp_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1803
1803
  @global_lisp_binding['_html_COMARKsamp'] = self.method( :_html_COMARKsamp_METHOD )
1804
1804
  @_html_COMARKsamp =
1805
1805
  trampCall(
@@ -1816,7 +1816,7 @@ trampCall(
1816
1816
  )
1817
1817
  end
1818
1818
  begin
1819
- def self._html_COMARKkbd_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1819
+ def self._html_COMARKkbd_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1820
1820
  @global_lisp_binding['_html_COMARKkbd'] = self.method( :_html_COMARKkbd_METHOD )
1821
1821
  @_html_COMARKkbd =
1822
1822
  trampCall(
@@ -1824,7 +1824,7 @@ trampCall(
1824
1824
  )
1825
1825
  end
1826
1826
  begin
1827
- def self._html_COMARKkbd_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1827
+ def self._html_COMARKkbd_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1828
1828
  @global_lisp_binding['_html_COMARKkbd'] = self.method( :_html_COMARKkbd_METHOD )
1829
1829
  @_html_COMARKkbd =
1830
1830
  trampCall(
@@ -1841,7 +1841,7 @@ trampCall(
1841
1841
  )
1842
1842
  end
1843
1843
  begin
1844
- def self._html_COMARKvar_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1844
+ def self._html_COMARKvar_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1845
1845
  @global_lisp_binding['_html_COMARKvar'] = self.method( :_html_COMARKvar_METHOD )
1846
1846
  @_html_COMARKvar =
1847
1847
  trampCall(
@@ -1849,7 +1849,7 @@ trampCall(
1849
1849
  )
1850
1850
  end
1851
1851
  begin
1852
- def self._html_COMARKvar_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1852
+ def self._html_COMARKvar_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1853
1853
  @global_lisp_binding['_html_COMARKvar'] = self.method( :_html_COMARKvar_METHOD )
1854
1854
  @_html_COMARKvar =
1855
1855
  trampCall(
@@ -1866,7 +1866,7 @@ trampCall(
1866
1866
  )
1867
1867
  end
1868
1868
  begin
1869
- def self._html_COMARKcite_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1869
+ def self._html_COMARKcite_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1870
1870
  @global_lisp_binding['_html_COMARKcite'] = self.method( :_html_COMARKcite_METHOD )
1871
1871
  @_html_COMARKcite =
1872
1872
  trampCall(
@@ -1874,7 +1874,7 @@ trampCall(
1874
1874
  )
1875
1875
  end
1876
1876
  begin
1877
- def self._html_COMARKcite_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1877
+ def self._html_COMARKcite_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1878
1878
  @global_lisp_binding['_html_COMARKcite'] = self.method( :_html_COMARKcite_METHOD )
1879
1879
  @_html_COMARKcite =
1880
1880
  trampCall(
@@ -1891,7 +1891,7 @@ trampCall(
1891
1891
  )
1892
1892
  end
1893
1893
  begin
1894
- def self._html_COMARKabbr_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1894
+ def self._html_COMARKabbr_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1895
1895
  @global_lisp_binding['_html_COMARKabbr'] = self.method( :_html_COMARKabbr_METHOD )
1896
1896
  @_html_COMARKabbr =
1897
1897
  trampCall(
@@ -1899,7 +1899,7 @@ trampCall(
1899
1899
  )
1900
1900
  end
1901
1901
  begin
1902
- def self._html_COMARKabbr_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1902
+ def self._html_COMARKabbr_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1903
1903
  @global_lisp_binding['_html_COMARKabbr'] = self.method( :_html_COMARKabbr_METHOD )
1904
1904
  @_html_COMARKabbr =
1905
1905
  trampCall(
@@ -1916,7 +1916,7 @@ trampCall(
1916
1916
  )
1917
1917
  end
1918
1918
  begin
1919
- def self._html_COMARKacronym_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1919
+ def self._html_COMARKacronym_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1920
1920
  @global_lisp_binding['_html_COMARKacronym'] = self.method( :_html_COMARKacronym_METHOD )
1921
1921
  @_html_COMARKacronym =
1922
1922
  trampCall(
@@ -1924,7 +1924,7 @@ trampCall(
1924
1924
  )
1925
1925
  end
1926
1926
  begin
1927
- def self._html_COMARKacronym_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1927
+ def self._html_COMARKacronym_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1928
1928
  @global_lisp_binding['_html_COMARKacronym'] = self.method( :_html_COMARKacronym_METHOD )
1929
1929
  @_html_COMARKacronym =
1930
1930
  trampCall(
@@ -1947,7 +1947,7 @@ trampCall(
1947
1947
  trampCall(
1948
1948
  begin
1949
1949
  begin
1950
- def self._html_COMARKsub_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1950
+ def self._html_COMARKsub_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1951
1951
  @global_lisp_binding['_html_COMARKsub'] = self.method( :_html_COMARKsub_METHOD )
1952
1952
  @_html_COMARKsub =
1953
1953
  trampCall(
@@ -1955,7 +1955,7 @@ trampCall(
1955
1955
  )
1956
1956
  end
1957
1957
  begin
1958
- def self._html_COMARKsub_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1958
+ def self._html_COMARKsub_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1959
1959
  @global_lisp_binding['_html_COMARKsub'] = self.method( :_html_COMARKsub_METHOD )
1960
1960
  @_html_COMARKsub =
1961
1961
  trampCall(
@@ -1972,7 +1972,7 @@ trampCall(
1972
1972
  )
1973
1973
  end
1974
1974
  begin
1975
- def self._html_COMARKsup_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1975
+ def self._html_COMARKsup_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1976
1976
  @global_lisp_binding['_html_COMARKsup'] = self.method( :_html_COMARKsup_METHOD )
1977
1977
  @_html_COMARKsup =
1978
1978
  trampCall(
@@ -1980,7 +1980,7 @@ trampCall(
1980
1980
  )
1981
1981
  end
1982
1982
  begin
1983
- def self._html_COMARKsup_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
1983
+ def self._html_COMARKsup_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1984
1984
  @global_lisp_binding['_html_COMARKsup'] = self.method( :_html_COMARKsup_METHOD )
1985
1985
  @_html_COMARKsup =
1986
1986
  trampCall(
@@ -1997,7 +1997,7 @@ trampCall(
1997
1997
  )
1998
1998
  end
1999
1999
  begin
2000
- def self._html_COMARKspan_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2000
+ def self._html_COMARKspan_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2001
2001
  @global_lisp_binding['_html_COMARKspan'] = self.method( :_html_COMARKspan_METHOD )
2002
2002
  @_html_COMARKspan =
2003
2003
  trampCall(
@@ -2005,7 +2005,7 @@ trampCall(
2005
2005
  )
2006
2006
  end
2007
2007
  begin
2008
- def self._html_COMARKspan_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2008
+ def self._html_COMARKspan_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2009
2009
  @global_lisp_binding['_html_COMARKspan'] = self.method( :_html_COMARKspan_METHOD )
2010
2010
  @_html_COMARKspan =
2011
2011
  trampCall(
@@ -2022,7 +2022,7 @@ trampCall(
2022
2022
  )
2023
2023
  end
2024
2024
  begin
2025
- def self._html_COMARKbdo_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2025
+ def self._html_COMARKbdo_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2026
2026
  @global_lisp_binding['_html_COMARKbdo'] = self.method( :_html_COMARKbdo_METHOD )
2027
2027
  @_html_COMARKbdo =
2028
2028
  trampCall(
@@ -2030,7 +2030,7 @@ trampCall(
2030
2030
  )
2031
2031
  end
2032
2032
  begin
2033
- def self._html_COMARKbdo_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2033
+ def self._html_COMARKbdo_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2034
2034
  @global_lisp_binding['_html_COMARKbdo'] = self.method( :_html_COMARKbdo_METHOD )
2035
2035
  @_html_COMARKbdo =
2036
2036
  trampCall(
@@ -2047,7 +2047,7 @@ trampCall(
2047
2047
  )
2048
2048
  end
2049
2049
  begin
2050
- def self._html_COMARKbr_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2050
+ def self._html_COMARKbr_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2051
2051
  @global_lisp_binding['_html_COMARKbr'] = self.method( :_html_COMARKbr_METHOD )
2052
2052
  @_html_COMARKbr =
2053
2053
  trampCall(
@@ -2055,7 +2055,7 @@ trampCall(
2055
2055
  )
2056
2056
  end
2057
2057
  begin
2058
- def self._html_COMARKbr_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2058
+ def self._html_COMARKbr_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2059
2059
  @global_lisp_binding['_html_COMARKbr'] = self.method( :_html_COMARKbr_METHOD )
2060
2060
  @_html_COMARKbr =
2061
2061
  trampCall(
@@ -2080,7 +2080,7 @@ trampCall(
2080
2080
  trampCall(
2081
2081
  begin
2082
2082
  begin
2083
- def self._html_COMARKbody_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2083
+ def self._html_COMARKbody_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2084
2084
  @global_lisp_binding['_html_COMARKbody'] = self.method( :_html_COMARKbody_METHOD )
2085
2085
  @_html_COMARKbody =
2086
2086
  trampCall(
@@ -2088,7 +2088,7 @@ trampCall(
2088
2088
  )
2089
2089
  end
2090
2090
  begin
2091
- def self._html_COMARKbody_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2091
+ def self._html_COMARKbody_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2092
2092
  @global_lisp_binding['_html_COMARKbody'] = self.method( :_html_COMARKbody_METHOD )
2093
2093
  @_html_COMARKbody =
2094
2094
  trampCall(
@@ -2105,7 +2105,7 @@ trampCall(
2105
2105
  )
2106
2106
  end
2107
2107
  begin
2108
- def self._html_COMARKaddress_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2108
+ def self._html_COMARKaddress_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2109
2109
  @global_lisp_binding['_html_COMARKaddress'] = self.method( :_html_COMARKaddress_METHOD )
2110
2110
  @_html_COMARKaddress =
2111
2111
  trampCall(
@@ -2113,7 +2113,7 @@ trampCall(
2113
2113
  )
2114
2114
  end
2115
2115
  begin
2116
- def self._html_COMARKaddress_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2116
+ def self._html_COMARKaddress_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2117
2117
  @global_lisp_binding['_html_COMARKaddress'] = self.method( :_html_COMARKaddress_METHOD )
2118
2118
  @_html_COMARKaddress =
2119
2119
  trampCall(
@@ -2130,7 +2130,7 @@ trampCall(
2130
2130
  )
2131
2131
  end
2132
2132
  begin
2133
- def self._html_COMARKdiv_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2133
+ def self._html_COMARKdiv_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2134
2134
  @global_lisp_binding['_html_COMARKdiv'] = self.method( :_html_COMARKdiv_METHOD )
2135
2135
  @_html_COMARKdiv =
2136
2136
  trampCall(
@@ -2138,7 +2138,7 @@ trampCall(
2138
2138
  )
2139
2139
  end
2140
2140
  begin
2141
- def self._html_COMARKdiv_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2141
+ def self._html_COMARKdiv_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2142
2142
  @global_lisp_binding['_html_COMARKdiv'] = self.method( :_html_COMARKdiv_METHOD )
2143
2143
  @_html_COMARKdiv =
2144
2144
  trampCall(
@@ -2161,7 +2161,7 @@ trampCall(
2161
2161
  trampCall(
2162
2162
  begin
2163
2163
  begin
2164
- def self._html_COMARKa_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2164
+ def self._html_COMARKa_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2165
2165
  @global_lisp_binding['_html_COMARKa'] = self.method( :_html_COMARKa_METHOD )
2166
2166
  @_html_COMARKa =
2167
2167
  trampCall(
@@ -2169,7 +2169,7 @@ trampCall(
2169
2169
  )
2170
2170
  end
2171
2171
  begin
2172
- def self._html_COMARKa_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2172
+ def self._html_COMARKa_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2173
2173
  @global_lisp_binding['_html_COMARKa'] = self.method( :_html_COMARKa_METHOD )
2174
2174
  @_html_COMARKa =
2175
2175
  trampCall(
@@ -2192,7 +2192,7 @@ trampCall(
2192
2192
  trampCall(
2193
2193
  begin
2194
2194
  begin
2195
- def self._html_COMARKmap_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2195
+ def self._html_COMARKmap_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2196
2196
  @global_lisp_binding['_html_COMARKmap'] = self.method( :_html_COMARKmap_METHOD )
2197
2197
  @_html_COMARKmap =
2198
2198
  trampCall(
@@ -2200,7 +2200,7 @@ trampCall(
2200
2200
  )
2201
2201
  end
2202
2202
  begin
2203
- def self._html_COMARKmap_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2203
+ def self._html_COMARKmap_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2204
2204
  @global_lisp_binding['_html_COMARKmap'] = self.method( :_html_COMARKmap_METHOD )
2205
2205
  @_html_COMARKmap =
2206
2206
  trampCall(
@@ -2217,7 +2217,7 @@ trampCall(
2217
2217
  )
2218
2218
  end
2219
2219
  begin
2220
- def self._html_COMARKarea_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2220
+ def self._html_COMARKarea_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2221
2221
  @global_lisp_binding['_html_COMARKarea'] = self.method( :_html_COMARKarea_METHOD )
2222
2222
  @_html_COMARKarea =
2223
2223
  trampCall(
@@ -2225,7 +2225,7 @@ trampCall(
2225
2225
  )
2226
2226
  end
2227
2227
  begin
2228
- def self._html_COMARKarea_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2228
+ def self._html_COMARKarea_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2229
2229
  @global_lisp_binding['_html_COMARKarea'] = self.method( :_html_COMARKarea_METHOD )
2230
2230
  @_html_COMARKarea =
2231
2231
  trampCall(
@@ -2250,7 +2250,7 @@ trampCall(
2250
2250
  trampCall(
2251
2251
  begin
2252
2252
  begin
2253
- def self._html_COMARKlink_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2253
+ def self._html_COMARKlink_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2254
2254
  @global_lisp_binding['_html_COMARKlink'] = self.method( :_html_COMARKlink_METHOD )
2255
2255
  @_html_COMARKlink =
2256
2256
  trampCall(
@@ -2258,7 +2258,7 @@ trampCall(
2258
2258
  )
2259
2259
  end
2260
2260
  begin
2261
- def self._html_COMARKlink_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2261
+ def self._html_COMARKlink_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2262
2262
  @global_lisp_binding['_html_COMARKlink'] = self.method( :_html_COMARKlink_METHOD )
2263
2263
  @_html_COMARKlink =
2264
2264
  trampCall(
@@ -2283,7 +2283,7 @@ trampCall(
2283
2283
  trampCall(
2284
2284
  begin
2285
2285
  begin
2286
- def self._html_COMARKimg_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2286
+ def self._html_COMARKimg_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2287
2287
  @global_lisp_binding['_html_COMARKimg'] = self.method( :_html_COMARKimg_METHOD )
2288
2288
  @_html_COMARKimg =
2289
2289
  trampCall(
@@ -2291,7 +2291,7 @@ trampCall(
2291
2291
  )
2292
2292
  end
2293
2293
  begin
2294
- def self._html_COMARKimg_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2294
+ def self._html_COMARKimg_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2295
2295
  @global_lisp_binding['_html_COMARKimg'] = self.method( :_html_COMARKimg_METHOD )
2296
2296
  @_html_COMARKimg =
2297
2297
  trampCall(
@@ -2316,7 +2316,7 @@ trampCall(
2316
2316
  trampCall(
2317
2317
  begin
2318
2318
  begin
2319
- def self._html_COMARKobject_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2319
+ def self._html_COMARKobject_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2320
2320
  @global_lisp_binding['_html_COMARKobject'] = self.method( :_html_COMARKobject_METHOD )
2321
2321
  @_html_COMARKobject =
2322
2322
  trampCall(
@@ -2324,7 +2324,7 @@ trampCall(
2324
2324
  )
2325
2325
  end
2326
2326
  begin
2327
- def self._html_COMARKobject_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2327
+ def self._html_COMARKobject_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2328
2328
  @global_lisp_binding['_html_COMARKobject'] = self.method( :_html_COMARKobject_METHOD )
2329
2329
  @_html_COMARKobject =
2330
2330
  trampCall(
@@ -2341,7 +2341,7 @@ trampCall(
2341
2341
  )
2342
2342
  end
2343
2343
  begin
2344
- def self._html_COMARKparam_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2344
+ def self._html_COMARKparam_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2345
2345
  @global_lisp_binding['_html_COMARKparam'] = self.method( :_html_COMARKparam_METHOD )
2346
2346
  @_html_COMARKparam =
2347
2347
  trampCall(
@@ -2349,7 +2349,7 @@ trampCall(
2349
2349
  )
2350
2350
  end
2351
2351
  begin
2352
- def self._html_COMARKparam_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2352
+ def self._html_COMARKparam_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2353
2353
  @global_lisp_binding['_html_COMARKparam'] = self.method( :_html_COMARKparam_METHOD )
2354
2354
  @_html_COMARKparam =
2355
2355
  trampCall(
@@ -2374,7 +2374,7 @@ trampCall(
2374
2374
  trampCall(
2375
2375
  begin
2376
2376
  begin
2377
- def self._html_COMARKhr_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2377
+ def self._html_COMARKhr_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2378
2378
  @global_lisp_binding['_html_COMARKhr'] = self.method( :_html_COMARKhr_METHOD )
2379
2379
  @_html_COMARKhr =
2380
2380
  trampCall(
@@ -2382,7 +2382,7 @@ trampCall(
2382
2382
  )
2383
2383
  end
2384
2384
  begin
2385
- def self._html_COMARKhr_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2385
+ def self._html_COMARKhr_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2386
2386
  @global_lisp_binding['_html_COMARKhr'] = self.method( :_html_COMARKhr_METHOD )
2387
2387
  @_html_COMARKhr =
2388
2388
  trampCall(
@@ -2407,7 +2407,7 @@ trampCall(
2407
2407
  trampCall(
2408
2408
  begin
2409
2409
  begin
2410
- def self._html_COMARKp_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2410
+ def self._html_COMARKp_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2411
2411
  @global_lisp_binding['_html_COMARKp'] = self.method( :_html_COMARKp_METHOD )
2412
2412
  @_html_COMARKp =
2413
2413
  trampCall(
@@ -2415,7 +2415,7 @@ trampCall(
2415
2415
  )
2416
2416
  end
2417
2417
  begin
2418
- def self._html_COMARKp_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2418
+ def self._html_COMARKp_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2419
2419
  @global_lisp_binding['_html_COMARKp'] = self.method( :_html_COMARKp_METHOD )
2420
2420
  @_html_COMARKp =
2421
2421
  trampCall(
@@ -2438,7 +2438,7 @@ trampCall(
2438
2438
  trampCall(
2439
2439
  begin
2440
2440
  begin
2441
- def self._html_COMARKh1_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2441
+ def self._html_COMARKh1_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2442
2442
  @global_lisp_binding['_html_COMARKh1'] = self.method( :_html_COMARKh1_METHOD )
2443
2443
  @_html_COMARKh1 =
2444
2444
  trampCall(
@@ -2446,7 +2446,7 @@ trampCall(
2446
2446
  )
2447
2447
  end
2448
2448
  begin
2449
- def self._html_COMARKh1_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2449
+ def self._html_COMARKh1_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2450
2450
  @global_lisp_binding['_html_COMARKh1'] = self.method( :_html_COMARKh1_METHOD )
2451
2451
  @_html_COMARKh1 =
2452
2452
  trampCall(
@@ -2463,7 +2463,7 @@ trampCall(
2463
2463
  )
2464
2464
  end
2465
2465
  begin
2466
- def self._html_COMARKh2_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2466
+ def self._html_COMARKh2_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2467
2467
  @global_lisp_binding['_html_COMARKh2'] = self.method( :_html_COMARKh2_METHOD )
2468
2468
  @_html_COMARKh2 =
2469
2469
  trampCall(
@@ -2471,7 +2471,7 @@ trampCall(
2471
2471
  )
2472
2472
  end
2473
2473
  begin
2474
- def self._html_COMARKh2_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2474
+ def self._html_COMARKh2_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2475
2475
  @global_lisp_binding['_html_COMARKh2'] = self.method( :_html_COMARKh2_METHOD )
2476
2476
  @_html_COMARKh2 =
2477
2477
  trampCall(
@@ -2488,7 +2488,7 @@ trampCall(
2488
2488
  )
2489
2489
  end
2490
2490
  begin
2491
- def self._html_COMARKh3_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2491
+ def self._html_COMARKh3_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2492
2492
  @global_lisp_binding['_html_COMARKh3'] = self.method( :_html_COMARKh3_METHOD )
2493
2493
  @_html_COMARKh3 =
2494
2494
  trampCall(
@@ -2496,7 +2496,7 @@ trampCall(
2496
2496
  )
2497
2497
  end
2498
2498
  begin
2499
- def self._html_COMARKh3_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2499
+ def self._html_COMARKh3_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2500
2500
  @global_lisp_binding['_html_COMARKh3'] = self.method( :_html_COMARKh3_METHOD )
2501
2501
  @_html_COMARKh3 =
2502
2502
  trampCall(
@@ -2513,7 +2513,7 @@ trampCall(
2513
2513
  )
2514
2514
  end
2515
2515
  begin
2516
- def self._html_COMARKh4_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2516
+ def self._html_COMARKh4_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2517
2517
  @global_lisp_binding['_html_COMARKh4'] = self.method( :_html_COMARKh4_METHOD )
2518
2518
  @_html_COMARKh4 =
2519
2519
  trampCall(
@@ -2521,7 +2521,7 @@ trampCall(
2521
2521
  )
2522
2522
  end
2523
2523
  begin
2524
- def self._html_COMARKh4_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2524
+ def self._html_COMARKh4_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2525
2525
  @global_lisp_binding['_html_COMARKh4'] = self.method( :_html_COMARKh4_METHOD )
2526
2526
  @_html_COMARKh4 =
2527
2527
  trampCall(
@@ -2538,7 +2538,7 @@ trampCall(
2538
2538
  )
2539
2539
  end
2540
2540
  begin
2541
- def self._html_COMARKh5_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2541
+ def self._html_COMARKh5_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2542
2542
  @global_lisp_binding['_html_COMARKh5'] = self.method( :_html_COMARKh5_METHOD )
2543
2543
  @_html_COMARKh5 =
2544
2544
  trampCall(
@@ -2546,7 +2546,7 @@ trampCall(
2546
2546
  )
2547
2547
  end
2548
2548
  begin
2549
- def self._html_COMARKh5_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2549
+ def self._html_COMARKh5_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2550
2550
  @global_lisp_binding['_html_COMARKh5'] = self.method( :_html_COMARKh5_METHOD )
2551
2551
  @_html_COMARKh5 =
2552
2552
  trampCall(
@@ -2563,7 +2563,7 @@ trampCall(
2563
2563
  )
2564
2564
  end
2565
2565
  begin
2566
- def self._html_COMARKh6_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2566
+ def self._html_COMARKh6_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2567
2567
  @global_lisp_binding['_html_COMARKh6'] = self.method( :_html_COMARKh6_METHOD )
2568
2568
  @_html_COMARKh6 =
2569
2569
  trampCall(
@@ -2571,7 +2571,7 @@ trampCall(
2571
2571
  )
2572
2572
  end
2573
2573
  begin
2574
- def self._html_COMARKh6_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2574
+ def self._html_COMARKh6_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2575
2575
  @global_lisp_binding['_html_COMARKh6'] = self.method( :_html_COMARKh6_METHOD )
2576
2576
  @_html_COMARKh6 =
2577
2577
  trampCall(
@@ -2594,7 +2594,7 @@ trampCall(
2594
2594
  trampCall(
2595
2595
  begin
2596
2596
  begin
2597
- def self._html_COMARKpre_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2597
+ def self._html_COMARKpre_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2598
2598
  @global_lisp_binding['_html_COMARKpre'] = self.method( :_html_COMARKpre_METHOD )
2599
2599
  @_html_COMARKpre =
2600
2600
  trampCall(
@@ -2602,7 +2602,7 @@ trampCall(
2602
2602
  )
2603
2603
  end
2604
2604
  begin
2605
- def self._html_COMARKpre_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2605
+ def self._html_COMARKpre_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2606
2606
  @global_lisp_binding['_html_COMARKpre'] = self.method( :_html_COMARKpre_METHOD )
2607
2607
  @_html_COMARKpre =
2608
2608
  trampCall(
@@ -2625,7 +2625,7 @@ trampCall(
2625
2625
  trampCall(
2626
2626
  begin
2627
2627
  begin
2628
- def self._html_COMARKq_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2628
+ def self._html_COMARKq_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2629
2629
  @global_lisp_binding['_html_COMARKq'] = self.method( :_html_COMARKq_METHOD )
2630
2630
  @_html_COMARKq =
2631
2631
  trampCall(
@@ -2633,7 +2633,7 @@ trampCall(
2633
2633
  )
2634
2634
  end
2635
2635
  begin
2636
- def self._html_COMARKq_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2636
+ def self._html_COMARKq_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2637
2637
  @global_lisp_binding['_html_COMARKq'] = self.method( :_html_COMARKq_METHOD )
2638
2638
  @_html_COMARKq =
2639
2639
  trampCall(
@@ -2656,7 +2656,7 @@ trampCall(
2656
2656
  trampCall(
2657
2657
  begin
2658
2658
  begin
2659
- def self._html_COMARKblockquote_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2659
+ def self._html_COMARKblockquote_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2660
2660
  @global_lisp_binding['_html_COMARKblockquote'] = self.method( :_html_COMARKblockquote_METHOD )
2661
2661
  @_html_COMARKblockquote =
2662
2662
  trampCall(
@@ -2664,7 +2664,7 @@ trampCall(
2664
2664
  )
2665
2665
  end
2666
2666
  begin
2667
- def self._html_COMARKblockquote_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2667
+ def self._html_COMARKblockquote_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2668
2668
  @global_lisp_binding['_html_COMARKblockquote'] = self.method( :_html_COMARKblockquote_METHOD )
2669
2669
  @_html_COMARKblockquote =
2670
2670
  trampCall(
@@ -2687,7 +2687,7 @@ trampCall(
2687
2687
  trampCall(
2688
2688
  begin
2689
2689
  begin
2690
- def self._html_COMARKins_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2690
+ def self._html_COMARKins_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2691
2691
  @global_lisp_binding['_html_COMARKins'] = self.method( :_html_COMARKins_METHOD )
2692
2692
  @_html_COMARKins =
2693
2693
  trampCall(
@@ -2695,7 +2695,7 @@ trampCall(
2695
2695
  )
2696
2696
  end
2697
2697
  begin
2698
- def self._html_COMARKins_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2698
+ def self._html_COMARKins_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2699
2699
  @global_lisp_binding['_html_COMARKins'] = self.method( :_html_COMARKins_METHOD )
2700
2700
  @_html_COMARKins =
2701
2701
  trampCall(
@@ -2712,7 +2712,7 @@ trampCall(
2712
2712
  )
2713
2713
  end
2714
2714
  begin
2715
- def self._html_COMARKdel_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2715
+ def self._html_COMARKdel_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2716
2716
  @global_lisp_binding['_html_COMARKdel'] = self.method( :_html_COMARKdel_METHOD )
2717
2717
  @_html_COMARKdel =
2718
2718
  trampCall(
@@ -2720,7 +2720,7 @@ trampCall(
2720
2720
  )
2721
2721
  end
2722
2722
  begin
2723
- def self._html_COMARKdel_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2723
+ def self._html_COMARKdel_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2724
2724
  @global_lisp_binding['_html_COMARKdel'] = self.method( :_html_COMARKdel_METHOD )
2725
2725
  @_html_COMARKdel =
2726
2726
  trampCall(
@@ -2743,7 +2743,7 @@ trampCall(
2743
2743
  trampCall(
2744
2744
  begin
2745
2745
  begin
2746
- def self._html_COMARKdl_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2746
+ def self._html_COMARKdl_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2747
2747
  @global_lisp_binding['_html_COMARKdl'] = self.method( :_html_COMARKdl_METHOD )
2748
2748
  @_html_COMARKdl =
2749
2749
  trampCall(
@@ -2751,7 +2751,7 @@ trampCall(
2751
2751
  )
2752
2752
  end
2753
2753
  begin
2754
- def self._html_COMARKdl_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2754
+ def self._html_COMARKdl_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2755
2755
  @global_lisp_binding['_html_COMARKdl'] = self.method( :_html_COMARKdl_METHOD )
2756
2756
  @_html_COMARKdl =
2757
2757
  trampCall(
@@ -2768,7 +2768,7 @@ trampCall(
2768
2768
  )
2769
2769
  end
2770
2770
  begin
2771
- def self._html_COMARKdt_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2771
+ def self._html_COMARKdt_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2772
2772
  @global_lisp_binding['_html_COMARKdt'] = self.method( :_html_COMARKdt_METHOD )
2773
2773
  @_html_COMARKdt =
2774
2774
  trampCall(
@@ -2776,7 +2776,7 @@ trampCall(
2776
2776
  )
2777
2777
  end
2778
2778
  begin
2779
- def self._html_COMARKdt_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2779
+ def self._html_COMARKdt_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2780
2780
  @global_lisp_binding['_html_COMARKdt'] = self.method( :_html_COMARKdt_METHOD )
2781
2781
  @_html_COMARKdt =
2782
2782
  trampCall(
@@ -2793,7 +2793,7 @@ trampCall(
2793
2793
  )
2794
2794
  end
2795
2795
  begin
2796
- def self._html_COMARKdd_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2796
+ def self._html_COMARKdd_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2797
2797
  @global_lisp_binding['_html_COMARKdd'] = self.method( :_html_COMARKdd_METHOD )
2798
2798
  @_html_COMARKdd =
2799
2799
  trampCall(
@@ -2801,7 +2801,7 @@ trampCall(
2801
2801
  )
2802
2802
  end
2803
2803
  begin
2804
- def self._html_COMARKdd_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2804
+ def self._html_COMARKdd_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2805
2805
  @global_lisp_binding['_html_COMARKdd'] = self.method( :_html_COMARKdd_METHOD )
2806
2806
  @_html_COMARKdd =
2807
2807
  trampCall(
@@ -2818,7 +2818,7 @@ trampCall(
2818
2818
  )
2819
2819
  end
2820
2820
  begin
2821
- def self._html_COMARKol_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2821
+ def self._html_COMARKol_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2822
2822
  @global_lisp_binding['_html_COMARKol'] = self.method( :_html_COMARKol_METHOD )
2823
2823
  @_html_COMARKol =
2824
2824
  trampCall(
@@ -2826,7 +2826,7 @@ trampCall(
2826
2826
  )
2827
2827
  end
2828
2828
  begin
2829
- def self._html_COMARKol_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2829
+ def self._html_COMARKol_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2830
2830
  @global_lisp_binding['_html_COMARKol'] = self.method( :_html_COMARKol_METHOD )
2831
2831
  @_html_COMARKol =
2832
2832
  trampCall(
@@ -2843,7 +2843,7 @@ trampCall(
2843
2843
  )
2844
2844
  end
2845
2845
  begin
2846
- def self._html_COMARKul_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2846
+ def self._html_COMARKul_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2847
2847
  @global_lisp_binding['_html_COMARKul'] = self.method( :_html_COMARKul_METHOD )
2848
2848
  @_html_COMARKul =
2849
2849
  trampCall(
@@ -2851,7 +2851,7 @@ trampCall(
2851
2851
  )
2852
2852
  end
2853
2853
  begin
2854
- def self._html_COMARKul_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2854
+ def self._html_COMARKul_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2855
2855
  @global_lisp_binding['_html_COMARKul'] = self.method( :_html_COMARKul_METHOD )
2856
2856
  @_html_COMARKul =
2857
2857
  trampCall(
@@ -2868,7 +2868,7 @@ trampCall(
2868
2868
  )
2869
2869
  end
2870
2870
  begin
2871
- def self._html_COMARKli_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2871
+ def self._html_COMARKli_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2872
2872
  @global_lisp_binding['_html_COMARKli'] = self.method( :_html_COMARKli_METHOD )
2873
2873
  @_html_COMARKli =
2874
2874
  trampCall(
@@ -2876,7 +2876,7 @@ trampCall(
2876
2876
  )
2877
2877
  end
2878
2878
  begin
2879
- def self._html_COMARKli_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2879
+ def self._html_COMARKli_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2880
2880
  @global_lisp_binding['_html_COMARKli'] = self.method( :_html_COMARKli_METHOD )
2881
2881
  @_html_COMARKli =
2882
2882
  trampCall(
@@ -2899,7 +2899,7 @@ trampCall(
2899
2899
  trampCall(
2900
2900
  begin
2901
2901
  begin
2902
- def self._html_COMARKform_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2902
+ def self._html_COMARKform_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2903
2903
  @global_lisp_binding['_html_COMARKform'] = self.method( :_html_COMARKform_METHOD )
2904
2904
  @_html_COMARKform =
2905
2905
  trampCall(
@@ -2907,7 +2907,7 @@ trampCall(
2907
2907
  )
2908
2908
  end
2909
2909
  begin
2910
- def self._html_COMARKform_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2910
+ def self._html_COMARKform_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2911
2911
  @global_lisp_binding['_html_COMARKform'] = self.method( :_html_COMARKform_METHOD )
2912
2912
  @_html_COMARKform =
2913
2913
  trampCall(
@@ -2924,7 +2924,7 @@ trampCall(
2924
2924
  )
2925
2925
  end
2926
2926
  begin
2927
- def self._html_COMARKlabel_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2927
+ def self._html_COMARKlabel_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2928
2928
  @global_lisp_binding['_html_COMARKlabel'] = self.method( :_html_COMARKlabel_METHOD )
2929
2929
  @_html_COMARKlabel =
2930
2930
  trampCall(
@@ -2932,7 +2932,7 @@ trampCall(
2932
2932
  )
2933
2933
  end
2934
2934
  begin
2935
- def self._html_COMARKlabel_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2935
+ def self._html_COMARKlabel_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2936
2936
  @global_lisp_binding['_html_COMARKlabel'] = self.method( :_html_COMARKlabel_METHOD )
2937
2937
  @_html_COMARKlabel =
2938
2938
  trampCall(
@@ -2949,7 +2949,7 @@ trampCall(
2949
2949
  )
2950
2950
  end
2951
2951
  begin
2952
- def self._html_COMARKinput_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2952
+ def self._html_COMARKinput_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2953
2953
  @global_lisp_binding['_html_COMARKinput'] = self.method( :_html_COMARKinput_METHOD )
2954
2954
  @_html_COMARKinput =
2955
2955
  trampCall(
@@ -2957,7 +2957,7 @@ trampCall(
2957
2957
  )
2958
2958
  end
2959
2959
  begin
2960
- def self._html_COMARKinput_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2960
+ def self._html_COMARKinput_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2961
2961
  @global_lisp_binding['_html_COMARKinput'] = self.method( :_html_COMARKinput_METHOD )
2962
2962
  @_html_COMARKinput =
2963
2963
  trampCall(
@@ -2976,7 +2976,7 @@ trampCall(
2976
2976
  )
2977
2977
  end
2978
2978
  begin
2979
- def self._html_COMARKselect_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2979
+ def self._html_COMARKselect_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2980
2980
  @global_lisp_binding['_html_COMARKselect'] = self.method( :_html_COMARKselect_METHOD )
2981
2981
  @_html_COMARKselect =
2982
2982
  trampCall(
@@ -2984,7 +2984,7 @@ trampCall(
2984
2984
  )
2985
2985
  end
2986
2986
  begin
2987
- def self._html_COMARKselect_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
2987
+ def self._html_COMARKselect_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2988
2988
  @global_lisp_binding['_html_COMARKselect'] = self.method( :_html_COMARKselect_METHOD )
2989
2989
  @_html_COMARKselect =
2990
2990
  trampCall(
@@ -3001,7 +3001,7 @@ trampCall(
3001
3001
  )
3002
3002
  end
3003
3003
  begin
3004
- def self._html_COMARKoptgroup_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3004
+ def self._html_COMARKoptgroup_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3005
3005
  @global_lisp_binding['_html_COMARKoptgroup'] = self.method( :_html_COMARKoptgroup_METHOD )
3006
3006
  @_html_COMARKoptgroup =
3007
3007
  trampCall(
@@ -3009,7 +3009,7 @@ trampCall(
3009
3009
  )
3010
3010
  end
3011
3011
  begin
3012
- def self._html_COMARKoptgroup_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3012
+ def self._html_COMARKoptgroup_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3013
3013
  @global_lisp_binding['_html_COMARKoptgroup'] = self.method( :_html_COMARKoptgroup_METHOD )
3014
3014
  @_html_COMARKoptgroup =
3015
3015
  trampCall(
@@ -3026,7 +3026,7 @@ trampCall(
3026
3026
  )
3027
3027
  end
3028
3028
  begin
3029
- def self._html_COMARKoption_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3029
+ def self._html_COMARKoption_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3030
3030
  @global_lisp_binding['_html_COMARKoption'] = self.method( :_html_COMARKoption_METHOD )
3031
3031
  @_html_COMARKoption =
3032
3032
  trampCall(
@@ -3034,7 +3034,7 @@ trampCall(
3034
3034
  )
3035
3035
  end
3036
3036
  begin
3037
- def self._html_COMARKoption_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3037
+ def self._html_COMARKoption_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3038
3038
  @global_lisp_binding['_html_COMARKoption'] = self.method( :_html_COMARKoption_METHOD )
3039
3039
  @_html_COMARKoption =
3040
3040
  trampCall(
@@ -3051,7 +3051,7 @@ trampCall(
3051
3051
  )
3052
3052
  end
3053
3053
  begin
3054
- def self._html_COMARKtextarea_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3054
+ def self._html_COMARKtextarea_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3055
3055
  @global_lisp_binding['_html_COMARKtextarea'] = self.method( :_html_COMARKtextarea_METHOD )
3056
3056
  @_html_COMARKtextarea =
3057
3057
  trampCall(
@@ -3059,7 +3059,7 @@ trampCall(
3059
3059
  )
3060
3060
  end
3061
3061
  begin
3062
- def self._html_COMARKtextarea_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3062
+ def self._html_COMARKtextarea_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3063
3063
  @global_lisp_binding['_html_COMARKtextarea'] = self.method( :_html_COMARKtextarea_METHOD )
3064
3064
  @_html_COMARKtextarea =
3065
3065
  trampCall(
@@ -3076,7 +3076,7 @@ trampCall(
3076
3076
  )
3077
3077
  end
3078
3078
  begin
3079
- def self._html_COMARKfieldset_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3079
+ def self._html_COMARKfieldset_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3080
3080
  @global_lisp_binding['_html_COMARKfieldset'] = self.method( :_html_COMARKfieldset_METHOD )
3081
3081
  @_html_COMARKfieldset =
3082
3082
  trampCall(
@@ -3084,7 +3084,7 @@ trampCall(
3084
3084
  )
3085
3085
  end
3086
3086
  begin
3087
- def self._html_COMARKfieldset_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3087
+ def self._html_COMARKfieldset_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3088
3088
  @global_lisp_binding['_html_COMARKfieldset'] = self.method( :_html_COMARKfieldset_METHOD )
3089
3089
  @_html_COMARKfieldset =
3090
3090
  trampCall(
@@ -3101,7 +3101,7 @@ trampCall(
3101
3101
  )
3102
3102
  end
3103
3103
  begin
3104
- def self._html_COMARKlegend_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3104
+ def self._html_COMARKlegend_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3105
3105
  @global_lisp_binding['_html_COMARKlegend'] = self.method( :_html_COMARKlegend_METHOD )
3106
3106
  @_html_COMARKlegend =
3107
3107
  trampCall(
@@ -3109,7 +3109,7 @@ trampCall(
3109
3109
  )
3110
3110
  end
3111
3111
  begin
3112
- def self._html_COMARKlegend_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3112
+ def self._html_COMARKlegend_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3113
3113
  @global_lisp_binding['_html_COMARKlegend'] = self.method( :_html_COMARKlegend_METHOD )
3114
3114
  @_html_COMARKlegend =
3115
3115
  trampCall(
@@ -3126,7 +3126,7 @@ trampCall(
3126
3126
  )
3127
3127
  end
3128
3128
  begin
3129
- def self._html_COMARKbutton_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3129
+ def self._html_COMARKbutton_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3130
3130
  @global_lisp_binding['_html_COMARKbutton'] = self.method( :_html_COMARKbutton_METHOD )
3131
3131
  @_html_COMARKbutton =
3132
3132
  trampCall(
@@ -3134,7 +3134,7 @@ trampCall(
3134
3134
  )
3135
3135
  end
3136
3136
  begin
3137
- def self._html_COMARKbutton_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3137
+ def self._html_COMARKbutton_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3138
3138
  @global_lisp_binding['_html_COMARKbutton'] = self.method( :_html_COMARKbutton_METHOD )
3139
3139
  @_html_COMARKbutton =
3140
3140
  trampCall(
@@ -3157,7 +3157,7 @@ trampCall(
3157
3157
  trampCall(
3158
3158
  begin
3159
3159
  begin
3160
- def self._html_COMARKtable_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3160
+ def self._html_COMARKtable_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3161
3161
  @global_lisp_binding['_html_COMARKtable'] = self.method( :_html_COMARKtable_METHOD )
3162
3162
  @_html_COMARKtable =
3163
3163
  trampCall(
@@ -3165,7 +3165,7 @@ trampCall(
3165
3165
  )
3166
3166
  end
3167
3167
  begin
3168
- def self._html_COMARKtable_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3168
+ def self._html_COMARKtable_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3169
3169
  @global_lisp_binding['_html_COMARKtable'] = self.method( :_html_COMARKtable_METHOD )
3170
3170
  @_html_COMARKtable =
3171
3171
  trampCall(
@@ -3182,7 +3182,7 @@ trampCall(
3182
3182
  )
3183
3183
  end
3184
3184
  begin
3185
- def self._html_COMARKcaption_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3185
+ def self._html_COMARKcaption_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3186
3186
  @global_lisp_binding['_html_COMARKcaption'] = self.method( :_html_COMARKcaption_METHOD )
3187
3187
  @_html_COMARKcaption =
3188
3188
  trampCall(
@@ -3190,7 +3190,7 @@ trampCall(
3190
3190
  )
3191
3191
  end
3192
3192
  begin
3193
- def self._html_COMARKcaption_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3193
+ def self._html_COMARKcaption_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3194
3194
  @global_lisp_binding['_html_COMARKcaption'] = self.method( :_html_COMARKcaption_METHOD )
3195
3195
  @_html_COMARKcaption =
3196
3196
  trampCall(
@@ -3207,7 +3207,7 @@ trampCall(
3207
3207
  )
3208
3208
  end
3209
3209
  begin
3210
- def self._html_COMARKthead_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3210
+ def self._html_COMARKthead_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3211
3211
  @global_lisp_binding['_html_COMARKthead'] = self.method( :_html_COMARKthead_METHOD )
3212
3212
  @_html_COMARKthead =
3213
3213
  trampCall(
@@ -3215,7 +3215,7 @@ trampCall(
3215
3215
  )
3216
3216
  end
3217
3217
  begin
3218
- def self._html_COMARKthead_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3218
+ def self._html_COMARKthead_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3219
3219
  @global_lisp_binding['_html_COMARKthead'] = self.method( :_html_COMARKthead_METHOD )
3220
3220
  @_html_COMARKthead =
3221
3221
  trampCall(
@@ -3232,7 +3232,7 @@ trampCall(
3232
3232
  )
3233
3233
  end
3234
3234
  begin
3235
- def self._html_COMARKtfoot_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3235
+ def self._html_COMARKtfoot_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3236
3236
  @global_lisp_binding['_html_COMARKtfoot'] = self.method( :_html_COMARKtfoot_METHOD )
3237
3237
  @_html_COMARKtfoot =
3238
3238
  trampCall(
@@ -3240,7 +3240,7 @@ trampCall(
3240
3240
  )
3241
3241
  end
3242
3242
  begin
3243
- def self._html_COMARKtfoot_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3243
+ def self._html_COMARKtfoot_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3244
3244
  @global_lisp_binding['_html_COMARKtfoot'] = self.method( :_html_COMARKtfoot_METHOD )
3245
3245
  @_html_COMARKtfoot =
3246
3246
  trampCall(
@@ -3257,7 +3257,7 @@ trampCall(
3257
3257
  )
3258
3258
  end
3259
3259
  begin
3260
- def self._html_COMARKtbody_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3260
+ def self._html_COMARKtbody_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3261
3261
  @global_lisp_binding['_html_COMARKtbody'] = self.method( :_html_COMARKtbody_METHOD )
3262
3262
  @_html_COMARKtbody =
3263
3263
  trampCall(
@@ -3265,7 +3265,7 @@ trampCall(
3265
3265
  )
3266
3266
  end
3267
3267
  begin
3268
- def self._html_COMARKtbody_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3268
+ def self._html_COMARKtbody_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3269
3269
  @global_lisp_binding['_html_COMARKtbody'] = self.method( :_html_COMARKtbody_METHOD )
3270
3270
  @_html_COMARKtbody =
3271
3271
  trampCall(
@@ -3282,7 +3282,7 @@ trampCall(
3282
3282
  )
3283
3283
  end
3284
3284
  begin
3285
- def self._html_COMARKcolgroup_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3285
+ def self._html_COMARKcolgroup_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3286
3286
  @global_lisp_binding['_html_COMARKcolgroup'] = self.method( :_html_COMARKcolgroup_METHOD )
3287
3287
  @_html_COMARKcolgroup =
3288
3288
  trampCall(
@@ -3290,7 +3290,7 @@ trampCall(
3290
3290
  )
3291
3291
  end
3292
3292
  begin
3293
- def self._html_COMARKcolgroup_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3293
+ def self._html_COMARKcolgroup_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3294
3294
  @global_lisp_binding['_html_COMARKcolgroup'] = self.method( :_html_COMARKcolgroup_METHOD )
3295
3295
  @_html_COMARKcolgroup =
3296
3296
  trampCall(
@@ -3307,7 +3307,7 @@ trampCall(
3307
3307
  )
3308
3308
  end
3309
3309
  begin
3310
- def self._html_COMARKcol_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3310
+ def self._html_COMARKcol_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3311
3311
  @global_lisp_binding['_html_COMARKcol'] = self.method( :_html_COMARKcol_METHOD )
3312
3312
  @_html_COMARKcol =
3313
3313
  trampCall(
@@ -3315,7 +3315,7 @@ trampCall(
3315
3315
  )
3316
3316
  end
3317
3317
  begin
3318
- def self._html_COMARKcol_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3318
+ def self._html_COMARKcol_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3319
3319
  @global_lisp_binding['_html_COMARKcol'] = self.method( :_html_COMARKcol_METHOD )
3320
3320
  @_html_COMARKcol =
3321
3321
  trampCall(
@@ -3334,7 +3334,7 @@ trampCall(
3334
3334
  )
3335
3335
  end
3336
3336
  begin
3337
- def self._html_COMARKtr_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3337
+ def self._html_COMARKtr_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3338
3338
  @global_lisp_binding['_html_COMARKtr'] = self.method( :_html_COMARKtr_METHOD )
3339
3339
  @_html_COMARKtr =
3340
3340
  trampCall(
@@ -3342,7 +3342,7 @@ trampCall(
3342
3342
  )
3343
3343
  end
3344
3344
  begin
3345
- def self._html_COMARKtr_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3345
+ def self._html_COMARKtr_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3346
3346
  @global_lisp_binding['_html_COMARKtr'] = self.method( :_html_COMARKtr_METHOD )
3347
3347
  @_html_COMARKtr =
3348
3348
  trampCall(
@@ -3359,7 +3359,7 @@ trampCall(
3359
3359
  )
3360
3360
  end
3361
3361
  begin
3362
- def self._html_COMARKth_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3362
+ def self._html_COMARKth_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3363
3363
  @global_lisp_binding['_html_COMARKth'] = self.method( :_html_COMARKth_METHOD )
3364
3364
  @_html_COMARKth =
3365
3365
  trampCall(
@@ -3367,7 +3367,7 @@ trampCall(
3367
3367
  )
3368
3368
  end
3369
3369
  begin
3370
- def self._html_COMARKth_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3370
+ def self._html_COMARKth_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3371
3371
  @global_lisp_binding['_html_COMARKth'] = self.method( :_html_COMARKth_METHOD )
3372
3372
  @_html_COMARKth =
3373
3373
  trampCall(
@@ -3384,7 +3384,7 @@ trampCall(
3384
3384
  )
3385
3385
  end
3386
3386
  begin
3387
- def self._html_COMARKtd_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3387
+ def self._html_COMARKtd_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3388
3388
  @global_lisp_binding['_html_COMARKtd'] = self.method( :_html_COMARKtd_METHOD )
3389
3389
  @_html_COMARKtd =
3390
3390
  trampCall(
@@ -3392,7 +3392,7 @@ trampCall(
3392
3392
  )
3393
3393
  end
3394
3394
  begin
3395
- def self._html_COMARKtd_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3395
+ def self._html_COMARKtd_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3396
3396
  @global_lisp_binding['_html_COMARKtd'] = self.method( :_html_COMARKtd_METHOD )
3397
3397
  @_html_COMARKtd =
3398
3398
  trampCall(
@@ -3415,7 +3415,7 @@ trampCall(
3415
3415
  trampCall(
3416
3416
  begin
3417
3417
  begin
3418
- def self._html_COMARKhead_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3418
+ def self._html_COMARKhead_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3419
3419
  @global_lisp_binding['_html_COMARKhead'] = self.method( :_html_COMARKhead_METHOD )
3420
3420
  @_html_COMARKhead =
3421
3421
  trampCall(
@@ -3423,7 +3423,7 @@ trampCall(
3423
3423
  )
3424
3424
  end
3425
3425
  begin
3426
- def self._html_COMARKhead_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3426
+ def self._html_COMARKhead_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3427
3427
  @global_lisp_binding['_html_COMARKhead'] = self.method( :_html_COMARKhead_METHOD )
3428
3428
  @_html_COMARKhead =
3429
3429
  trampCall(
@@ -3440,7 +3440,7 @@ trampCall(
3440
3440
  )
3441
3441
  end
3442
3442
  begin
3443
- def self._html_COMARKtitle_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3443
+ def self._html_COMARKtitle_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3444
3444
  @global_lisp_binding['_html_COMARKtitle'] = self.method( :_html_COMARKtitle_METHOD )
3445
3445
  @_html_COMARKtitle =
3446
3446
  trampCall(
@@ -3448,7 +3448,7 @@ trampCall(
3448
3448
  )
3449
3449
  end
3450
3450
  begin
3451
- def self._html_COMARKtitle_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3451
+ def self._html_COMARKtitle_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3452
3452
  @global_lisp_binding['_html_COMARKtitle'] = self.method( :_html_COMARKtitle_METHOD )
3453
3453
  @_html_COMARKtitle =
3454
3454
  trampCall(
@@ -3465,7 +3465,7 @@ trampCall(
3465
3465
  )
3466
3466
  end
3467
3467
  begin
3468
- def self._html_COMARKbase_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3468
+ def self._html_COMARKbase_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3469
3469
  @global_lisp_binding['_html_COMARKbase'] = self.method( :_html_COMARKbase_METHOD )
3470
3470
  @_html_COMARKbase =
3471
3471
  trampCall(
@@ -3473,7 +3473,7 @@ trampCall(
3473
3473
  )
3474
3474
  end
3475
3475
  begin
3476
- def self._html_COMARKbase_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3476
+ def self._html_COMARKbase_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3477
3477
  @global_lisp_binding['_html_COMARKbase'] = self.method( :_html_COMARKbase_METHOD )
3478
3478
  @_html_COMARKbase =
3479
3479
  trampCall(
@@ -3492,7 +3492,7 @@ trampCall(
3492
3492
  )
3493
3493
  end
3494
3494
  begin
3495
- def self._html_COMARKmeta_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3495
+ def self._html_COMARKmeta_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3496
3496
  @global_lisp_binding['_html_COMARKmeta'] = self.method( :_html_COMARKmeta_METHOD )
3497
3497
  @_html_COMARKmeta =
3498
3498
  trampCall(
@@ -3500,7 +3500,7 @@ trampCall(
3500
3500
  )
3501
3501
  end
3502
3502
  begin
3503
- def self._html_COMARKmeta_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3503
+ def self._html_COMARKmeta_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3504
3504
  @global_lisp_binding['_html_COMARKmeta'] = self.method( :_html_COMARKmeta_METHOD )
3505
3505
  @_html_COMARKmeta =
3506
3506
  trampCall(
@@ -3519,7 +3519,7 @@ trampCall(
3519
3519
  )
3520
3520
  end
3521
3521
  begin
3522
- def self._html_COMARKstyle_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3522
+ def self._html_COMARKstyle_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3523
3523
  @global_lisp_binding['_html_COMARKstyle'] = self.method( :_html_COMARKstyle_METHOD )
3524
3524
  @_html_COMARKstyle =
3525
3525
  trampCall(
@@ -3527,7 +3527,7 @@ trampCall(
3527
3527
  )
3528
3528
  end
3529
3529
  begin
3530
- def self._html_COMARKstyle_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3530
+ def self._html_COMARKstyle_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3531
3531
  @global_lisp_binding['_html_COMARKstyle'] = self.method( :_html_COMARKstyle_METHOD )
3532
3532
  @_html_COMARKstyle =
3533
3533
  trampCall(
@@ -3544,7 +3544,7 @@ trampCall(
3544
3544
  )
3545
3545
  end
3546
3546
  begin
3547
- def self._html_COMARKscript_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3547
+ def self._html_COMARKscript_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3548
3548
  @global_lisp_binding['_html_COMARKscript'] = self.method( :_html_COMARKscript_METHOD )
3549
3549
  @_html_COMARKscript =
3550
3550
  trampCall(
@@ -3552,7 +3552,7 @@ trampCall(
3552
3552
  )
3553
3553
  end
3554
3554
  begin
3555
- def self._html_COMARKscript_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3555
+ def self._html_COMARKscript_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3556
3556
  @global_lisp_binding['_html_COMARKscript'] = self.method( :_html_COMARKscript_METHOD )
3557
3557
  @_html_COMARKscript =
3558
3558
  trampCall(
@@ -3569,7 +3569,7 @@ trampCall(
3569
3569
  )
3570
3570
  end
3571
3571
  begin
3572
- def self._html_COMARKnoscript_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3572
+ def self._html_COMARKnoscript_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3573
3573
  @global_lisp_binding['_html_COMARKnoscript'] = self.method( :_html_COMARKnoscript_METHOD )
3574
3574
  @_html_COMARKnoscript =
3575
3575
  trampCall(
@@ -3577,7 +3577,7 @@ trampCall(
3577
3577
  )
3578
3578
  end
3579
3579
  begin
3580
- def self._html_COMARKnoscript_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3580
+ def self._html_COMARKnoscript_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3581
3581
  @global_lisp_binding['_html_COMARKnoscript'] = self.method( :_html_COMARKnoscript_METHOD )
3582
3582
  @_html_COMARKnoscript =
3583
3583
  trampCall(
@@ -3600,7 +3600,7 @@ trampCall(
3600
3600
  trampCall(
3601
3601
  begin
3602
3602
  begin
3603
- def self._html_COMARKhtml_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3603
+ def self._html_COMARKhtml_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3604
3604
  @global_lisp_binding['_html_COMARKhtml'] = self.method( :_html_COMARKhtml_METHOD )
3605
3605
  @_html_COMARKhtml =
3606
3606
  trampCall(
@@ -3608,7 +3608,7 @@ trampCall(
3608
3608
  )
3609
3609
  end
3610
3610
  begin
3611
- def self._html_COMARKhtml_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3611
+ def self._html_COMARKhtml_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3612
3612
  @global_lisp_binding['_html_COMARKhtml'] = self.method( :_html_COMARKhtml_METHOD )
3613
3613
  @_html_COMARKhtml =
3614
3614
  trampCall(
@@ -3631,7 +3631,7 @@ trampCall(
3631
3631
  trampCall(
3632
3632
  begin
3633
3633
  begin
3634
- def self._html_COMARKframeset_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3634
+ def self._html_COMARKframeset_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3635
3635
  @global_lisp_binding['_html_COMARKframeset'] = self.method( :_html_COMARKframeset_METHOD )
3636
3636
  @_html_COMARKframeset =
3637
3637
  trampCall(
@@ -3639,7 +3639,7 @@ trampCall(
3639
3639
  )
3640
3640
  end
3641
3641
  begin
3642
- def self._html_COMARKframeset_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3642
+ def self._html_COMARKframeset_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3643
3643
  @global_lisp_binding['_html_COMARKframeset'] = self.method( :_html_COMARKframeset_METHOD )
3644
3644
  @_html_COMARKframeset =
3645
3645
  trampCall(
@@ -3656,7 +3656,7 @@ trampCall(
3656
3656
  )
3657
3657
  end
3658
3658
  begin
3659
- def self._html_COMARKframe_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3659
+ def self._html_COMARKframe_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3660
3660
  @global_lisp_binding['_html_COMARKframe'] = self.method( :_html_COMARKframe_METHOD )
3661
3661
  @_html_COMARKframe =
3662
3662
  trampCall(
@@ -3664,7 +3664,7 @@ trampCall(
3664
3664
  )
3665
3665
  end
3666
3666
  begin
3667
- def self._html_COMARKframe_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3667
+ def self._html_COMARKframe_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3668
3668
  @global_lisp_binding['_html_COMARKframe'] = self.method( :_html_COMARKframe_METHOD )
3669
3669
  @_html_COMARKframe =
3670
3670
  trampCall(
@@ -3681,7 +3681,7 @@ trampCall(
3681
3681
  )
3682
3682
  end
3683
3683
  begin
3684
- def self._html_COMARKnoframes_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3684
+ def self._html_COMARKnoframes_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3685
3685
  @global_lisp_binding['_html_COMARKnoframes'] = self.method( :_html_COMARKnoframes_METHOD )
3686
3686
  @_html_COMARKnoframes =
3687
3687
  trampCall(
@@ -3689,7 +3689,7 @@ trampCall(
3689
3689
  )
3690
3690
  end
3691
3691
  begin
3692
- def self._html_COMARKnoframes_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3692
+ def self._html_COMARKnoframes_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3693
3693
  @global_lisp_binding['_html_COMARKnoframes'] = self.method( :_html_COMARKnoframes_METHOD )
3694
3694
  @_html_COMARKnoframes =
3695
3695
  trampCall(
@@ -3706,7 +3706,7 @@ trampCall(
3706
3706
  )
3707
3707
  end
3708
3708
  begin
3709
- def self._html_COMARKiframe_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3709
+ def self._html_COMARKiframe_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3710
3710
  @global_lisp_binding['_html_COMARKiframe'] = self.method( :_html_COMARKiframe_METHOD )
3711
3711
  @_html_COMARKiframe =
3712
3712
  trampCall(
@@ -3714,7 +3714,7 @@ trampCall(
3714
3714
  )
3715
3715
  end
3716
3716
  begin
3717
- def self._html_COMARKiframe_METHOD( origname, pred, args ) callProcedure( origname, pred, args ) end
3717
+ def self._html_COMARKiframe_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3718
3718
  @global_lisp_binding['_html_COMARKiframe'] = self.method( :_html_COMARKiframe_METHOD )
3719
3719
  @_html_COMARKiframe =
3720
3720
  trampCall(