nendo 0.5.1 → 0.5.2

This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
Files changed (21) hide show
  1. data/benchmark/benchmark.nnd +62 -3
  2. data/benchmark/nendo_benchmark_code.nnd +22 -0
  3. data/benchmark/ruby_benchmark_code.rb +9 -2
  4. data/lib/debug/syslog.nndc +6 -14
  5. data/lib/init.nnd +7 -5
  6. data/lib/init.nndc +6666 -13966
  7. data/lib/nendo.rb +144 -97
  8. data/lib/nendo/test.nndc +279 -511
  9. data/lib/rfc/json.nndc +79 -167
  10. data/lib/srfi-1.nndc +3004 -6516
  11. data/lib/srfi-2.nndc +314 -914
  12. data/lib/srfi-26.nndc +1094 -2742
  13. data/lib/text/html-lite.nndc +465 -897
  14. data/lib/text/tree.nndc +27 -67
  15. data/lib/util/combinations.nndc +1253 -3317
  16. data/lib/util/list.nnd +0 -4
  17. data/lib/util/list.nndc +1411 -3419
  18. data/lib/util/match.nndc +21344 -61648
  19. data/test/nendo-util-test.nnd +5 -13
  20. data/test/nendo_spec.rb +134 -13
  21. metadata +3 -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 ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
8
+ def self._html_MIMARKescape_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_MIMARKescape', 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(
@@ -199,7 +199,7 @@ trampCall(
199
199
 
200
200
  trampCall(
201
201
  begin
202
- def self._html_MIMARKescape_MIMARKstring_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
202
+ def self._html_MIMARKescape_MIMARKstring_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_MIMARKescape_MIMARKstring', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
203
203
  @global_lisp_binding['_html_MIMARKescape_MIMARKstring'] = self.method( :_html_MIMARKescape_MIMARKstring_METHOD )
204
204
  @_html_MIMARKescape_MIMARKstring =
205
205
  trampCall(
@@ -226,22 +226,14 @@ trampCall(
226
226
  else raise NameError.new( "Error: undefined variable _html_MIMARKescape", "_html_MIMARKescape" ) end
227
227
  rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:51"] + __e.backtrace ) ; raise __e
228
228
  end ,
229
- trampCall( self._to_MIMARKlist_METHOD( 'to-list',
229
+ _to_MIMARKlist(
230
230
  begin
231
- if @global_lisp_binding.has_key?('_to_MIMARKlist') then
232
- trampCall(@_to_MIMARKlist)
233
- else raise NameError.new( "Error: undefined variable _to_MIMARKlist", "_to_MIMARKlist" ) end
231
+ trampCall(_string).to_s.split(
232
+ ""
233
+ )
234
234
  rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:52"] + __e.backtrace ) ; raise __e
235
- end ,
236
- [
237
- begin
238
- trampCall(_string).to_s.split(
239
- ""
240
- )
241
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:52"] + __e.backtrace ) ; raise __e
242
- end
243
- ]
244
- ))
235
+ end
236
+ )
245
237
  ]
246
238
  )) ,
247
239
  ""
@@ -255,7 +247,7 @@ trampCall(
255
247
 
256
248
  trampCall(
257
249
  begin
258
- def self.__ASMARKdoctype_MIMARKalist_ASMARK_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
250
+ def self.__ASMARKdoctype_MIMARKalist_ASMARK_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '__ASMARKdoctype_MIMARKalist_ASMARK', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
259
251
  @global_lisp_binding['__ASMARKdoctype_MIMARKalist_ASMARK'] = self.method( :__ASMARKdoctype_MIMARKalist_ASMARK_METHOD )
260
252
  @__ASMARKdoctype_MIMARKalist_ASMARK =
261
253
  trampCall(
@@ -281,7 +273,7 @@ trampCall(
281
273
 
282
274
  trampCall(
283
275
  begin
284
- def self._html_MIMARKdoctype_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
276
+ def self._html_MIMARKdoctype_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_MIMARKdoctype', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
285
277
  @global_lisp_binding['_html_MIMARKdoctype'] = self.method( :_html_MIMARKdoctype_METHOD )
286
278
  @_html_MIMARKdoctype =
287
279
  trampCall(
@@ -290,7 +282,7 @@ trampCall(
290
282
  ___lambda = lambda { |_type|
291
283
  if (
292
284
  begin
293
- def self.___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20034_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
285
+ def self.___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20034_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20034', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
294
286
  @global_lisp_binding['___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20034'] = self.method( :___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20034_METHOD )
295
287
  @___gensym__7421c160c97efe3fa4b72b1f1f8b235cd6625c27_20034 =
296
288
  trampCall(
@@ -315,20 +307,12 @@ trampCall(
315
307
  trampCall(_type)
316
308
  rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:99"] + __e.backtrace ) ; raise __e
317
309
  end ,
318
- trampCall( self._car_METHOD( 'car',
310
+ _car(
319
311
  begin
320
- if @global_lisp_binding.has_key?('_car') then
321
- trampCall(@_car)
322
- else raise NameError.new( "Error: undefined variable _car", "_car" ) end
312
+ trampCall(_e)
323
313
  rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:97"] + __e.backtrace ) ; raise __e
324
- end ,
325
- [
326
- begin
327
- trampCall(_e)
328
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:97"] + __e.backtrace ) ; raise __e
329
- end
330
- ]
331
- ))
314
+ end
315
+ )
332
316
  ]
333
317
  ))
334
318
  } ,
@@ -383,20 +367,12 @@ trampCall(
383
367
  end
384
368
  } ; ___lambda.call(
385
369
  if (
386
- trampCall( self._null_QUMARK_METHOD( 'null?',
370
+ _null_QUMARK(
387
371
  begin
388
- if @global_lisp_binding.has_key?('_null_QUMARK') then
389
- trampCall(@_null_QUMARK)
390
- else raise NameError.new( "Error: undefined variable _null_QUMARK", "_null_QUMARK" ) end
391
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:94"] + __e.backtrace ) ; raise __e
392
- end ,
393
- [
394
- begin
395
- trampCall(_type)
396
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:99"] + __e.backtrace ) ; raise __e
397
- end
398
- ]
399
- ))
372
+ trampCall(_type)
373
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:99"] + __e.backtrace ) ; raise __e
374
+ end
375
+ )
400
376
  ) then
401
377
  LispKeyword.new( "html-4.01-strict" )
402
378
  else
@@ -415,7 +391,7 @@ trampCall(
415
391
 
416
392
  trampCall(
417
393
  begin
418
- def self._make_MIMARKhtml_MIMARKelement_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
394
+ def self._make_MIMARKhtml_MIMARKelement_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_make_MIMARKhtml_MIMARKelement', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
419
395
  @global_lisp_binding['_make_MIMARKhtml_MIMARKelement'] = self.method( :_make_MIMARKhtml_MIMARKelement_METHOD )
420
396
  @_make_MIMARKhtml_MIMARKelement =
421
397
  trampCall(
@@ -425,20 +401,12 @@ trampCall(
425
401
  _get_MIMARKattr =
426
402
  Proc.new { |_args,_attrs|
427
403
  if (
428
- trampCall( self._null_QUMARK_METHOD( 'null?',
404
+ _null_QUMARK(
429
405
  begin
430
- if @global_lisp_binding.has_key?('_null_QUMARK') then
431
- trampCall(@_null_QUMARK)
432
- else raise NameError.new( "Error: undefined variable _null_QUMARK", "_null_QUMARK" ) end
433
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:126"] + __e.backtrace ) ; raise __e
434
- end ,
435
- [
436
- begin
437
- trampCall(_args)
438
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:131"] + __e.backtrace ) ; raise __e
439
- end
440
- ]
441
- ))
406
+ trampCall(_args)
407
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:131"] + __e.backtrace ) ; raise __e
408
+ end
409
+ )
442
410
  ) then
443
411
  begin
444
412
  delayCall( '_values', 'values',
@@ -449,20 +417,12 @@ trampCall(
449
417
  rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:120"] + __e.backtrace ) ; raise __e
450
418
  end ,
451
419
  [
452
- trampCall( self._reverse_METHOD( 'reverse',
420
+ _reverse(
453
421
  begin
454
- if @global_lisp_binding.has_key?('_reverse') then
455
- trampCall(@_reverse)
456
- else raise NameError.new( "Error: undefined variable _reverse", "_reverse" ) end
422
+ trampCall(_attrs)
457
423
  rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:120"] + __e.backtrace ) ; raise __e
458
- end ,
459
- [
460
- begin
461
- trampCall(_attrs)
462
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:120"] + __e.backtrace ) ; raise __e
463
- end
464
- ]
465
- )) ,
424
+ end
425
+ ) ,
466
426
  begin
467
427
  trampCall(_args)
468
428
  rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:131"] + __e.backtrace ) ; raise __e
@@ -472,57 +432,25 @@ trampCall(
472
432
  end
473
433
  else
474
434
  if (
475
- trampCall( self._keyword_QUMARK_METHOD( 'keyword?',
476
- begin
477
- if @global_lisp_binding.has_key?('_keyword_QUMARK') then
478
- trampCall(@_keyword_QUMARK)
479
- else raise NameError.new( "Error: undefined variable _keyword_QUMARK", "_keyword_QUMARK" ) end
480
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:106"] + __e.backtrace ) ; raise __e
481
- end ,
482
- [
483
- trampCall( self._car_METHOD( 'car',
484
- begin
485
- if @global_lisp_binding.has_key?('_car') then
486
- trampCall(@_car)
487
- else raise NameError.new( "Error: undefined variable _car", "_car" ) end
488
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:117"] + __e.backtrace ) ; raise __e
489
- end ,
490
- [
491
- begin
492
- trampCall(_args)
493
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:131"] + __e.backtrace ) ; raise __e
494
- end
495
- ]
496
- ))
497
- ]
498
- ))
435
+ _keyword_QUMARK(
436
+ _car(
437
+ begin
438
+ trampCall(_args)
439
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:131"] + __e.backtrace ) ; raise __e
440
+ end
441
+ )
442
+ )
499
443
  ) then
500
444
  begin
501
445
  if (
502
- trampCall( self._null_QUMARK_METHOD( 'null?',
503
- begin
504
- if @global_lisp_binding.has_key?('_null_QUMARK') then
505
- trampCall(@_null_QUMARK)
506
- else raise NameError.new( "Error: undefined variable _null_QUMARK", "_null_QUMARK" ) end
507
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:126"] + __e.backtrace ) ; raise __e
508
- end ,
509
- [
510
- trampCall( self._cdr_METHOD( 'cdr',
511
- begin
512
- if @global_lisp_binding.has_key?('_cdr') then
513
- trampCall(@_cdr)
514
- else raise NameError.new( "Error: undefined variable _cdr", "_cdr" ) end
515
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:107"] + __e.backtrace ) ; raise __e
516
- end ,
517
- [
518
- begin
519
- trampCall(_args)
520
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:131"] + __e.backtrace ) ; raise __e
521
- end
522
- ]
523
- ))
524
- ]
525
- ))
446
+ _null_QUMARK(
447
+ _cdr(
448
+ begin
449
+ trampCall(_args)
450
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:131"] + __e.backtrace ) ; raise __e
451
+ end
452
+ )
453
+ )
526
454
  ) then
527
455
  begin
528
456
  delayCall( '_values', 'values',
@@ -533,45 +461,29 @@ trampCall(
533
461
  rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:120"] + __e.backtrace ) ; raise __e
534
462
  end ,
535
463
  [
536
- trampCall( self._reverse_METHOD( 'reverse',
537
- begin
538
- if @global_lisp_binding.has_key?('_reverse') then
539
- trampCall(@_reverse)
540
- else raise NameError.new( "Error: undefined variable _reverse", "_reverse" ) end
541
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:120"] + __e.backtrace ) ; raise __e
542
- end ,
543
- [
544
- trampCall( self._list_ASMARK_METHOD( 'list*',
464
+ _reverse(
465
+ trampCall( self._list_ASMARK_METHOD( 'list*',
466
+ begin
467
+ if @global_lisp_binding.has_key?('_list_ASMARK') then
468
+ trampCall(@_list_ASMARK)
469
+ else raise NameError.new( "Error: undefined variable _list_ASMARK", "_list_ASMARK" ) end
470
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:115"] + __e.backtrace ) ; raise __e
471
+ end ,
472
+ [
473
+ _car(
474
+ begin
475
+ trampCall(_args)
476
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:131"] + __e.backtrace ) ; raise __e
477
+ end
478
+ ) ,
479
+ " " ,
545
480
  begin
546
- if @global_lisp_binding.has_key?('_list_ASMARK') then
547
- trampCall(@_list_ASMARK)
548
- else raise NameError.new( "Error: undefined variable _list_ASMARK", "_list_ASMARK" ) end
549
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:115"] + __e.backtrace ) ; raise __e
550
- end ,
551
- [
552
- trampCall( self._car_METHOD( 'car',
553
- begin
554
- if @global_lisp_binding.has_key?('_car') then
555
- trampCall(@_car)
556
- else raise NameError.new( "Error: undefined variable _car", "_car" ) end
557
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:117"] + __e.backtrace ) ; raise __e
558
- end ,
559
- [
560
- begin
561
- trampCall(_args)
562
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:131"] + __e.backtrace ) ; raise __e
563
- end
564
- ]
565
- )) ,
566
- " " ,
567
- begin
568
- trampCall(_attrs)
569
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:120"] + __e.backtrace ) ; raise __e
570
- end
571
- ]
572
- ))
573
- ]
574
- )) ,
481
+ trampCall(_attrs)
482
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:120"] + __e.backtrace ) ; raise __e
483
+ end
484
+ ]
485
+ ))
486
+ ) ,
575
487
  begin
576
488
  trampCall(_args)
577
489
  rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:131"] + __e.backtrace ) ; raise __e
@@ -581,31 +493,23 @@ trampCall(
581
493
  end
582
494
  else
583
495
  if (
584
- trampCall( self._eq_QUMARK_METHOD( 'eq?',
585
- begin
586
- if @global_lisp_binding.has_key?('_eq_QUMARK') then
587
- trampCall(@_eq_QUMARK)
588
- else raise NameError.new( "Error: undefined variable _eq_QUMARK", "_eq_QUMARK" ) end
589
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:111"] + __e.backtrace ) ; raise __e
590
- end ,
591
- [
592
- trampCall( self._cadr_METHOD( 'cadr',
496
+ _eq_QUMARK(
497
+ trampCall( self._cadr_METHOD( 'cadr',
498
+ begin
499
+ if @global_lisp_binding.has_key?('_cadr') then
500
+ trampCall(@_cadr)
501
+ else raise NameError.new( "Error: undefined variable _cadr", "_cadr" ) end
502
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:116"] + __e.backtrace ) ; raise __e
503
+ end ,
504
+ [
593
505
  begin
594
- if @global_lisp_binding.has_key?('_cadr') then
595
- trampCall(@_cadr)
596
- else raise NameError.new( "Error: undefined variable _cadr", "_cadr" ) end
597
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:116"] + __e.backtrace ) ; raise __e
598
- end ,
599
- [
600
- begin
601
- trampCall(_args)
602
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:131"] + __e.backtrace ) ; raise __e
603
- end
604
- ]
605
- )) ,
606
- false
607
- ]
608
- ))
506
+ trampCall(_args)
507
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:131"] + __e.backtrace ) ; raise __e
508
+ end
509
+ ]
510
+ )) ,
511
+ false
512
+ )
609
513
  ) then
610
514
  begin
611
515
  delayCall( '_get_MIMARKattr', 'get-attr',
@@ -637,31 +541,23 @@ trampCall(
637
541
  end
638
542
  else
639
543
  if (
640
- trampCall( self._eq_QUMARK_METHOD( 'eq?',
641
- begin
642
- if @global_lisp_binding.has_key?('_eq_QUMARK') then
643
- trampCall(@_eq_QUMARK)
644
- else raise NameError.new( "Error: undefined variable _eq_QUMARK", "_eq_QUMARK" ) end
645
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:111"] + __e.backtrace ) ; raise __e
646
- end ,
647
- [
648
- trampCall( self._cadr_METHOD( 'cadr',
544
+ _eq_QUMARK(
545
+ trampCall( self._cadr_METHOD( 'cadr',
546
+ begin
547
+ if @global_lisp_binding.has_key?('_cadr') then
548
+ trampCall(@_cadr)
549
+ else raise NameError.new( "Error: undefined variable _cadr", "_cadr" ) end
550
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:116"] + __e.backtrace ) ; raise __e
551
+ end ,
552
+ [
649
553
  begin
650
- if @global_lisp_binding.has_key?('_cadr') then
651
- trampCall(@_cadr)
652
- else raise NameError.new( "Error: undefined variable _cadr", "_cadr" ) end
653
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:116"] + __e.backtrace ) ; raise __e
654
- end ,
655
- [
656
- begin
657
- trampCall(_args)
658
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:131"] + __e.backtrace ) ; raise __e
659
- end
660
- ]
661
- )) ,
662
- true
663
- ]
664
- ))
554
+ trampCall(_args)
555
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:131"] + __e.backtrace ) ; raise __e
556
+ end
557
+ ]
558
+ )) ,
559
+ true
560
+ )
665
561
  ) then
666
562
  begin
667
563
  delayCall( '_get_MIMARKattr', 'get-attr',
@@ -692,20 +588,12 @@ trampCall(
692
588
  rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:115"] + __e.backtrace ) ; raise __e
693
589
  end ,
694
590
  [
695
- trampCall( self._car_METHOD( 'car',
591
+ _car(
696
592
  begin
697
- if @global_lisp_binding.has_key?('_car') then
698
- trampCall(@_car)
699
- else raise NameError.new( "Error: undefined variable _car", "_car" ) end
700
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:117"] + __e.backtrace ) ; raise __e
701
- end ,
702
- [
703
- begin
704
- trampCall(_args)
705
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:131"] + __e.backtrace ) ; raise __e
706
- end
707
- ]
708
- )) ,
593
+ trampCall(_args)
594
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:131"] + __e.backtrace ) ; raise __e
595
+ end
596
+ ) ,
709
597
  " " ,
710
598
  begin
711
599
  trampCall(_attrs)
@@ -794,20 +682,12 @@ trampCall(
794
682
  ))
795
683
  ]
796
684
  )) ,
797
- trampCall( self._car_METHOD( 'car',
685
+ _car(
798
686
  begin
799
- if @global_lisp_binding.has_key?('_car') then
800
- trampCall(@_car)
801
- else raise NameError.new( "Error: undefined variable _car", "_car" ) end
802
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:117"] + __e.backtrace ) ; raise __e
803
- end ,
804
- [
805
- begin
806
- trampCall(_args)
807
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:131"] + __e.backtrace ) ; raise __e
808
- end
809
- ]
810
- )) ,
687
+ trampCall(_args)
688
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:131"] + __e.backtrace ) ; raise __e
689
+ end
690
+ ) ,
811
691
  " " ,
812
692
  begin
813
693
  trampCall(_attrs)
@@ -838,20 +718,12 @@ trampCall(
838
718
  rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:120"] + __e.backtrace ) ; raise __e
839
719
  end ,
840
720
  [
841
- trampCall( self._reverse_METHOD( 'reverse',
721
+ _reverse(
842
722
  begin
843
- if @global_lisp_binding.has_key?('_reverse') then
844
- trampCall(@_reverse)
845
- else raise NameError.new( "Error: undefined variable _reverse", "_reverse" ) end
723
+ trampCall(_attrs)
846
724
  rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:120"] + __e.backtrace ) ; raise __e
847
- end ,
848
- [
849
- begin
850
- trampCall(_attrs)
851
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:120"] + __e.backtrace ) ; raise __e
852
- end
853
- ]
854
- )) ,
725
+ end
726
+ ) ,
855
727
  begin
856
728
  trampCall(_args)
857
729
  rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:131"] + __e.backtrace ) ; raise __e
@@ -883,7 +755,7 @@ trampCall(
883
755
  end ,
884
756
  [
885
757
  Proc.new { ||
886
- trampCall( callProcedure( 'get-attr',
758
+ trampCall( callProcedure( '_get_MIMARKattr', 'get-attr',
887
759
  begin
888
760
  trampCall(_get_MIMARKattr)
889
761
  rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:130"] + __e.backtrace ) ; raise __e
@@ -899,30 +771,14 @@ trampCall(
899
771
  } ,
900
772
  Proc.new { |_attr,_args|
901
773
  if (
902
- trampCall( self._not_METHOD( 'not',
903
- begin
904
- if @global_lisp_binding.has_key?('_not') then
905
- trampCall(@_not)
906
- else raise NameError.new( "Error: undefined variable _not", "_not" ) end
907
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
908
- end ,
909
- [
910
- trampCall( self._null_QUMARK_METHOD( 'null?',
911
- begin
912
- if @global_lisp_binding.has_key?('_null_QUMARK') then
913
- trampCall(@_null_QUMARK)
914
- else raise NameError.new( "Error: undefined variable _null_QUMARK", "_null_QUMARK" ) end
915
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:126"] + __e.backtrace ) ; raise __e
916
- end ,
917
- [
918
- begin
919
- trampCall(_args)
920
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:131"] + __e.backtrace ) ; raise __e
921
- end
922
- ]
923
- ))
924
- ]
925
- ))
774
+ _not(
775
+ _null_QUMARK(
776
+ begin
777
+ trampCall(_args)
778
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:131"] + __e.backtrace ) ; raise __e
779
+ end
780
+ )
781
+ )
926
782
  ) then
927
783
  begin
928
784
  begin raise RuntimeError,
@@ -939,20 +795,12 @@ trampCall(
939
795
  trampCall(_name)
940
796
  rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:131"] + __e.backtrace ) ; raise __e
941
797
  end ,
942
- trampCall( self._write_MIMARKto_MIMARKstring_METHOD( 'write-to-string',
798
+ _write_MIMARKto_MIMARKstring(
943
799
  begin
944
- if @global_lisp_binding.has_key?('_write_MIMARKto_MIMARKstring') then
945
- trampCall(@_write_MIMARKto_MIMARKstring)
946
- else raise NameError.new( "Error: undefined variable _write_MIMARKto_MIMARKstring", "_write_MIMARKto_MIMARKstring" ) end
947
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:127"] + __e.backtrace ) ; raise __e
948
- end ,
949
- [
950
- begin
951
- trampCall(_args)
952
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:131"] + __e.backtrace ) ; raise __e
953
- end
954
- ]
955
- ))
800
+ trampCall(_args)
801
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:131"] + __e.backtrace ) ; raise __e
802
+ end
803
+ )
956
804
  ]
957
805
  ))
958
806
  rescue => __e
@@ -996,7 +844,7 @@ trampCall(
996
844
  end ,
997
845
  [
998
846
  Proc.new { ||
999
- trampCall( callProcedure( 'get-attr',
847
+ trampCall( callProcedure( '_get_MIMARKattr', 'get-attr',
1000
848
  begin
1001
849
  trampCall(_get_MIMARKattr)
1002
850
  rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:130"] + __e.backtrace ) ; raise __e
@@ -1078,7 +926,7 @@ trampCall(
1078
926
 
1079
927
  trampCall(
1080
928
  begin
1081
- def self._define_MIMARKhtml_MIMARKelements_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
929
+ def self._define_MIMARKhtml_MIMARKelements_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_define_MIMARKhtml_MIMARKelements', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1082
930
  @global_lisp_binding['_define_MIMARKhtml_MIMARKelements'] = self.method( :_define_MIMARKhtml_MIMARKelements_METHOD )
1083
931
  @_define_MIMARKhtml_MIMARKelements =
1084
932
  trampCall(
@@ -1087,127 +935,63 @@ trampCall(
1087
935
  ___lambda = lambda { |_make_MIMARKscheme_MIMARKname|
1088
936
  _make_MIMARKscheme_MIMARKname =
1089
937
  Proc.new { |_name|
1090
- trampCall( self._string_MIMARK_GTMARKsymbol_METHOD( 'string->symbol',
1091
- begin
1092
- if @global_lisp_binding.has_key?('_string_MIMARK_GTMARKsymbol') then
1093
- trampCall(@_string_MIMARK_GTMARKsymbol)
1094
- else raise NameError.new( "Error: undefined variable _string_MIMARK_GTMARKsymbol", "_string_MIMARK_GTMARKsymbol" ) end
1095
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:138"] + __e.backtrace ) ; raise __e
1096
- end ,
1097
- [
1098
- trampCall( self._sprintf_METHOD( 'sprintf',
938
+ _string_MIMARK_GTMARKsymbol(
939
+ trampCall( self._sprintf_METHOD( 'sprintf',
940
+ begin
941
+ if @global_lisp_binding.has_key?('_sprintf') then
942
+ trampCall(@_sprintf)
943
+ else raise NameError.new( "Error: undefined variable _sprintf", "_sprintf" ) end
944
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:138"] + __e.backtrace ) ; raise __e
945
+ end ,
946
+ [
947
+ "html:%s" ,
1099
948
  begin
1100
- if @global_lisp_binding.has_key?('_sprintf') then
1101
- trampCall(@_sprintf)
1102
- else raise NameError.new( "Error: undefined variable _sprintf", "_sprintf" ) end
949
+ trampCall(_name)
1103
950
  rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:138"] + __e.backtrace ) ; raise __e
1104
- end ,
1105
- [
1106
- "html:%s" ,
1107
- begin
1108
- trampCall(_name)
1109
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:138"] + __e.backtrace ) ; raise __e
1110
- end
1111
- ]
1112
- ))
1113
- ]
1114
- ))
951
+ end
952
+ ]
953
+ ))
954
+ )
1115
955
  }
1116
956
  begin
1117
957
  ___lambda = lambda { |_loop|
1118
958
  _loop =
1119
959
  Proc.new { |_elements,_r|
1120
960
  if (
1121
- trampCall( self._null_QUMARK_METHOD( 'null?',
961
+ _null_QUMARK(
1122
962
  begin
1123
- if @global_lisp_binding.has_key?('_null_QUMARK') then
1124
- trampCall(@_null_QUMARK)
1125
- else raise NameError.new( "Error: undefined variable _null_QUMARK", "_null_QUMARK" ) end
1126
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:142"] + __e.backtrace ) ; raise __e
1127
- end ,
1128
- [
1129
- begin
1130
- trampCall(_elements)
1131
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
1132
- end
1133
- ]
1134
- ))
963
+ trampCall(_elements)
964
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
965
+ end
966
+ )
1135
967
  ) then
1136
968
  begin
1137
- trampCall( self._cons_METHOD( 'cons',
1138
- begin
1139
- if @global_lisp_binding.has_key?('_cons') then
1140
- trampCall(@_cons)
1141
- else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1142
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1143
- end ,
1144
- [
1145
- :"begin" ,
1146
- trampCall( self._reverse_METHOD( 'reverse',
1147
- begin
1148
- if @global_lisp_binding.has_key?('_reverse') then
1149
- trampCall(@_reverse)
1150
- else raise NameError.new( "Error: undefined variable _reverse", "_reverse" ) end
1151
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:142"] + __e.backtrace ) ; raise __e
1152
- end ,
1153
- [
1154
- begin
1155
- trampCall(_r)
1156
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:154"] + __e.backtrace ) ; raise __e
1157
- end
1158
- ]
1159
- ))
1160
- ]
1161
- ))
969
+ _cons(
970
+ :"begin" ,
971
+ _reverse(
972
+ begin
973
+ trampCall(_r)
974
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:154"] + __e.backtrace ) ; raise __e
975
+ end
976
+ )
977
+ )
1162
978
  end
1163
979
  else
1164
980
  if (
1165
981
  if (
1166
- trampCall( self._not_METHOD( 'not',
1167
- begin
1168
- if @global_lisp_binding.has_key?('_not') then
1169
- trampCall(@_not)
1170
- else raise NameError.new( "Error: undefined variable _not", "_not" ) end
1171
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1172
- end ,
1173
- [
1174
- trampCall( self._eq_QUMARK_METHOD( 'eq?',
1175
- begin
1176
- if @global_lisp_binding.has_key?('_eq_QUMARK') then
1177
- trampCall(@_eq_QUMARK)
1178
- else raise NameError.new( "Error: undefined variable _eq_QUMARK", "_eq_QUMARK" ) end
1179
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:111"] + __e.backtrace ) ; raise __e
1180
- end ,
1181
- [
1182
- false ,
1183
- trampCall( self._pair_QUMARK_METHOD( 'pair?',
982
+ _not(
983
+ _eq_QUMARK(
984
+ false ,
985
+ _pair_QUMARK(
986
+ _cdr(
1184
987
  begin
1185
- if @global_lisp_binding.has_key?('_pair_QUMARK') then
1186
- trampCall(@_pair_QUMARK)
1187
- else raise NameError.new( "Error: undefined variable _pair_QUMARK", "_pair_QUMARK" ) end
1188
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:143"] + __e.backtrace ) ; raise __e
1189
- end ,
1190
- [
1191
- trampCall( self._cdr_METHOD( 'cdr',
1192
- begin
1193
- if @global_lisp_binding.has_key?('_cdr') then
1194
- trampCall(@_cdr)
1195
- else raise NameError.new( "Error: undefined variable _cdr", "_cdr" ) end
1196
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:150"] + __e.backtrace ) ; raise __e
1197
- end ,
1198
- [
1199
- begin
1200
- trampCall(_elements)
1201
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
1202
- end
1203
- ]
1204
- ))
1205
- ]
1206
- ))
1207
- ]
1208
- ))
1209
- ]
1210
- ))
988
+ trampCall(_elements)
989
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
990
+ end
991
+ )
992
+ )
993
+ )
994
+ )
1211
995
  ) then
1212
996
  trampCall( self._eqv_QUMARK_METHOD( 'eqv?',
1213
997
  begin
@@ -1239,7 +1023,7 @@ trampCall(
1239
1023
  end
1240
1024
  ) then
1241
1025
  begin
1242
- trampCall( callProcedure( 'loop',
1026
+ trampCall( callProcedure( '_loop', 'loop',
1243
1027
  begin
1244
1028
  trampCall(_loop)
1245
1029
  rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:150"] + __e.backtrace ) ; raise __e
@@ -1267,184 +1051,72 @@ trampCall(
1267
1051
  rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:151"] + __e.backtrace ) ; raise __e
1268
1052
  end ,
1269
1053
  [
1270
- trampCall( self._cons_METHOD( 'cons',
1271
- begin
1272
- if @global_lisp_binding.has_key?('_cons') then
1273
- trampCall(@_cons)
1274
- else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1275
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1276
- end ,
1277
- [
1278
- :"define" ,
1279
- trampCall( self._cons_METHOD( 'cons',
1280
- begin
1281
- if @global_lisp_binding.has_key?('_cons') then
1282
- trampCall(@_cons)
1283
- else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1284
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1285
- end ,
1286
- [
1287
- trampCall( callProcedure( 'make-scheme-name',
1288
- begin
1289
- trampCall(_make_MIMARKscheme_MIMARKname)
1290
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
1291
- end ,
1292
- [
1293
- trampCall( self._car_METHOD( 'car',
1294
- begin
1295
- if @global_lisp_binding.has_key?('_car') then
1296
- trampCall(@_car)
1297
- else raise NameError.new( "Error: undefined variable _car", "_car" ) end
1298
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
1299
- end ,
1300
- [
1301
- begin
1302
- trampCall(_elements)
1303
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
1304
- end
1305
- ]
1306
- ))
1307
- ]
1308
- )) ,
1309
- trampCall( self._cons_METHOD( 'cons',
1310
- begin
1311
- if @global_lisp_binding.has_key?('_cons') then
1312
- trampCall(@_cons)
1313
- else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1314
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1315
- end ,
1316
- [
1317
- trampCall( self._cons_METHOD( 'cons',
1318
- begin
1319
- if @global_lisp_binding.has_key?('_cons') then
1320
- trampCall(@_cons)
1321
- else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1322
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1323
- end ,
1324
- [
1325
- :"make-html-element" ,
1326
- trampCall( self._cons_METHOD( 'cons',
1327
- begin
1328
- if @global_lisp_binding.has_key?('_cons') then
1329
- trampCall(@_cons)
1330
- else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1331
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1332
- end ,
1333
- [
1334
- trampCall( self._cons_METHOD( 'cons',
1335
- begin
1336
- if @global_lisp_binding.has_key?('_cons') then
1337
- trampCall(@_cons)
1338
- else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1339
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1340
- end ,
1341
- [
1342
- :"quote" ,
1343
- trampCall( self._cons_METHOD( 'cons',
1344
- begin
1345
- if @global_lisp_binding.has_key?('_cons') then
1346
- trampCall(@_cons)
1347
- else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1348
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1349
- end ,
1350
- [
1351
- trampCall( self._car_METHOD( 'car',
1352
- begin
1353
- if @global_lisp_binding.has_key?('_car') then
1354
- trampCall(@_car)
1355
- else raise NameError.new( "Error: undefined variable _car", "_car" ) end
1356
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
1357
- end ,
1358
- [
1359
- begin
1360
- trampCall(_elements)
1361
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
1362
- end
1363
- ]
1364
- )) ,
1365
- Cell.new()
1366
- ]
1367
- ))
1368
- ]
1369
- )) ,
1370
- trampCall( self._cons_METHOD( 'cons',
1371
- begin
1372
- if @global_lisp_binding.has_key?('_cons') then
1373
- trampCall(@_cons)
1374
- else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1375
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1376
- end ,
1377
- [
1378
- LispKeyword.new( "empty?" ) ,
1379
- trampCall( self._cons_METHOD( 'cons',
1380
- begin
1381
- if @global_lisp_binding.has_key?('_cons') then
1382
- trampCall(@_cons)
1383
- else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1384
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1385
- end ,
1386
- [
1387
- true ,
1388
- Cell.new()
1389
- ]
1390
- ))
1391
- ]
1392
- ))
1393
- ]
1394
- ))
1395
- ]
1396
- )) ,
1397
- Cell.new()
1398
- ]
1399
- ))
1400
- ]
1401
- ))
1402
- ]
1403
- )) ,
1404
- trampCall( self._cons_METHOD( 'cons',
1405
- begin
1406
- if @global_lisp_binding.has_key?('_cons') then
1407
- trampCall(@_cons)
1408
- else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1409
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1410
- end ,
1411
- [
1412
- :"export" ,
1413
- trampCall( self._cons_METHOD( 'cons',
1414
- begin
1415
- if @global_lisp_binding.has_key?('_cons') then
1416
- trampCall(@_cons)
1417
- else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1418
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1419
- end ,
1420
- [
1421
- trampCall( callProcedure( 'make-scheme-name',
1422
- begin
1423
- trampCall(_make_MIMARKscheme_MIMARKname)
1424
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
1425
- end ,
1426
- [
1427
- trampCall( self._car_METHOD( 'car',
1428
- begin
1429
- if @global_lisp_binding.has_key?('_car') then
1430
- trampCall(@_car)
1431
- else raise NameError.new( "Error: undefined variable _car", "_car" ) end
1432
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
1433
- end ,
1434
- [
1435
- begin
1436
- trampCall(_elements)
1437
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
1438
- end
1439
- ]
1440
- ))
1441
- ]
1442
- )) ,
1054
+ _cons(
1055
+ :"define" ,
1056
+ _cons(
1057
+ trampCall( callProcedure( '_make_MIMARKscheme_MIMARKname', 'make-scheme-name',
1058
+ begin
1059
+ trampCall(_make_MIMARKscheme_MIMARKname)
1060
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
1061
+ end ,
1062
+ [
1063
+ _car(
1064
+ begin
1065
+ trampCall(_elements)
1066
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
1067
+ end
1068
+ )
1069
+ ]
1070
+ )) ,
1071
+ _cons(
1072
+ _cons(
1073
+ :"make-html-element" ,
1074
+ _cons(
1075
+ _cons(
1076
+ :"quote" ,
1077
+ _cons(
1078
+ _car(
1079
+ begin
1080
+ trampCall(_elements)
1081
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
1082
+ end
1083
+ ) ,
1084
+ Cell.new()
1085
+ )
1086
+ ) ,
1087
+ _cons(
1088
+ LispKeyword.new( "empty?" ) ,
1089
+ _cons(
1090
+ true ,
1091
+ Cell.new()
1092
+ )
1093
+ )
1094
+ )
1095
+ ) ,
1443
1096
  Cell.new()
1444
- ]
1445
- ))
1446
- ]
1447
- )) ,
1097
+ )
1098
+ )
1099
+ ) ,
1100
+ _cons(
1101
+ :"export" ,
1102
+ _cons(
1103
+ trampCall( callProcedure( '_make_MIMARKscheme_MIMARKname', 'make-scheme-name',
1104
+ begin
1105
+ trampCall(_make_MIMARKscheme_MIMARKname)
1106
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
1107
+ end ,
1108
+ [
1109
+ _car(
1110
+ begin
1111
+ trampCall(_elements)
1112
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
1113
+ end
1114
+ )
1115
+ ]
1116
+ )) ,
1117
+ Cell.new()
1118
+ )
1119
+ ) ,
1448
1120
  begin
1449
1121
  trampCall(_r)
1450
1122
  rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:154"] + __e.backtrace ) ; raise __e
@@ -1459,26 +1131,18 @@ trampCall(
1459
1131
  true
1460
1132
  ) then
1461
1133
  begin
1462
- trampCall( callProcedure( 'loop',
1134
+ trampCall( callProcedure( '_loop', 'loop',
1463
1135
  begin
1464
1136
  trampCall(_loop)
1465
1137
  rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:150"] + __e.backtrace ) ; raise __e
1466
1138
  end ,
1467
1139
  [
1468
- trampCall( self._cdr_METHOD( 'cdr',
1140
+ _cdr(
1469
1141
  begin
1470
- if @global_lisp_binding.has_key?('_cdr') then
1471
- trampCall(@_cdr)
1472
- else raise NameError.new( "Error: undefined variable _cdr", "_cdr" ) end
1473
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:150"] + __e.backtrace ) ; raise __e
1474
- end ,
1475
- [
1476
- begin
1477
- trampCall(_elements)
1478
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
1479
- end
1480
- ]
1481
- )) ,
1142
+ trampCall(_elements)
1143
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
1144
+ end
1145
+ ) ,
1482
1146
  trampCall( self._list_ASMARK_METHOD( 'list*',
1483
1147
  begin
1484
1148
  if @global_lisp_binding.has_key?('_list_ASMARK') then
@@ -1487,162 +1151,66 @@ trampCall(
1487
1151
  rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:151"] + __e.backtrace ) ; raise __e
1488
1152
  end ,
1489
1153
  [
1490
- trampCall( self._cons_METHOD( 'cons',
1491
- begin
1492
- if @global_lisp_binding.has_key?('_cons') then
1493
- trampCall(@_cons)
1494
- else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1495
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1496
- end ,
1497
- [
1498
- :"define" ,
1499
- trampCall( self._cons_METHOD( 'cons',
1500
- begin
1501
- if @global_lisp_binding.has_key?('_cons') then
1502
- trampCall(@_cons)
1503
- else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1504
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1505
- end ,
1506
- [
1507
- trampCall( callProcedure( 'make-scheme-name',
1508
- begin
1509
- trampCall(_make_MIMARKscheme_MIMARKname)
1510
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
1511
- end ,
1512
- [
1513
- trampCall( self._car_METHOD( 'car',
1514
- begin
1515
- if @global_lisp_binding.has_key?('_car') then
1516
- trampCall(@_car)
1517
- else raise NameError.new( "Error: undefined variable _car", "_car" ) end
1518
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
1519
- end ,
1520
- [
1521
- begin
1522
- trampCall(_elements)
1523
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
1524
- end
1525
- ]
1526
- ))
1527
- ]
1528
- )) ,
1529
- trampCall( self._cons_METHOD( 'cons',
1530
- begin
1531
- if @global_lisp_binding.has_key?('_cons') then
1532
- trampCall(@_cons)
1533
- else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1534
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1535
- end ,
1536
- [
1537
- trampCall( self._cons_METHOD( 'cons',
1538
- begin
1539
- if @global_lisp_binding.has_key?('_cons') then
1540
- trampCall(@_cons)
1541
- else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1542
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1543
- end ,
1544
- [
1545
- :"make-html-element" ,
1546
- trampCall( self._cons_METHOD( 'cons',
1547
- begin
1548
- if @global_lisp_binding.has_key?('_cons') then
1549
- trampCall(@_cons)
1550
- else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1551
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1552
- end ,
1553
- [
1554
- trampCall( self._cons_METHOD( 'cons',
1555
- begin
1556
- if @global_lisp_binding.has_key?('_cons') then
1557
- trampCall(@_cons)
1558
- else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1559
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1560
- end ,
1561
- [
1562
- :"quote" ,
1563
- trampCall( self._cons_METHOD( 'cons',
1564
- begin
1565
- if @global_lisp_binding.has_key?('_cons') then
1566
- trampCall(@_cons)
1567
- else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1568
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1569
- end ,
1570
- [
1571
- trampCall( self._car_METHOD( 'car',
1572
- begin
1573
- if @global_lisp_binding.has_key?('_car') then
1574
- trampCall(@_car)
1575
- else raise NameError.new( "Error: undefined variable _car", "_car" ) end
1576
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
1577
- end ,
1578
- [
1579
- begin
1580
- trampCall(_elements)
1581
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
1582
- end
1583
- ]
1584
- )) ,
1585
- Cell.new()
1586
- ]
1587
- ))
1588
- ]
1589
- )) ,
1590
- Cell.new()
1591
- ]
1592
- ))
1593
- ]
1594
- )) ,
1595
- Cell.new()
1596
- ]
1597
- ))
1598
- ]
1599
- ))
1600
- ]
1601
- )) ,
1602
- trampCall( self._cons_METHOD( 'cons',
1603
- begin
1604
- if @global_lisp_binding.has_key?('_cons') then
1605
- trampCall(@_cons)
1606
- else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1607
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1608
- end ,
1609
- [
1610
- :"export" ,
1611
- trampCall( self._cons_METHOD( 'cons',
1612
- begin
1613
- if @global_lisp_binding.has_key?('_cons') then
1614
- trampCall(@_cons)
1615
- else raise NameError.new( "Error: undefined variable _cons", "_cons" ) end
1616
- rescue => __e ; __e.set_backtrace( [":1"] + __e.backtrace ) ; raise __e
1617
- end ,
1618
- [
1619
- trampCall( callProcedure( 'make-scheme-name',
1620
- begin
1621
- trampCall(_make_MIMARKscheme_MIMARKname)
1622
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
1623
- end ,
1624
- [
1625
- trampCall( self._car_METHOD( 'car',
1626
- begin
1627
- if @global_lisp_binding.has_key?('_car') then
1628
- trampCall(@_car)
1629
- else raise NameError.new( "Error: undefined variable _car", "_car" ) end
1630
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
1631
- end ,
1632
- [
1633
- begin
1634
- trampCall(_elements)
1635
- rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
1636
- end
1637
- ]
1638
- ))
1639
- ]
1640
- )) ,
1154
+ _cons(
1155
+ :"define" ,
1156
+ _cons(
1157
+ trampCall( callProcedure( '_make_MIMARKscheme_MIMARKname', 'make-scheme-name',
1158
+ begin
1159
+ trampCall(_make_MIMARKscheme_MIMARKname)
1160
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
1161
+ end ,
1162
+ [
1163
+ _car(
1164
+ begin
1165
+ trampCall(_elements)
1166
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
1167
+ end
1168
+ )
1169
+ ]
1170
+ )) ,
1171
+ _cons(
1172
+ _cons(
1173
+ :"make-html-element" ,
1174
+ _cons(
1175
+ _cons(
1176
+ :"quote" ,
1177
+ _cons(
1178
+ _car(
1179
+ begin
1180
+ trampCall(_elements)
1181
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
1182
+ end
1183
+ ) ,
1184
+ Cell.new()
1185
+ )
1186
+ ) ,
1187
+ Cell.new()
1188
+ )
1189
+ ) ,
1641
1190
  Cell.new()
1642
- ]
1643
- ))
1644
- ]
1645
- )) ,
1191
+ )
1192
+ )
1193
+ ) ,
1194
+ _cons(
1195
+ :"export" ,
1196
+ _cons(
1197
+ trampCall( callProcedure( '_make_MIMARKscheme_MIMARKname', 'make-scheme-name',
1198
+ begin
1199
+ trampCall(_make_MIMARKscheme_MIMARKname)
1200
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
1201
+ end ,
1202
+ [
1203
+ _car(
1204
+ begin
1205
+ trampCall(_elements)
1206
+ rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:153"] + __e.backtrace ) ; raise __e
1207
+ end
1208
+ )
1209
+ ]
1210
+ )) ,
1211
+ Cell.new()
1212
+ )
1213
+ ) ,
1646
1214
  begin
1647
1215
  trampCall(_r)
1648
1216
  rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:154"] + __e.backtrace ) ; raise __e
@@ -1658,7 +1226,7 @@ trampCall(
1658
1226
  end
1659
1227
  end
1660
1228
  }
1661
- trampCall( callProcedure( 'loop',
1229
+ trampCall( callProcedure( '_loop', 'loop',
1662
1230
  begin
1663
1231
  trampCall(_loop)
1664
1232
  rescue => __e ; __e.set_backtrace( ["./lib/text/html-lite.nnd:150"] + __e.backtrace ) ; raise __e
@@ -1688,7 +1256,7 @@ trampCall(
1688
1256
  trampCall(
1689
1257
  begin
1690
1258
  begin
1691
- def self._html_COMARKtt_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1259
+ def self._html_COMARKtt_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKtt', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1692
1260
  @global_lisp_binding['_html_COMARKtt'] = self.method( :_html_COMARKtt_METHOD )
1693
1261
  @_html_COMARKtt =
1694
1262
  trampCall(
@@ -1696,7 +1264,7 @@ trampCall(
1696
1264
  )
1697
1265
  end
1698
1266
  begin
1699
- def self._html_COMARKtt_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1267
+ def self._html_COMARKtt_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKtt', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1700
1268
  @global_lisp_binding['_html_COMARKtt'] = self.method( :_html_COMARKtt_METHOD )
1701
1269
  @_html_COMARKtt =
1702
1270
  trampCall(
@@ -1714,7 +1282,7 @@ trampCall(
1714
1282
  )
1715
1283
  end
1716
1284
  begin
1717
- def self._html_COMARKi_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1285
+ def self._html_COMARKi_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKi', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1718
1286
  @global_lisp_binding['_html_COMARKi'] = self.method( :_html_COMARKi_METHOD )
1719
1287
  @_html_COMARKi =
1720
1288
  trampCall(
@@ -1722,7 +1290,7 @@ trampCall(
1722
1290
  )
1723
1291
  end
1724
1292
  begin
1725
- def self._html_COMARKi_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1293
+ def self._html_COMARKi_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKi', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1726
1294
  @global_lisp_binding['_html_COMARKi'] = self.method( :_html_COMARKi_METHOD )
1727
1295
  @_html_COMARKi =
1728
1296
  trampCall(
@@ -1740,7 +1308,7 @@ trampCall(
1740
1308
  )
1741
1309
  end
1742
1310
  begin
1743
- def self._html_COMARKb_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1311
+ def self._html_COMARKb_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKb', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1744
1312
  @global_lisp_binding['_html_COMARKb'] = self.method( :_html_COMARKb_METHOD )
1745
1313
  @_html_COMARKb =
1746
1314
  trampCall(
@@ -1748,7 +1316,7 @@ trampCall(
1748
1316
  )
1749
1317
  end
1750
1318
  begin
1751
- def self._html_COMARKb_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1319
+ def self._html_COMARKb_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKb', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1752
1320
  @global_lisp_binding['_html_COMARKb'] = self.method( :_html_COMARKb_METHOD )
1753
1321
  @_html_COMARKb =
1754
1322
  trampCall(
@@ -1766,7 +1334,7 @@ trampCall(
1766
1334
  )
1767
1335
  end
1768
1336
  begin
1769
- def self._html_COMARKbig_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1337
+ def self._html_COMARKbig_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKbig', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1770
1338
  @global_lisp_binding['_html_COMARKbig'] = self.method( :_html_COMARKbig_METHOD )
1771
1339
  @_html_COMARKbig =
1772
1340
  trampCall(
@@ -1774,7 +1342,7 @@ trampCall(
1774
1342
  )
1775
1343
  end
1776
1344
  begin
1777
- def self._html_COMARKbig_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1345
+ def self._html_COMARKbig_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKbig', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1778
1346
  @global_lisp_binding['_html_COMARKbig'] = self.method( :_html_COMARKbig_METHOD )
1779
1347
  @_html_COMARKbig =
1780
1348
  trampCall(
@@ -1792,7 +1360,7 @@ trampCall(
1792
1360
  )
1793
1361
  end
1794
1362
  begin
1795
- def self._html_COMARKsmall_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1363
+ def self._html_COMARKsmall_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKsmall', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1796
1364
  @global_lisp_binding['_html_COMARKsmall'] = self.method( :_html_COMARKsmall_METHOD )
1797
1365
  @_html_COMARKsmall =
1798
1366
  trampCall(
@@ -1800,7 +1368,7 @@ trampCall(
1800
1368
  )
1801
1369
  end
1802
1370
  begin
1803
- def self._html_COMARKsmall_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1371
+ def self._html_COMARKsmall_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKsmall', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1804
1372
  @global_lisp_binding['_html_COMARKsmall'] = self.method( :_html_COMARKsmall_METHOD )
1805
1373
  @_html_COMARKsmall =
1806
1374
  trampCall(
@@ -1824,7 +1392,7 @@ trampCall(
1824
1392
  trampCall(
1825
1393
  begin
1826
1394
  begin
1827
- def self._html_COMARKem_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1395
+ def self._html_COMARKem_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKem', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1828
1396
  @global_lisp_binding['_html_COMARKem'] = self.method( :_html_COMARKem_METHOD )
1829
1397
  @_html_COMARKem =
1830
1398
  trampCall(
@@ -1832,7 +1400,7 @@ trampCall(
1832
1400
  )
1833
1401
  end
1834
1402
  begin
1835
- def self._html_COMARKem_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1403
+ def self._html_COMARKem_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKem', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1836
1404
  @global_lisp_binding['_html_COMARKem'] = self.method( :_html_COMARKem_METHOD )
1837
1405
  @_html_COMARKem =
1838
1406
  trampCall(
@@ -1850,7 +1418,7 @@ trampCall(
1850
1418
  )
1851
1419
  end
1852
1420
  begin
1853
- def self._html_COMARKstrong_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1421
+ def self._html_COMARKstrong_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKstrong', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1854
1422
  @global_lisp_binding['_html_COMARKstrong'] = self.method( :_html_COMARKstrong_METHOD )
1855
1423
  @_html_COMARKstrong =
1856
1424
  trampCall(
@@ -1858,7 +1426,7 @@ trampCall(
1858
1426
  )
1859
1427
  end
1860
1428
  begin
1861
- def self._html_COMARKstrong_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1429
+ def self._html_COMARKstrong_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKstrong', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1862
1430
  @global_lisp_binding['_html_COMARKstrong'] = self.method( :_html_COMARKstrong_METHOD )
1863
1431
  @_html_COMARKstrong =
1864
1432
  trampCall(
@@ -1876,7 +1444,7 @@ trampCall(
1876
1444
  )
1877
1445
  end
1878
1446
  begin
1879
- def self._html_COMARKdfn_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1447
+ def self._html_COMARKdfn_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKdfn', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1880
1448
  @global_lisp_binding['_html_COMARKdfn'] = self.method( :_html_COMARKdfn_METHOD )
1881
1449
  @_html_COMARKdfn =
1882
1450
  trampCall(
@@ -1884,7 +1452,7 @@ trampCall(
1884
1452
  )
1885
1453
  end
1886
1454
  begin
1887
- def self._html_COMARKdfn_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1455
+ def self._html_COMARKdfn_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKdfn', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1888
1456
  @global_lisp_binding['_html_COMARKdfn'] = self.method( :_html_COMARKdfn_METHOD )
1889
1457
  @_html_COMARKdfn =
1890
1458
  trampCall(
@@ -1902,7 +1470,7 @@ trampCall(
1902
1470
  )
1903
1471
  end
1904
1472
  begin
1905
- def self._html_COMARKcode_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1473
+ def self._html_COMARKcode_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKcode', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1906
1474
  @global_lisp_binding['_html_COMARKcode'] = self.method( :_html_COMARKcode_METHOD )
1907
1475
  @_html_COMARKcode =
1908
1476
  trampCall(
@@ -1910,7 +1478,7 @@ trampCall(
1910
1478
  )
1911
1479
  end
1912
1480
  begin
1913
- def self._html_COMARKcode_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1481
+ def self._html_COMARKcode_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKcode', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1914
1482
  @global_lisp_binding['_html_COMARKcode'] = self.method( :_html_COMARKcode_METHOD )
1915
1483
  @_html_COMARKcode =
1916
1484
  trampCall(
@@ -1928,7 +1496,7 @@ trampCall(
1928
1496
  )
1929
1497
  end
1930
1498
  begin
1931
- def self._html_COMARKsamp_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1499
+ def self._html_COMARKsamp_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKsamp', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1932
1500
  @global_lisp_binding['_html_COMARKsamp'] = self.method( :_html_COMARKsamp_METHOD )
1933
1501
  @_html_COMARKsamp =
1934
1502
  trampCall(
@@ -1936,7 +1504,7 @@ trampCall(
1936
1504
  )
1937
1505
  end
1938
1506
  begin
1939
- def self._html_COMARKsamp_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1507
+ def self._html_COMARKsamp_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKsamp', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1940
1508
  @global_lisp_binding['_html_COMARKsamp'] = self.method( :_html_COMARKsamp_METHOD )
1941
1509
  @_html_COMARKsamp =
1942
1510
  trampCall(
@@ -1954,7 +1522,7 @@ trampCall(
1954
1522
  )
1955
1523
  end
1956
1524
  begin
1957
- def self._html_COMARKkbd_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1525
+ def self._html_COMARKkbd_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKkbd', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1958
1526
  @global_lisp_binding['_html_COMARKkbd'] = self.method( :_html_COMARKkbd_METHOD )
1959
1527
  @_html_COMARKkbd =
1960
1528
  trampCall(
@@ -1962,7 +1530,7 @@ trampCall(
1962
1530
  )
1963
1531
  end
1964
1532
  begin
1965
- def self._html_COMARKkbd_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1533
+ def self._html_COMARKkbd_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKkbd', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1966
1534
  @global_lisp_binding['_html_COMARKkbd'] = self.method( :_html_COMARKkbd_METHOD )
1967
1535
  @_html_COMARKkbd =
1968
1536
  trampCall(
@@ -1980,7 +1548,7 @@ trampCall(
1980
1548
  )
1981
1549
  end
1982
1550
  begin
1983
- def self._html_COMARKvar_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1551
+ def self._html_COMARKvar_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKvar', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1984
1552
  @global_lisp_binding['_html_COMARKvar'] = self.method( :_html_COMARKvar_METHOD )
1985
1553
  @_html_COMARKvar =
1986
1554
  trampCall(
@@ -1988,7 +1556,7 @@ trampCall(
1988
1556
  )
1989
1557
  end
1990
1558
  begin
1991
- def self._html_COMARKvar_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1559
+ def self._html_COMARKvar_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKvar', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1992
1560
  @global_lisp_binding['_html_COMARKvar'] = self.method( :_html_COMARKvar_METHOD )
1993
1561
  @_html_COMARKvar =
1994
1562
  trampCall(
@@ -2006,7 +1574,7 @@ trampCall(
2006
1574
  )
2007
1575
  end
2008
1576
  begin
2009
- def self._html_COMARKcite_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1577
+ def self._html_COMARKcite_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKcite', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2010
1578
  @global_lisp_binding['_html_COMARKcite'] = self.method( :_html_COMARKcite_METHOD )
2011
1579
  @_html_COMARKcite =
2012
1580
  trampCall(
@@ -2014,7 +1582,7 @@ trampCall(
2014
1582
  )
2015
1583
  end
2016
1584
  begin
2017
- def self._html_COMARKcite_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1585
+ def self._html_COMARKcite_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKcite', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2018
1586
  @global_lisp_binding['_html_COMARKcite'] = self.method( :_html_COMARKcite_METHOD )
2019
1587
  @_html_COMARKcite =
2020
1588
  trampCall(
@@ -2032,7 +1600,7 @@ trampCall(
2032
1600
  )
2033
1601
  end
2034
1602
  begin
2035
- def self._html_COMARKabbr_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1603
+ def self._html_COMARKabbr_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKabbr', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2036
1604
  @global_lisp_binding['_html_COMARKabbr'] = self.method( :_html_COMARKabbr_METHOD )
2037
1605
  @_html_COMARKabbr =
2038
1606
  trampCall(
@@ -2040,7 +1608,7 @@ trampCall(
2040
1608
  )
2041
1609
  end
2042
1610
  begin
2043
- def self._html_COMARKabbr_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1611
+ def self._html_COMARKabbr_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKabbr', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2044
1612
  @global_lisp_binding['_html_COMARKabbr'] = self.method( :_html_COMARKabbr_METHOD )
2045
1613
  @_html_COMARKabbr =
2046
1614
  trampCall(
@@ -2058,7 +1626,7 @@ trampCall(
2058
1626
  )
2059
1627
  end
2060
1628
  begin
2061
- def self._html_COMARKacronym_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1629
+ def self._html_COMARKacronym_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKacronym', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2062
1630
  @global_lisp_binding['_html_COMARKacronym'] = self.method( :_html_COMARKacronym_METHOD )
2063
1631
  @_html_COMARKacronym =
2064
1632
  trampCall(
@@ -2066,7 +1634,7 @@ trampCall(
2066
1634
  )
2067
1635
  end
2068
1636
  begin
2069
- def self._html_COMARKacronym_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1637
+ def self._html_COMARKacronym_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKacronym', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2070
1638
  @global_lisp_binding['_html_COMARKacronym'] = self.method( :_html_COMARKacronym_METHOD )
2071
1639
  @_html_COMARKacronym =
2072
1640
  trampCall(
@@ -2090,7 +1658,7 @@ trampCall(
2090
1658
  trampCall(
2091
1659
  begin
2092
1660
  begin
2093
- def self._html_COMARKsub_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1661
+ def self._html_COMARKsub_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKsub', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2094
1662
  @global_lisp_binding['_html_COMARKsub'] = self.method( :_html_COMARKsub_METHOD )
2095
1663
  @_html_COMARKsub =
2096
1664
  trampCall(
@@ -2098,7 +1666,7 @@ trampCall(
2098
1666
  )
2099
1667
  end
2100
1668
  begin
2101
- def self._html_COMARKsub_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1669
+ def self._html_COMARKsub_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKsub', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2102
1670
  @global_lisp_binding['_html_COMARKsub'] = self.method( :_html_COMARKsub_METHOD )
2103
1671
  @_html_COMARKsub =
2104
1672
  trampCall(
@@ -2116,7 +1684,7 @@ trampCall(
2116
1684
  )
2117
1685
  end
2118
1686
  begin
2119
- def self._html_COMARKsup_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1687
+ def self._html_COMARKsup_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKsup', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2120
1688
  @global_lisp_binding['_html_COMARKsup'] = self.method( :_html_COMARKsup_METHOD )
2121
1689
  @_html_COMARKsup =
2122
1690
  trampCall(
@@ -2124,7 +1692,7 @@ trampCall(
2124
1692
  )
2125
1693
  end
2126
1694
  begin
2127
- def self._html_COMARKsup_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1695
+ def self._html_COMARKsup_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKsup', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2128
1696
  @global_lisp_binding['_html_COMARKsup'] = self.method( :_html_COMARKsup_METHOD )
2129
1697
  @_html_COMARKsup =
2130
1698
  trampCall(
@@ -2142,7 +1710,7 @@ trampCall(
2142
1710
  )
2143
1711
  end
2144
1712
  begin
2145
- def self._html_COMARKspan_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1713
+ def self._html_COMARKspan_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKspan', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2146
1714
  @global_lisp_binding['_html_COMARKspan'] = self.method( :_html_COMARKspan_METHOD )
2147
1715
  @_html_COMARKspan =
2148
1716
  trampCall(
@@ -2150,7 +1718,7 @@ trampCall(
2150
1718
  )
2151
1719
  end
2152
1720
  begin
2153
- def self._html_COMARKspan_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1721
+ def self._html_COMARKspan_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKspan', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2154
1722
  @global_lisp_binding['_html_COMARKspan'] = self.method( :_html_COMARKspan_METHOD )
2155
1723
  @_html_COMARKspan =
2156
1724
  trampCall(
@@ -2168,7 +1736,7 @@ trampCall(
2168
1736
  )
2169
1737
  end
2170
1738
  begin
2171
- def self._html_COMARKbdo_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1739
+ def self._html_COMARKbdo_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKbdo', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2172
1740
  @global_lisp_binding['_html_COMARKbdo'] = self.method( :_html_COMARKbdo_METHOD )
2173
1741
  @_html_COMARKbdo =
2174
1742
  trampCall(
@@ -2176,7 +1744,7 @@ trampCall(
2176
1744
  )
2177
1745
  end
2178
1746
  begin
2179
- def self._html_COMARKbdo_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1747
+ def self._html_COMARKbdo_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKbdo', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2180
1748
  @global_lisp_binding['_html_COMARKbdo'] = self.method( :_html_COMARKbdo_METHOD )
2181
1749
  @_html_COMARKbdo =
2182
1750
  trampCall(
@@ -2194,7 +1762,7 @@ trampCall(
2194
1762
  )
2195
1763
  end
2196
1764
  begin
2197
- def self._html_COMARKbr_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1765
+ def self._html_COMARKbr_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKbr', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2198
1766
  @global_lisp_binding['_html_COMARKbr'] = self.method( :_html_COMARKbr_METHOD )
2199
1767
  @_html_COMARKbr =
2200
1768
  trampCall(
@@ -2202,7 +1770,7 @@ trampCall(
2202
1770
  )
2203
1771
  end
2204
1772
  begin
2205
- def self._html_COMARKbr_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1773
+ def self._html_COMARKbr_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKbr', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2206
1774
  @global_lisp_binding['_html_COMARKbr'] = self.method( :_html_COMARKbr_METHOD )
2207
1775
  @_html_COMARKbr =
2208
1776
  trampCall(
@@ -2228,7 +1796,7 @@ trampCall(
2228
1796
  trampCall(
2229
1797
  begin
2230
1798
  begin
2231
- def self._html_COMARKbody_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1799
+ def self._html_COMARKbody_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKbody', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2232
1800
  @global_lisp_binding['_html_COMARKbody'] = self.method( :_html_COMARKbody_METHOD )
2233
1801
  @_html_COMARKbody =
2234
1802
  trampCall(
@@ -2236,7 +1804,7 @@ trampCall(
2236
1804
  )
2237
1805
  end
2238
1806
  begin
2239
- def self._html_COMARKbody_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1807
+ def self._html_COMARKbody_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKbody', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2240
1808
  @global_lisp_binding['_html_COMARKbody'] = self.method( :_html_COMARKbody_METHOD )
2241
1809
  @_html_COMARKbody =
2242
1810
  trampCall(
@@ -2254,7 +1822,7 @@ trampCall(
2254
1822
  )
2255
1823
  end
2256
1824
  begin
2257
- def self._html_COMARKaddress_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1825
+ def self._html_COMARKaddress_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKaddress', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2258
1826
  @global_lisp_binding['_html_COMARKaddress'] = self.method( :_html_COMARKaddress_METHOD )
2259
1827
  @_html_COMARKaddress =
2260
1828
  trampCall(
@@ -2262,7 +1830,7 @@ trampCall(
2262
1830
  )
2263
1831
  end
2264
1832
  begin
2265
- def self._html_COMARKaddress_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1833
+ def self._html_COMARKaddress_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKaddress', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2266
1834
  @global_lisp_binding['_html_COMARKaddress'] = self.method( :_html_COMARKaddress_METHOD )
2267
1835
  @_html_COMARKaddress =
2268
1836
  trampCall(
@@ -2280,7 +1848,7 @@ trampCall(
2280
1848
  )
2281
1849
  end
2282
1850
  begin
2283
- def self._html_COMARKdiv_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1851
+ def self._html_COMARKdiv_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKdiv', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2284
1852
  @global_lisp_binding['_html_COMARKdiv'] = self.method( :_html_COMARKdiv_METHOD )
2285
1853
  @_html_COMARKdiv =
2286
1854
  trampCall(
@@ -2288,7 +1856,7 @@ trampCall(
2288
1856
  )
2289
1857
  end
2290
1858
  begin
2291
- def self._html_COMARKdiv_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1859
+ def self._html_COMARKdiv_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKdiv', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2292
1860
  @global_lisp_binding['_html_COMARKdiv'] = self.method( :_html_COMARKdiv_METHOD )
2293
1861
  @_html_COMARKdiv =
2294
1862
  trampCall(
@@ -2312,7 +1880,7 @@ trampCall(
2312
1880
  trampCall(
2313
1881
  begin
2314
1882
  begin
2315
- def self._html_COMARKa_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1883
+ def self._html_COMARKa_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKa', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2316
1884
  @global_lisp_binding['_html_COMARKa'] = self.method( :_html_COMARKa_METHOD )
2317
1885
  @_html_COMARKa =
2318
1886
  trampCall(
@@ -2320,7 +1888,7 @@ trampCall(
2320
1888
  )
2321
1889
  end
2322
1890
  begin
2323
- def self._html_COMARKa_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1891
+ def self._html_COMARKa_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKa', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2324
1892
  @global_lisp_binding['_html_COMARKa'] = self.method( :_html_COMARKa_METHOD )
2325
1893
  @_html_COMARKa =
2326
1894
  trampCall(
@@ -2344,7 +1912,7 @@ trampCall(
2344
1912
  trampCall(
2345
1913
  begin
2346
1914
  begin
2347
- def self._html_COMARKmap_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1915
+ def self._html_COMARKmap_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKmap', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2348
1916
  @global_lisp_binding['_html_COMARKmap'] = self.method( :_html_COMARKmap_METHOD )
2349
1917
  @_html_COMARKmap =
2350
1918
  trampCall(
@@ -2352,7 +1920,7 @@ trampCall(
2352
1920
  )
2353
1921
  end
2354
1922
  begin
2355
- def self._html_COMARKmap_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1923
+ def self._html_COMARKmap_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKmap', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2356
1924
  @global_lisp_binding['_html_COMARKmap'] = self.method( :_html_COMARKmap_METHOD )
2357
1925
  @_html_COMARKmap =
2358
1926
  trampCall(
@@ -2370,7 +1938,7 @@ trampCall(
2370
1938
  )
2371
1939
  end
2372
1940
  begin
2373
- def self._html_COMARKarea_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1941
+ def self._html_COMARKarea_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKarea', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2374
1942
  @global_lisp_binding['_html_COMARKarea'] = self.method( :_html_COMARKarea_METHOD )
2375
1943
  @_html_COMARKarea =
2376
1944
  trampCall(
@@ -2378,7 +1946,7 @@ trampCall(
2378
1946
  )
2379
1947
  end
2380
1948
  begin
2381
- def self._html_COMARKarea_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1949
+ def self._html_COMARKarea_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKarea', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2382
1950
  @global_lisp_binding['_html_COMARKarea'] = self.method( :_html_COMARKarea_METHOD )
2383
1951
  @_html_COMARKarea =
2384
1952
  trampCall(
@@ -2404,7 +1972,7 @@ trampCall(
2404
1972
  trampCall(
2405
1973
  begin
2406
1974
  begin
2407
- def self._html_COMARKlink_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1975
+ def self._html_COMARKlink_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKlink', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2408
1976
  @global_lisp_binding['_html_COMARKlink'] = self.method( :_html_COMARKlink_METHOD )
2409
1977
  @_html_COMARKlink =
2410
1978
  trampCall(
@@ -2412,7 +1980,7 @@ trampCall(
2412
1980
  )
2413
1981
  end
2414
1982
  begin
2415
- def self._html_COMARKlink_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
1983
+ def self._html_COMARKlink_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKlink', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2416
1984
  @global_lisp_binding['_html_COMARKlink'] = self.method( :_html_COMARKlink_METHOD )
2417
1985
  @_html_COMARKlink =
2418
1986
  trampCall(
@@ -2438,7 +2006,7 @@ trampCall(
2438
2006
  trampCall(
2439
2007
  begin
2440
2008
  begin
2441
- def self._html_COMARKimg_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2009
+ def self._html_COMARKimg_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKimg', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2442
2010
  @global_lisp_binding['_html_COMARKimg'] = self.method( :_html_COMARKimg_METHOD )
2443
2011
  @_html_COMARKimg =
2444
2012
  trampCall(
@@ -2446,7 +2014,7 @@ trampCall(
2446
2014
  )
2447
2015
  end
2448
2016
  begin
2449
- def self._html_COMARKimg_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2017
+ def self._html_COMARKimg_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKimg', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2450
2018
  @global_lisp_binding['_html_COMARKimg'] = self.method( :_html_COMARKimg_METHOD )
2451
2019
  @_html_COMARKimg =
2452
2020
  trampCall(
@@ -2472,7 +2040,7 @@ trampCall(
2472
2040
  trampCall(
2473
2041
  begin
2474
2042
  begin
2475
- def self._html_COMARKobject_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2043
+ def self._html_COMARKobject_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKobject', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2476
2044
  @global_lisp_binding['_html_COMARKobject'] = self.method( :_html_COMARKobject_METHOD )
2477
2045
  @_html_COMARKobject =
2478
2046
  trampCall(
@@ -2480,7 +2048,7 @@ trampCall(
2480
2048
  )
2481
2049
  end
2482
2050
  begin
2483
- def self._html_COMARKobject_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2051
+ def self._html_COMARKobject_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKobject', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2484
2052
  @global_lisp_binding['_html_COMARKobject'] = self.method( :_html_COMARKobject_METHOD )
2485
2053
  @_html_COMARKobject =
2486
2054
  trampCall(
@@ -2498,7 +2066,7 @@ trampCall(
2498
2066
  )
2499
2067
  end
2500
2068
  begin
2501
- def self._html_COMARKparam_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2069
+ def self._html_COMARKparam_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKparam', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2502
2070
  @global_lisp_binding['_html_COMARKparam'] = self.method( :_html_COMARKparam_METHOD )
2503
2071
  @_html_COMARKparam =
2504
2072
  trampCall(
@@ -2506,7 +2074,7 @@ trampCall(
2506
2074
  )
2507
2075
  end
2508
2076
  begin
2509
- def self._html_COMARKparam_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2077
+ def self._html_COMARKparam_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKparam', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2510
2078
  @global_lisp_binding['_html_COMARKparam'] = self.method( :_html_COMARKparam_METHOD )
2511
2079
  @_html_COMARKparam =
2512
2080
  trampCall(
@@ -2532,7 +2100,7 @@ trampCall(
2532
2100
  trampCall(
2533
2101
  begin
2534
2102
  begin
2535
- def self._html_COMARKhr_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2103
+ def self._html_COMARKhr_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKhr', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2536
2104
  @global_lisp_binding['_html_COMARKhr'] = self.method( :_html_COMARKhr_METHOD )
2537
2105
  @_html_COMARKhr =
2538
2106
  trampCall(
@@ -2540,7 +2108,7 @@ trampCall(
2540
2108
  )
2541
2109
  end
2542
2110
  begin
2543
- def self._html_COMARKhr_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2111
+ def self._html_COMARKhr_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKhr', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2544
2112
  @global_lisp_binding['_html_COMARKhr'] = self.method( :_html_COMARKhr_METHOD )
2545
2113
  @_html_COMARKhr =
2546
2114
  trampCall(
@@ -2566,7 +2134,7 @@ trampCall(
2566
2134
  trampCall(
2567
2135
  begin
2568
2136
  begin
2569
- def self._html_COMARKp_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2137
+ def self._html_COMARKp_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKp', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2570
2138
  @global_lisp_binding['_html_COMARKp'] = self.method( :_html_COMARKp_METHOD )
2571
2139
  @_html_COMARKp =
2572
2140
  trampCall(
@@ -2574,7 +2142,7 @@ trampCall(
2574
2142
  )
2575
2143
  end
2576
2144
  begin
2577
- def self._html_COMARKp_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2145
+ def self._html_COMARKp_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKp', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2578
2146
  @global_lisp_binding['_html_COMARKp'] = self.method( :_html_COMARKp_METHOD )
2579
2147
  @_html_COMARKp =
2580
2148
  trampCall(
@@ -2598,7 +2166,7 @@ trampCall(
2598
2166
  trampCall(
2599
2167
  begin
2600
2168
  begin
2601
- def self._html_COMARKh1_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2169
+ def self._html_COMARKh1_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKh1', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2602
2170
  @global_lisp_binding['_html_COMARKh1'] = self.method( :_html_COMARKh1_METHOD )
2603
2171
  @_html_COMARKh1 =
2604
2172
  trampCall(
@@ -2606,7 +2174,7 @@ trampCall(
2606
2174
  )
2607
2175
  end
2608
2176
  begin
2609
- def self._html_COMARKh1_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2177
+ def self._html_COMARKh1_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKh1', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2610
2178
  @global_lisp_binding['_html_COMARKh1'] = self.method( :_html_COMARKh1_METHOD )
2611
2179
  @_html_COMARKh1 =
2612
2180
  trampCall(
@@ -2624,7 +2192,7 @@ trampCall(
2624
2192
  )
2625
2193
  end
2626
2194
  begin
2627
- def self._html_COMARKh2_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2195
+ def self._html_COMARKh2_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKh2', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2628
2196
  @global_lisp_binding['_html_COMARKh2'] = self.method( :_html_COMARKh2_METHOD )
2629
2197
  @_html_COMARKh2 =
2630
2198
  trampCall(
@@ -2632,7 +2200,7 @@ trampCall(
2632
2200
  )
2633
2201
  end
2634
2202
  begin
2635
- def self._html_COMARKh2_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2203
+ def self._html_COMARKh2_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKh2', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2636
2204
  @global_lisp_binding['_html_COMARKh2'] = self.method( :_html_COMARKh2_METHOD )
2637
2205
  @_html_COMARKh2 =
2638
2206
  trampCall(
@@ -2650,7 +2218,7 @@ trampCall(
2650
2218
  )
2651
2219
  end
2652
2220
  begin
2653
- def self._html_COMARKh3_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2221
+ def self._html_COMARKh3_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKh3', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2654
2222
  @global_lisp_binding['_html_COMARKh3'] = self.method( :_html_COMARKh3_METHOD )
2655
2223
  @_html_COMARKh3 =
2656
2224
  trampCall(
@@ -2658,7 +2226,7 @@ trampCall(
2658
2226
  )
2659
2227
  end
2660
2228
  begin
2661
- def self._html_COMARKh3_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2229
+ def self._html_COMARKh3_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKh3', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2662
2230
  @global_lisp_binding['_html_COMARKh3'] = self.method( :_html_COMARKh3_METHOD )
2663
2231
  @_html_COMARKh3 =
2664
2232
  trampCall(
@@ -2676,7 +2244,7 @@ trampCall(
2676
2244
  )
2677
2245
  end
2678
2246
  begin
2679
- def self._html_COMARKh4_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2247
+ def self._html_COMARKh4_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKh4', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2680
2248
  @global_lisp_binding['_html_COMARKh4'] = self.method( :_html_COMARKh4_METHOD )
2681
2249
  @_html_COMARKh4 =
2682
2250
  trampCall(
@@ -2684,7 +2252,7 @@ trampCall(
2684
2252
  )
2685
2253
  end
2686
2254
  begin
2687
- def self._html_COMARKh4_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2255
+ def self._html_COMARKh4_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKh4', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2688
2256
  @global_lisp_binding['_html_COMARKh4'] = self.method( :_html_COMARKh4_METHOD )
2689
2257
  @_html_COMARKh4 =
2690
2258
  trampCall(
@@ -2702,7 +2270,7 @@ trampCall(
2702
2270
  )
2703
2271
  end
2704
2272
  begin
2705
- def self._html_COMARKh5_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2273
+ def self._html_COMARKh5_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKh5', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2706
2274
  @global_lisp_binding['_html_COMARKh5'] = self.method( :_html_COMARKh5_METHOD )
2707
2275
  @_html_COMARKh5 =
2708
2276
  trampCall(
@@ -2710,7 +2278,7 @@ trampCall(
2710
2278
  )
2711
2279
  end
2712
2280
  begin
2713
- def self._html_COMARKh5_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2281
+ def self._html_COMARKh5_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKh5', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2714
2282
  @global_lisp_binding['_html_COMARKh5'] = self.method( :_html_COMARKh5_METHOD )
2715
2283
  @_html_COMARKh5 =
2716
2284
  trampCall(
@@ -2728,7 +2296,7 @@ trampCall(
2728
2296
  )
2729
2297
  end
2730
2298
  begin
2731
- def self._html_COMARKh6_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2299
+ def self._html_COMARKh6_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKh6', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2732
2300
  @global_lisp_binding['_html_COMARKh6'] = self.method( :_html_COMARKh6_METHOD )
2733
2301
  @_html_COMARKh6 =
2734
2302
  trampCall(
@@ -2736,7 +2304,7 @@ trampCall(
2736
2304
  )
2737
2305
  end
2738
2306
  begin
2739
- def self._html_COMARKh6_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2307
+ def self._html_COMARKh6_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKh6', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2740
2308
  @global_lisp_binding['_html_COMARKh6'] = self.method( :_html_COMARKh6_METHOD )
2741
2309
  @_html_COMARKh6 =
2742
2310
  trampCall(
@@ -2760,7 +2328,7 @@ trampCall(
2760
2328
  trampCall(
2761
2329
  begin
2762
2330
  begin
2763
- def self._html_COMARKpre_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2331
+ def self._html_COMARKpre_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKpre', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2764
2332
  @global_lisp_binding['_html_COMARKpre'] = self.method( :_html_COMARKpre_METHOD )
2765
2333
  @_html_COMARKpre =
2766
2334
  trampCall(
@@ -2768,7 +2336,7 @@ trampCall(
2768
2336
  )
2769
2337
  end
2770
2338
  begin
2771
- def self._html_COMARKpre_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2339
+ def self._html_COMARKpre_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKpre', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2772
2340
  @global_lisp_binding['_html_COMARKpre'] = self.method( :_html_COMARKpre_METHOD )
2773
2341
  @_html_COMARKpre =
2774
2342
  trampCall(
@@ -2792,7 +2360,7 @@ trampCall(
2792
2360
  trampCall(
2793
2361
  begin
2794
2362
  begin
2795
- def self._html_COMARKq_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2363
+ def self._html_COMARKq_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKq', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2796
2364
  @global_lisp_binding['_html_COMARKq'] = self.method( :_html_COMARKq_METHOD )
2797
2365
  @_html_COMARKq =
2798
2366
  trampCall(
@@ -2800,7 +2368,7 @@ trampCall(
2800
2368
  )
2801
2369
  end
2802
2370
  begin
2803
- def self._html_COMARKq_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2371
+ def self._html_COMARKq_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKq', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2804
2372
  @global_lisp_binding['_html_COMARKq'] = self.method( :_html_COMARKq_METHOD )
2805
2373
  @_html_COMARKq =
2806
2374
  trampCall(
@@ -2824,7 +2392,7 @@ trampCall(
2824
2392
  trampCall(
2825
2393
  begin
2826
2394
  begin
2827
- def self._html_COMARKblockquote_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2395
+ def self._html_COMARKblockquote_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKblockquote', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2828
2396
  @global_lisp_binding['_html_COMARKblockquote'] = self.method( :_html_COMARKblockquote_METHOD )
2829
2397
  @_html_COMARKblockquote =
2830
2398
  trampCall(
@@ -2832,7 +2400,7 @@ trampCall(
2832
2400
  )
2833
2401
  end
2834
2402
  begin
2835
- def self._html_COMARKblockquote_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2403
+ def self._html_COMARKblockquote_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKblockquote', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2836
2404
  @global_lisp_binding['_html_COMARKblockquote'] = self.method( :_html_COMARKblockquote_METHOD )
2837
2405
  @_html_COMARKblockquote =
2838
2406
  trampCall(
@@ -2856,7 +2424,7 @@ trampCall(
2856
2424
  trampCall(
2857
2425
  begin
2858
2426
  begin
2859
- def self._html_COMARKins_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2427
+ def self._html_COMARKins_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKins', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2860
2428
  @global_lisp_binding['_html_COMARKins'] = self.method( :_html_COMARKins_METHOD )
2861
2429
  @_html_COMARKins =
2862
2430
  trampCall(
@@ -2864,7 +2432,7 @@ trampCall(
2864
2432
  )
2865
2433
  end
2866
2434
  begin
2867
- def self._html_COMARKins_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2435
+ def self._html_COMARKins_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKins', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2868
2436
  @global_lisp_binding['_html_COMARKins'] = self.method( :_html_COMARKins_METHOD )
2869
2437
  @_html_COMARKins =
2870
2438
  trampCall(
@@ -2882,7 +2450,7 @@ trampCall(
2882
2450
  )
2883
2451
  end
2884
2452
  begin
2885
- def self._html_COMARKdel_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2453
+ def self._html_COMARKdel_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKdel', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2886
2454
  @global_lisp_binding['_html_COMARKdel'] = self.method( :_html_COMARKdel_METHOD )
2887
2455
  @_html_COMARKdel =
2888
2456
  trampCall(
@@ -2890,7 +2458,7 @@ trampCall(
2890
2458
  )
2891
2459
  end
2892
2460
  begin
2893
- def self._html_COMARKdel_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2461
+ def self._html_COMARKdel_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKdel', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2894
2462
  @global_lisp_binding['_html_COMARKdel'] = self.method( :_html_COMARKdel_METHOD )
2895
2463
  @_html_COMARKdel =
2896
2464
  trampCall(
@@ -2914,7 +2482,7 @@ trampCall(
2914
2482
  trampCall(
2915
2483
  begin
2916
2484
  begin
2917
- def self._html_COMARKdl_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2485
+ def self._html_COMARKdl_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKdl', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2918
2486
  @global_lisp_binding['_html_COMARKdl'] = self.method( :_html_COMARKdl_METHOD )
2919
2487
  @_html_COMARKdl =
2920
2488
  trampCall(
@@ -2922,7 +2490,7 @@ trampCall(
2922
2490
  )
2923
2491
  end
2924
2492
  begin
2925
- def self._html_COMARKdl_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2493
+ def self._html_COMARKdl_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKdl', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2926
2494
  @global_lisp_binding['_html_COMARKdl'] = self.method( :_html_COMARKdl_METHOD )
2927
2495
  @_html_COMARKdl =
2928
2496
  trampCall(
@@ -2940,7 +2508,7 @@ trampCall(
2940
2508
  )
2941
2509
  end
2942
2510
  begin
2943
- def self._html_COMARKdt_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2511
+ def self._html_COMARKdt_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKdt', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2944
2512
  @global_lisp_binding['_html_COMARKdt'] = self.method( :_html_COMARKdt_METHOD )
2945
2513
  @_html_COMARKdt =
2946
2514
  trampCall(
@@ -2948,7 +2516,7 @@ trampCall(
2948
2516
  )
2949
2517
  end
2950
2518
  begin
2951
- def self._html_COMARKdt_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2519
+ def self._html_COMARKdt_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKdt', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2952
2520
  @global_lisp_binding['_html_COMARKdt'] = self.method( :_html_COMARKdt_METHOD )
2953
2521
  @_html_COMARKdt =
2954
2522
  trampCall(
@@ -2966,7 +2534,7 @@ trampCall(
2966
2534
  )
2967
2535
  end
2968
2536
  begin
2969
- def self._html_COMARKdd_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2537
+ def self._html_COMARKdd_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKdd', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2970
2538
  @global_lisp_binding['_html_COMARKdd'] = self.method( :_html_COMARKdd_METHOD )
2971
2539
  @_html_COMARKdd =
2972
2540
  trampCall(
@@ -2974,7 +2542,7 @@ trampCall(
2974
2542
  )
2975
2543
  end
2976
2544
  begin
2977
- def self._html_COMARKdd_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2545
+ def self._html_COMARKdd_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKdd', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2978
2546
  @global_lisp_binding['_html_COMARKdd'] = self.method( :_html_COMARKdd_METHOD )
2979
2547
  @_html_COMARKdd =
2980
2548
  trampCall(
@@ -2992,7 +2560,7 @@ trampCall(
2992
2560
  )
2993
2561
  end
2994
2562
  begin
2995
- def self._html_COMARKol_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2563
+ def self._html_COMARKol_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKol', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2996
2564
  @global_lisp_binding['_html_COMARKol'] = self.method( :_html_COMARKol_METHOD )
2997
2565
  @_html_COMARKol =
2998
2566
  trampCall(
@@ -3000,7 +2568,7 @@ trampCall(
3000
2568
  )
3001
2569
  end
3002
2570
  begin
3003
- def self._html_COMARKol_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2571
+ def self._html_COMARKol_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKol', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3004
2572
  @global_lisp_binding['_html_COMARKol'] = self.method( :_html_COMARKol_METHOD )
3005
2573
  @_html_COMARKol =
3006
2574
  trampCall(
@@ -3018,7 +2586,7 @@ trampCall(
3018
2586
  )
3019
2587
  end
3020
2588
  begin
3021
- def self._html_COMARKul_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2589
+ def self._html_COMARKul_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKul', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3022
2590
  @global_lisp_binding['_html_COMARKul'] = self.method( :_html_COMARKul_METHOD )
3023
2591
  @_html_COMARKul =
3024
2592
  trampCall(
@@ -3026,7 +2594,7 @@ trampCall(
3026
2594
  )
3027
2595
  end
3028
2596
  begin
3029
- def self._html_COMARKul_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2597
+ def self._html_COMARKul_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKul', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3030
2598
  @global_lisp_binding['_html_COMARKul'] = self.method( :_html_COMARKul_METHOD )
3031
2599
  @_html_COMARKul =
3032
2600
  trampCall(
@@ -3044,7 +2612,7 @@ trampCall(
3044
2612
  )
3045
2613
  end
3046
2614
  begin
3047
- def self._html_COMARKli_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2615
+ def self._html_COMARKli_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKli', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3048
2616
  @global_lisp_binding['_html_COMARKli'] = self.method( :_html_COMARKli_METHOD )
3049
2617
  @_html_COMARKli =
3050
2618
  trampCall(
@@ -3052,7 +2620,7 @@ trampCall(
3052
2620
  )
3053
2621
  end
3054
2622
  begin
3055
- def self._html_COMARKli_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2623
+ def self._html_COMARKli_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKli', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3056
2624
  @global_lisp_binding['_html_COMARKli'] = self.method( :_html_COMARKli_METHOD )
3057
2625
  @_html_COMARKli =
3058
2626
  trampCall(
@@ -3076,7 +2644,7 @@ trampCall(
3076
2644
  trampCall(
3077
2645
  begin
3078
2646
  begin
3079
- def self._html_COMARKform_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2647
+ def self._html_COMARKform_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKform', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3080
2648
  @global_lisp_binding['_html_COMARKform'] = self.method( :_html_COMARKform_METHOD )
3081
2649
  @_html_COMARKform =
3082
2650
  trampCall(
@@ -3084,7 +2652,7 @@ trampCall(
3084
2652
  )
3085
2653
  end
3086
2654
  begin
3087
- def self._html_COMARKform_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2655
+ def self._html_COMARKform_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKform', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3088
2656
  @global_lisp_binding['_html_COMARKform'] = self.method( :_html_COMARKform_METHOD )
3089
2657
  @_html_COMARKform =
3090
2658
  trampCall(
@@ -3102,7 +2670,7 @@ trampCall(
3102
2670
  )
3103
2671
  end
3104
2672
  begin
3105
- def self._html_COMARKlabel_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2673
+ def self._html_COMARKlabel_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKlabel', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3106
2674
  @global_lisp_binding['_html_COMARKlabel'] = self.method( :_html_COMARKlabel_METHOD )
3107
2675
  @_html_COMARKlabel =
3108
2676
  trampCall(
@@ -3110,7 +2678,7 @@ trampCall(
3110
2678
  )
3111
2679
  end
3112
2680
  begin
3113
- def self._html_COMARKlabel_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2681
+ def self._html_COMARKlabel_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKlabel', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3114
2682
  @global_lisp_binding['_html_COMARKlabel'] = self.method( :_html_COMARKlabel_METHOD )
3115
2683
  @_html_COMARKlabel =
3116
2684
  trampCall(
@@ -3128,7 +2696,7 @@ trampCall(
3128
2696
  )
3129
2697
  end
3130
2698
  begin
3131
- def self._html_COMARKinput_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2699
+ def self._html_COMARKinput_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKinput', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3132
2700
  @global_lisp_binding['_html_COMARKinput'] = self.method( :_html_COMARKinput_METHOD )
3133
2701
  @_html_COMARKinput =
3134
2702
  trampCall(
@@ -3136,7 +2704,7 @@ trampCall(
3136
2704
  )
3137
2705
  end
3138
2706
  begin
3139
- def self._html_COMARKinput_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2707
+ def self._html_COMARKinput_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKinput', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3140
2708
  @global_lisp_binding['_html_COMARKinput'] = self.method( :_html_COMARKinput_METHOD )
3141
2709
  @_html_COMARKinput =
3142
2710
  trampCall(
@@ -3156,7 +2724,7 @@ trampCall(
3156
2724
  )
3157
2725
  end
3158
2726
  begin
3159
- def self._html_COMARKselect_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2727
+ def self._html_COMARKselect_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKselect', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3160
2728
  @global_lisp_binding['_html_COMARKselect'] = self.method( :_html_COMARKselect_METHOD )
3161
2729
  @_html_COMARKselect =
3162
2730
  trampCall(
@@ -3164,7 +2732,7 @@ trampCall(
3164
2732
  )
3165
2733
  end
3166
2734
  begin
3167
- def self._html_COMARKselect_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2735
+ def self._html_COMARKselect_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKselect', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3168
2736
  @global_lisp_binding['_html_COMARKselect'] = self.method( :_html_COMARKselect_METHOD )
3169
2737
  @_html_COMARKselect =
3170
2738
  trampCall(
@@ -3182,7 +2750,7 @@ trampCall(
3182
2750
  )
3183
2751
  end
3184
2752
  begin
3185
- def self._html_COMARKoptgroup_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2753
+ def self._html_COMARKoptgroup_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKoptgroup', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3186
2754
  @global_lisp_binding['_html_COMARKoptgroup'] = self.method( :_html_COMARKoptgroup_METHOD )
3187
2755
  @_html_COMARKoptgroup =
3188
2756
  trampCall(
@@ -3190,7 +2758,7 @@ trampCall(
3190
2758
  )
3191
2759
  end
3192
2760
  begin
3193
- def self._html_COMARKoptgroup_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2761
+ def self._html_COMARKoptgroup_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKoptgroup', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3194
2762
  @global_lisp_binding['_html_COMARKoptgroup'] = self.method( :_html_COMARKoptgroup_METHOD )
3195
2763
  @_html_COMARKoptgroup =
3196
2764
  trampCall(
@@ -3208,7 +2776,7 @@ trampCall(
3208
2776
  )
3209
2777
  end
3210
2778
  begin
3211
- def self._html_COMARKoption_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2779
+ def self._html_COMARKoption_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKoption', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3212
2780
  @global_lisp_binding['_html_COMARKoption'] = self.method( :_html_COMARKoption_METHOD )
3213
2781
  @_html_COMARKoption =
3214
2782
  trampCall(
@@ -3216,7 +2784,7 @@ trampCall(
3216
2784
  )
3217
2785
  end
3218
2786
  begin
3219
- def self._html_COMARKoption_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2787
+ def self._html_COMARKoption_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKoption', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3220
2788
  @global_lisp_binding['_html_COMARKoption'] = self.method( :_html_COMARKoption_METHOD )
3221
2789
  @_html_COMARKoption =
3222
2790
  trampCall(
@@ -3234,7 +2802,7 @@ trampCall(
3234
2802
  )
3235
2803
  end
3236
2804
  begin
3237
- def self._html_COMARKtextarea_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2805
+ def self._html_COMARKtextarea_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKtextarea', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3238
2806
  @global_lisp_binding['_html_COMARKtextarea'] = self.method( :_html_COMARKtextarea_METHOD )
3239
2807
  @_html_COMARKtextarea =
3240
2808
  trampCall(
@@ -3242,7 +2810,7 @@ trampCall(
3242
2810
  )
3243
2811
  end
3244
2812
  begin
3245
- def self._html_COMARKtextarea_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2813
+ def self._html_COMARKtextarea_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKtextarea', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3246
2814
  @global_lisp_binding['_html_COMARKtextarea'] = self.method( :_html_COMARKtextarea_METHOD )
3247
2815
  @_html_COMARKtextarea =
3248
2816
  trampCall(
@@ -3260,7 +2828,7 @@ trampCall(
3260
2828
  )
3261
2829
  end
3262
2830
  begin
3263
- def self._html_COMARKfieldset_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2831
+ def self._html_COMARKfieldset_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKfieldset', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3264
2832
  @global_lisp_binding['_html_COMARKfieldset'] = self.method( :_html_COMARKfieldset_METHOD )
3265
2833
  @_html_COMARKfieldset =
3266
2834
  trampCall(
@@ -3268,7 +2836,7 @@ trampCall(
3268
2836
  )
3269
2837
  end
3270
2838
  begin
3271
- def self._html_COMARKfieldset_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2839
+ def self._html_COMARKfieldset_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKfieldset', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3272
2840
  @global_lisp_binding['_html_COMARKfieldset'] = self.method( :_html_COMARKfieldset_METHOD )
3273
2841
  @_html_COMARKfieldset =
3274
2842
  trampCall(
@@ -3286,7 +2854,7 @@ trampCall(
3286
2854
  )
3287
2855
  end
3288
2856
  begin
3289
- def self._html_COMARKlegend_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2857
+ def self._html_COMARKlegend_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKlegend', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3290
2858
  @global_lisp_binding['_html_COMARKlegend'] = self.method( :_html_COMARKlegend_METHOD )
3291
2859
  @_html_COMARKlegend =
3292
2860
  trampCall(
@@ -3294,7 +2862,7 @@ trampCall(
3294
2862
  )
3295
2863
  end
3296
2864
  begin
3297
- def self._html_COMARKlegend_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2865
+ def self._html_COMARKlegend_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKlegend', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3298
2866
  @global_lisp_binding['_html_COMARKlegend'] = self.method( :_html_COMARKlegend_METHOD )
3299
2867
  @_html_COMARKlegend =
3300
2868
  trampCall(
@@ -3312,7 +2880,7 @@ trampCall(
3312
2880
  )
3313
2881
  end
3314
2882
  begin
3315
- def self._html_COMARKbutton_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2883
+ def self._html_COMARKbutton_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKbutton', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3316
2884
  @global_lisp_binding['_html_COMARKbutton'] = self.method( :_html_COMARKbutton_METHOD )
3317
2885
  @_html_COMARKbutton =
3318
2886
  trampCall(
@@ -3320,7 +2888,7 @@ trampCall(
3320
2888
  )
3321
2889
  end
3322
2890
  begin
3323
- def self._html_COMARKbutton_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2891
+ def self._html_COMARKbutton_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKbutton', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3324
2892
  @global_lisp_binding['_html_COMARKbutton'] = self.method( :_html_COMARKbutton_METHOD )
3325
2893
  @_html_COMARKbutton =
3326
2894
  trampCall(
@@ -3344,7 +2912,7 @@ trampCall(
3344
2912
  trampCall(
3345
2913
  begin
3346
2914
  begin
3347
- def self._html_COMARKtable_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2915
+ def self._html_COMARKtable_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKtable', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3348
2916
  @global_lisp_binding['_html_COMARKtable'] = self.method( :_html_COMARKtable_METHOD )
3349
2917
  @_html_COMARKtable =
3350
2918
  trampCall(
@@ -3352,7 +2920,7 @@ trampCall(
3352
2920
  )
3353
2921
  end
3354
2922
  begin
3355
- def self._html_COMARKtable_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2923
+ def self._html_COMARKtable_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKtable', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3356
2924
  @global_lisp_binding['_html_COMARKtable'] = self.method( :_html_COMARKtable_METHOD )
3357
2925
  @_html_COMARKtable =
3358
2926
  trampCall(
@@ -3370,7 +2938,7 @@ trampCall(
3370
2938
  )
3371
2939
  end
3372
2940
  begin
3373
- def self._html_COMARKcaption_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2941
+ def self._html_COMARKcaption_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKcaption', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3374
2942
  @global_lisp_binding['_html_COMARKcaption'] = self.method( :_html_COMARKcaption_METHOD )
3375
2943
  @_html_COMARKcaption =
3376
2944
  trampCall(
@@ -3378,7 +2946,7 @@ trampCall(
3378
2946
  )
3379
2947
  end
3380
2948
  begin
3381
- def self._html_COMARKcaption_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2949
+ def self._html_COMARKcaption_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKcaption', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3382
2950
  @global_lisp_binding['_html_COMARKcaption'] = self.method( :_html_COMARKcaption_METHOD )
3383
2951
  @_html_COMARKcaption =
3384
2952
  trampCall(
@@ -3396,7 +2964,7 @@ trampCall(
3396
2964
  )
3397
2965
  end
3398
2966
  begin
3399
- def self._html_COMARKthead_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2967
+ def self._html_COMARKthead_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKthead', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3400
2968
  @global_lisp_binding['_html_COMARKthead'] = self.method( :_html_COMARKthead_METHOD )
3401
2969
  @_html_COMARKthead =
3402
2970
  trampCall(
@@ -3404,7 +2972,7 @@ trampCall(
3404
2972
  )
3405
2973
  end
3406
2974
  begin
3407
- def self._html_COMARKthead_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2975
+ def self._html_COMARKthead_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKthead', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3408
2976
  @global_lisp_binding['_html_COMARKthead'] = self.method( :_html_COMARKthead_METHOD )
3409
2977
  @_html_COMARKthead =
3410
2978
  trampCall(
@@ -3422,7 +2990,7 @@ trampCall(
3422
2990
  )
3423
2991
  end
3424
2992
  begin
3425
- def self._html_COMARKtfoot_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
2993
+ def self._html_COMARKtfoot_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKtfoot', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3426
2994
  @global_lisp_binding['_html_COMARKtfoot'] = self.method( :_html_COMARKtfoot_METHOD )
3427
2995
  @_html_COMARKtfoot =
3428
2996
  trampCall(
@@ -3430,7 +2998,7 @@ trampCall(
3430
2998
  )
3431
2999
  end
3432
3000
  begin
3433
- def self._html_COMARKtfoot_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3001
+ def self._html_COMARKtfoot_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKtfoot', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3434
3002
  @global_lisp_binding['_html_COMARKtfoot'] = self.method( :_html_COMARKtfoot_METHOD )
3435
3003
  @_html_COMARKtfoot =
3436
3004
  trampCall(
@@ -3448,7 +3016,7 @@ trampCall(
3448
3016
  )
3449
3017
  end
3450
3018
  begin
3451
- def self._html_COMARKtbody_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3019
+ def self._html_COMARKtbody_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKtbody', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3452
3020
  @global_lisp_binding['_html_COMARKtbody'] = self.method( :_html_COMARKtbody_METHOD )
3453
3021
  @_html_COMARKtbody =
3454
3022
  trampCall(
@@ -3456,7 +3024,7 @@ trampCall(
3456
3024
  )
3457
3025
  end
3458
3026
  begin
3459
- def self._html_COMARKtbody_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3027
+ def self._html_COMARKtbody_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKtbody', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3460
3028
  @global_lisp_binding['_html_COMARKtbody'] = self.method( :_html_COMARKtbody_METHOD )
3461
3029
  @_html_COMARKtbody =
3462
3030
  trampCall(
@@ -3474,7 +3042,7 @@ trampCall(
3474
3042
  )
3475
3043
  end
3476
3044
  begin
3477
- def self._html_COMARKcolgroup_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3045
+ def self._html_COMARKcolgroup_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKcolgroup', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3478
3046
  @global_lisp_binding['_html_COMARKcolgroup'] = self.method( :_html_COMARKcolgroup_METHOD )
3479
3047
  @_html_COMARKcolgroup =
3480
3048
  trampCall(
@@ -3482,7 +3050,7 @@ trampCall(
3482
3050
  )
3483
3051
  end
3484
3052
  begin
3485
- def self._html_COMARKcolgroup_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3053
+ def self._html_COMARKcolgroup_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKcolgroup', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3486
3054
  @global_lisp_binding['_html_COMARKcolgroup'] = self.method( :_html_COMARKcolgroup_METHOD )
3487
3055
  @_html_COMARKcolgroup =
3488
3056
  trampCall(
@@ -3500,7 +3068,7 @@ trampCall(
3500
3068
  )
3501
3069
  end
3502
3070
  begin
3503
- def self._html_COMARKcol_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3071
+ def self._html_COMARKcol_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKcol', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3504
3072
  @global_lisp_binding['_html_COMARKcol'] = self.method( :_html_COMARKcol_METHOD )
3505
3073
  @_html_COMARKcol =
3506
3074
  trampCall(
@@ -3508,7 +3076,7 @@ trampCall(
3508
3076
  )
3509
3077
  end
3510
3078
  begin
3511
- def self._html_COMARKcol_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3079
+ def self._html_COMARKcol_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKcol', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3512
3080
  @global_lisp_binding['_html_COMARKcol'] = self.method( :_html_COMARKcol_METHOD )
3513
3081
  @_html_COMARKcol =
3514
3082
  trampCall(
@@ -3528,7 +3096,7 @@ trampCall(
3528
3096
  )
3529
3097
  end
3530
3098
  begin
3531
- def self._html_COMARKtr_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3099
+ def self._html_COMARKtr_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKtr', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3532
3100
  @global_lisp_binding['_html_COMARKtr'] = self.method( :_html_COMARKtr_METHOD )
3533
3101
  @_html_COMARKtr =
3534
3102
  trampCall(
@@ -3536,7 +3104,7 @@ trampCall(
3536
3104
  )
3537
3105
  end
3538
3106
  begin
3539
- def self._html_COMARKtr_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3107
+ def self._html_COMARKtr_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKtr', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3540
3108
  @global_lisp_binding['_html_COMARKtr'] = self.method( :_html_COMARKtr_METHOD )
3541
3109
  @_html_COMARKtr =
3542
3110
  trampCall(
@@ -3554,7 +3122,7 @@ trampCall(
3554
3122
  )
3555
3123
  end
3556
3124
  begin
3557
- def self._html_COMARKth_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3125
+ def self._html_COMARKth_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKth', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3558
3126
  @global_lisp_binding['_html_COMARKth'] = self.method( :_html_COMARKth_METHOD )
3559
3127
  @_html_COMARKth =
3560
3128
  trampCall(
@@ -3562,7 +3130,7 @@ trampCall(
3562
3130
  )
3563
3131
  end
3564
3132
  begin
3565
- def self._html_COMARKth_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3133
+ def self._html_COMARKth_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKth', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3566
3134
  @global_lisp_binding['_html_COMARKth'] = self.method( :_html_COMARKth_METHOD )
3567
3135
  @_html_COMARKth =
3568
3136
  trampCall(
@@ -3580,7 +3148,7 @@ trampCall(
3580
3148
  )
3581
3149
  end
3582
3150
  begin
3583
- def self._html_COMARKtd_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3151
+ def self._html_COMARKtd_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKtd', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3584
3152
  @global_lisp_binding['_html_COMARKtd'] = self.method( :_html_COMARKtd_METHOD )
3585
3153
  @_html_COMARKtd =
3586
3154
  trampCall(
@@ -3588,7 +3156,7 @@ trampCall(
3588
3156
  )
3589
3157
  end
3590
3158
  begin
3591
- def self._html_COMARKtd_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3159
+ def self._html_COMARKtd_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKtd', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3592
3160
  @global_lisp_binding['_html_COMARKtd'] = self.method( :_html_COMARKtd_METHOD )
3593
3161
  @_html_COMARKtd =
3594
3162
  trampCall(
@@ -3612,7 +3180,7 @@ trampCall(
3612
3180
  trampCall(
3613
3181
  begin
3614
3182
  begin
3615
- def self._html_COMARKhead_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3183
+ def self._html_COMARKhead_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKhead', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3616
3184
  @global_lisp_binding['_html_COMARKhead'] = self.method( :_html_COMARKhead_METHOD )
3617
3185
  @_html_COMARKhead =
3618
3186
  trampCall(
@@ -3620,7 +3188,7 @@ trampCall(
3620
3188
  )
3621
3189
  end
3622
3190
  begin
3623
- def self._html_COMARKhead_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3191
+ def self._html_COMARKhead_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKhead', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3624
3192
  @global_lisp_binding['_html_COMARKhead'] = self.method( :_html_COMARKhead_METHOD )
3625
3193
  @_html_COMARKhead =
3626
3194
  trampCall(
@@ -3638,7 +3206,7 @@ trampCall(
3638
3206
  )
3639
3207
  end
3640
3208
  begin
3641
- def self._html_COMARKtitle_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3209
+ def self._html_COMARKtitle_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKtitle', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3642
3210
  @global_lisp_binding['_html_COMARKtitle'] = self.method( :_html_COMARKtitle_METHOD )
3643
3211
  @_html_COMARKtitle =
3644
3212
  trampCall(
@@ -3646,7 +3214,7 @@ trampCall(
3646
3214
  )
3647
3215
  end
3648
3216
  begin
3649
- def self._html_COMARKtitle_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3217
+ def self._html_COMARKtitle_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKtitle', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3650
3218
  @global_lisp_binding['_html_COMARKtitle'] = self.method( :_html_COMARKtitle_METHOD )
3651
3219
  @_html_COMARKtitle =
3652
3220
  trampCall(
@@ -3664,7 +3232,7 @@ trampCall(
3664
3232
  )
3665
3233
  end
3666
3234
  begin
3667
- def self._html_COMARKbase_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3235
+ def self._html_COMARKbase_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKbase', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3668
3236
  @global_lisp_binding['_html_COMARKbase'] = self.method( :_html_COMARKbase_METHOD )
3669
3237
  @_html_COMARKbase =
3670
3238
  trampCall(
@@ -3672,7 +3240,7 @@ trampCall(
3672
3240
  )
3673
3241
  end
3674
3242
  begin
3675
- def self._html_COMARKbase_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3243
+ def self._html_COMARKbase_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKbase', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3676
3244
  @global_lisp_binding['_html_COMARKbase'] = self.method( :_html_COMARKbase_METHOD )
3677
3245
  @_html_COMARKbase =
3678
3246
  trampCall(
@@ -3692,7 +3260,7 @@ trampCall(
3692
3260
  )
3693
3261
  end
3694
3262
  begin
3695
- def self._html_COMARKmeta_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3263
+ def self._html_COMARKmeta_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKmeta', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3696
3264
  @global_lisp_binding['_html_COMARKmeta'] = self.method( :_html_COMARKmeta_METHOD )
3697
3265
  @_html_COMARKmeta =
3698
3266
  trampCall(
@@ -3700,7 +3268,7 @@ trampCall(
3700
3268
  )
3701
3269
  end
3702
3270
  begin
3703
- def self._html_COMARKmeta_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3271
+ def self._html_COMARKmeta_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKmeta', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3704
3272
  @global_lisp_binding['_html_COMARKmeta'] = self.method( :_html_COMARKmeta_METHOD )
3705
3273
  @_html_COMARKmeta =
3706
3274
  trampCall(
@@ -3720,7 +3288,7 @@ trampCall(
3720
3288
  )
3721
3289
  end
3722
3290
  begin
3723
- def self._html_COMARKstyle_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3291
+ def self._html_COMARKstyle_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKstyle', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3724
3292
  @global_lisp_binding['_html_COMARKstyle'] = self.method( :_html_COMARKstyle_METHOD )
3725
3293
  @_html_COMARKstyle =
3726
3294
  trampCall(
@@ -3728,7 +3296,7 @@ trampCall(
3728
3296
  )
3729
3297
  end
3730
3298
  begin
3731
- def self._html_COMARKstyle_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3299
+ def self._html_COMARKstyle_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKstyle', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3732
3300
  @global_lisp_binding['_html_COMARKstyle'] = self.method( :_html_COMARKstyle_METHOD )
3733
3301
  @_html_COMARKstyle =
3734
3302
  trampCall(
@@ -3746,7 +3314,7 @@ trampCall(
3746
3314
  )
3747
3315
  end
3748
3316
  begin
3749
- def self._html_COMARKscript_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3317
+ def self._html_COMARKscript_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKscript', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3750
3318
  @global_lisp_binding['_html_COMARKscript'] = self.method( :_html_COMARKscript_METHOD )
3751
3319
  @_html_COMARKscript =
3752
3320
  trampCall(
@@ -3754,7 +3322,7 @@ trampCall(
3754
3322
  )
3755
3323
  end
3756
3324
  begin
3757
- def self._html_COMARKscript_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3325
+ def self._html_COMARKscript_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKscript', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3758
3326
  @global_lisp_binding['_html_COMARKscript'] = self.method( :_html_COMARKscript_METHOD )
3759
3327
  @_html_COMARKscript =
3760
3328
  trampCall(
@@ -3772,7 +3340,7 @@ trampCall(
3772
3340
  )
3773
3341
  end
3774
3342
  begin
3775
- def self._html_COMARKnoscript_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3343
+ def self._html_COMARKnoscript_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKnoscript', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3776
3344
  @global_lisp_binding['_html_COMARKnoscript'] = self.method( :_html_COMARKnoscript_METHOD )
3777
3345
  @_html_COMARKnoscript =
3778
3346
  trampCall(
@@ -3780,7 +3348,7 @@ trampCall(
3780
3348
  )
3781
3349
  end
3782
3350
  begin
3783
- def self._html_COMARKnoscript_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3351
+ def self._html_COMARKnoscript_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKnoscript', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3784
3352
  @global_lisp_binding['_html_COMARKnoscript'] = self.method( :_html_COMARKnoscript_METHOD )
3785
3353
  @_html_COMARKnoscript =
3786
3354
  trampCall(
@@ -3804,7 +3372,7 @@ trampCall(
3804
3372
  trampCall(
3805
3373
  begin
3806
3374
  begin
3807
- def self._html_COMARKhtml_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3375
+ def self._html_COMARKhtml_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKhtml', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3808
3376
  @global_lisp_binding['_html_COMARKhtml'] = self.method( :_html_COMARKhtml_METHOD )
3809
3377
  @_html_COMARKhtml =
3810
3378
  trampCall(
@@ -3812,7 +3380,7 @@ trampCall(
3812
3380
  )
3813
3381
  end
3814
3382
  begin
3815
- def self._html_COMARKhtml_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3383
+ def self._html_COMARKhtml_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKhtml', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3816
3384
  @global_lisp_binding['_html_COMARKhtml'] = self.method( :_html_COMARKhtml_METHOD )
3817
3385
  @_html_COMARKhtml =
3818
3386
  trampCall(
@@ -3836,7 +3404,7 @@ trampCall(
3836
3404
  trampCall(
3837
3405
  begin
3838
3406
  begin
3839
- def self._html_COMARKframeset_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3407
+ def self._html_COMARKframeset_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKframeset', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3840
3408
  @global_lisp_binding['_html_COMARKframeset'] = self.method( :_html_COMARKframeset_METHOD )
3841
3409
  @_html_COMARKframeset =
3842
3410
  trampCall(
@@ -3844,7 +3412,7 @@ trampCall(
3844
3412
  )
3845
3413
  end
3846
3414
  begin
3847
- def self._html_COMARKframeset_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3415
+ def self._html_COMARKframeset_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKframeset', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3848
3416
  @global_lisp_binding['_html_COMARKframeset'] = self.method( :_html_COMARKframeset_METHOD )
3849
3417
  @_html_COMARKframeset =
3850
3418
  trampCall(
@@ -3862,7 +3430,7 @@ trampCall(
3862
3430
  )
3863
3431
  end
3864
3432
  begin
3865
- def self._html_COMARKframe_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3433
+ def self._html_COMARKframe_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKframe', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3866
3434
  @global_lisp_binding['_html_COMARKframe'] = self.method( :_html_COMARKframe_METHOD )
3867
3435
  @_html_COMARKframe =
3868
3436
  trampCall(
@@ -3870,7 +3438,7 @@ trampCall(
3870
3438
  )
3871
3439
  end
3872
3440
  begin
3873
- def self._html_COMARKframe_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3441
+ def self._html_COMARKframe_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKframe', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3874
3442
  @global_lisp_binding['_html_COMARKframe'] = self.method( :_html_COMARKframe_METHOD )
3875
3443
  @_html_COMARKframe =
3876
3444
  trampCall(
@@ -3888,7 +3456,7 @@ trampCall(
3888
3456
  )
3889
3457
  end
3890
3458
  begin
3891
- def self._html_COMARKnoframes_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3459
+ def self._html_COMARKnoframes_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKnoframes', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3892
3460
  @global_lisp_binding['_html_COMARKnoframes'] = self.method( :_html_COMARKnoframes_METHOD )
3893
3461
  @_html_COMARKnoframes =
3894
3462
  trampCall(
@@ -3896,7 +3464,7 @@ trampCall(
3896
3464
  )
3897
3465
  end
3898
3466
  begin
3899
- def self._html_COMARKnoframes_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3467
+ def self._html_COMARKnoframes_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKnoframes', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3900
3468
  @global_lisp_binding['_html_COMARKnoframes'] = self.method( :_html_COMARKnoframes_METHOD )
3901
3469
  @_html_COMARKnoframes =
3902
3470
  trampCall(
@@ -3914,7 +3482,7 @@ trampCall(
3914
3482
  )
3915
3483
  end
3916
3484
  begin
3917
- def self._html_COMARKiframe_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3485
+ def self._html_COMARKiframe_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKiframe', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3918
3486
  @global_lisp_binding['_html_COMARKiframe'] = self.method( :_html_COMARKiframe_METHOD )
3919
3487
  @_html_COMARKiframe =
3920
3488
  trampCall(
@@ -3922,7 +3490,7 @@ trampCall(
3922
3490
  )
3923
3491
  end
3924
3492
  begin
3925
- def self._html_COMARKiframe_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3493
+ def self._html_COMARKiframe_METHOD( origname, pred, args ) lispMethodEntry( origname, true ) ; ret = callProcedure( '_html_COMARKiframe', origname, pred, args ) ; lispMethodExit( origname, true ) ; return ret end
3926
3494
  @global_lisp_binding['_html_COMARKiframe'] = self.method( :_html_COMARKiframe_METHOD )
3927
3495
  @_html_COMARKiframe =
3928
3496
  trampCall(