home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 3 / AACD03.BIN / AACD / Programming / sofa / archive / SmallEiffel.lha / SmallEiffel / short / html1 / HOOKS.SH < prev    next >
Linux/UNIX/POSIX Shell Script  |  1999-06-05  |  24KB  |  724 lines
  1. #! /bin/sh
  2. #
  3. # Edit and run this file to change hooks of this directory.
  4. #
  5.  
  6. chmod a+w *
  7.  
  8. # test if echo command interprets -n option
  9. xxx=`echo -n`
  10.  
  11. if [ -z "$xxx" ]
  12.   then
  13.     eopt=-n
  14.     eend=
  15.   else
  16.     eopt=
  17.     eend="""\c"""
  18. fi
  19.  
  20. # ---------------------------------------------------------------------------
  21. # "hook000" - If this hook file exists, the contents of this file is
  22. # printed very first.
  23. cat >hook000 <<END
  24. <!doctype html system>
  25. <!-- Generated by SmallEiffel short -html1 style hooks -->
  26. <html>
  27. <head>
  28. <title>
  29. END
  30.  
  31. # "hook002" - If this hook file exists, the contents of this file is
  32. # printed after an extra class name.
  33. cat >hook002 <<END
  34. : Eiffel class interface</title>
  35. </head>
  36. <body>
  37. <pre>
  38. END
  39.  
  40. # "hook010" - If this hook file exists, and if the processed class is
  41. # an expanded one, the contents of this file is printed before the
  42. # class name to replace the default string "expanded class interface
  43. # ".
  44. echo $eopt '<strong>expanded class interface</strong> '$eend > hook010
  45.  
  46. # "hook011" - If this hook file exists, and if the processed class is
  47. # an deferred one, the contents of this file is printed before the
  48. # class name to replace the default string "deferred class interface
  49. # ".
  50. echo $eopt '<strong>deferred class interface</strong> '$eend > hook011
  51.  
  52. # "hook012" - If this hook file exists, and if the processed class is
  53. # an ordinary one (not deferred nor expanded) the contents of this
  54. # file is printed before the class name to replace the default string
  55. # "class interface ".
  56. echo $eopt '<strong>class interface</strong> '$eend > hook012
  57.  
  58. # "hook013" _ If this hook file exists, the contents of this file is
  59. # printed before the class name whatever the kind of class (expanded,
  60. # deferred or ordinary) to replace the default empty string "".
  61. rm -f hook013
  62.  
  63. # "hook014" - If this hook exists, the contents of the file is printed
  64. # after the class name to replace the default string "%N".
  65. rm -f hook014
  66.  
  67. # "hook015" - If this hook file exists, and if a class header comment
  68. # is present, this file is printed once before the heading class
  69. # comment.
  70. echo $eopt '<em>'$eend > hook015
  71.  
  72. # "hook016" - If this hook file exists, and if an heading comment is
  73. # present, the contents of this file is printed to replace the default
  74. # string " -- " at the beginning of each comment line.
  75. rm -f hook016
  76.  
  77. # "hook017" - If this hook file exists, and if an heading comment is
  78. # present, the contents of this file is printed to replace the default
  79. # string "%N" at the end of each comment line.
  80. rm -f hook017
  81.  
  82. # "hook018" - If this hook file exists, and if a class heading comment
  83. # is present, the contents of this file is printed once after the
  84. # heading comment.
  85. echo $eopt '</em>
  86. '$eend > hook018
  87.  
  88. # "hook019" - If this hook file exists, and if the processed class has
  89. # no heading comment, this file is printed once.
  90. echo $eopt '
  91. '$eend > hook019
  92.  
  93. # ---------------------------------------------------------------------------
  94. # 2.2. Changing output of the creation list
  95.  
  96. # "hook100" - If it exists, this file is printed before the creation
  97. # list to replace the default string "creation%N".
  98. echo $eopt '<strong>creation</strong>
  99. '$eend > hook100
  100.  
  101. # "hook101" - If it exists, this file is printed after the creation
  102. # list to replace the default empty string "".
  103. rm -f hook101
  104.  
  105. # "hook102" - If it exists, this file is printed when class has no
  106. # creation list.
  107. rm -f hook102
  108.  
  109. # ---------------------------------------------------------------------------
  110. # 2.3. Changing output of the feature list
  111.  
  112. # "hook200" - If exists, printed before the feature list when option
  113. # -sort is selected to replace the default string "feature(s)%N".
  114. echo $eopt '<strong>feature(s)</strong>
  115. '$eend > hook200
  116.  
  117. # "hook201" - If exists, printed after the feature list when option
  118. # -sort is selected to replace the default empty string "".
  119. echo $eopt '
  120. '$eend > hook201
  121.  
  122. # "hook202" - If exists, printed before each feature list with no
  123. # heading comment to replace the default string "feature(s) from ".
  124. echo $eopt '<strong>feature(s) from </strong>'$eend > hook202
  125.  
  126. # "hook203" - If exists, printed after the class name of "hook202" to
  127. # replace the default string "%N".
  128. rm -f hook203
  129.  
  130. # "hook204" - If exists, printed before a feature list with a heading
  131. # comment to replace the default string "feature(s) from ".
  132. echo $eopt '<strong>feature(s) from </strong>'$eend > hook204
  133.  
  134. # "hook205" - If exists, printed after the class name introduced at
  135. # "hook204" to replace the default string "%N".
  136. echo $eopt '
  137. <em>'$eend > hook205
  138.  
  139. # "hook206" - If exists, printed before each line of the feature list
  140. # comment to replace the default string " -- ".
  141. rm -f hook206
  142.  
  143. # "hook207" - If exists, printed after each line of the feature list
  144. # comment to replace the default string "%N".
  145. rm -f hook207
  146.  
  147. # "hook208" - If exists, printed after a feature list comment to
  148. # replace the default empty string "".
  149. echo $eopt '</em>
  150. '$eend > hook208
  151.  
  152. # ---------------------------------------------------------------------------
  153. # 2.4. Changing output of a feature signature
  154.  
  155. # "hook300" - If this hook exists, the contents of this file is
  156. # printed before each feature to replace the default string " ".
  157. rm -f hook300
  158.  
  159. # "hook301" - If this hook exists, the contents of this file is
  160. # printed once when the feature has no arguments to replace the
  161. # default empty string "".
  162. rm -f hook301
  163.  
  164. # "hook302" - If this hook exists, the contents of this file is
  165. # printed once when the feature has arguments to replace the default
  166. # string " (".
  167. rm -f hook302
  168.  
  169. # "hook303" - If this hook exists, the contents of this file is
  170. # printed when the feature has arguments to replace the default string
  171. # " ;".
  172. rm -f hook303
  173.  
  174. # "hook304" - If this hook exists, the contents of this file is
  175. # printed when the feature has arguments to replace the default string
  176. # ", ".
  177. rm -f hook304
  178.  
  179. # "hook305" - If this hook exists, the contents of this file is
  180. # printed when the feature has arguments to replace the default string
  181. # ": ".
  182. rm -f hook305
  183.  
  184. # "hook306" - If this hook exists, the contents of this file is
  185. # printed once when the feature has arguments to replace the default
  186. # string ")".
  187. rm -f hook306
  188.  
  189. # "hook307" - If this hook exists, the contents of this file is
  190. # printed once when the feature has no result to replace the default
  191. # string "%N".
  192. rm -f hook307
  193.  
  194. # "hook308" - If this hook exists, the contents of this file is
  195. # printed once before the result type of the feature to replace the
  196. # default string ": ".
  197. rm -f hook308
  198.  
  199. # "hook309" - If this hook exists, the contents of this file is
  200. # printed once after the result type of the feature to replace the
  201. # default string "%N".
  202. rm -f hook309
  203.  
  204. # ---------------------------------------------------------------------------
  205. # 2.5. Changing output of a feature comment
  206.  
  207. # "hook310" - If this hook file exists, and if a feature has a heading
  208. # comment, this file is printed once before the comment.
  209. echo $eopt '<em>'$eend > hook310
  210.  
  211. # "hook311" - If this hook file exists, and if a feature has a heading
  212. # comment, the contents of this file is printed to replace the default
  213. # string " -- " at the beginning of each comment line.
  214. rm -f hook311
  215.  
  216. # "hook312" - If this hook file exists, and if a feature has a heading
  217. # comment, the contents of this file is printed to replace the default
  218. # string "%N" at the end of each comment line.
  219. rm -f hook312
  220.  
  221. # "hook313" - If this hook file exists, and if a feature has a heading
  222. # comment, the contents of this file is printed once after this
  223. # comment.
  224. echo $eopt '</em>
  225. '$eend > hook313
  226.  
  227. # "hook314" - If this hook file exists, and if a feature has no
  228. # heading comment, the contents of this file is printed.
  229. rm -f hook314
  230.  
  231. # ---------------------------------------------------------------------------
  232. # 2.6. Changing output of require clauses
  233. # 2.6.1. For the header of a require clause
  234.  
  235. # "hook400" - If this hook file exists, and if a feature has no
  236. # require assertion, the contents of this file is printed to replace
  237. # the default empty string "".
  238. rm -f hook400
  239.  
  240. # "hook401" - If this hook file exists, and if a feature has one
  241. # require assertion, the contents of this file is printed before the
  242. # latest inherited assertion to replace the default string "require%N".
  243. echo $eopt '      <strong>require</strong>
  244. '$eend > hook401
  245.  
  246. # "hook402" - If this hook file exists, and if a feature has more than
  247. # one require assertion, the contents of this file is printed before
  248. # the require assertion to replace the default string " require else%N".
  249. echo $eopt '      <strong>require else</strong>
  250. '$eend > hook402
  251.  
  252. # "hook403" - If this hook file exists, and if a feature has at least
  253. # one require assertion, the contents of this file is printed to
  254. # finish the job (once after the last printed require assertion) to
  255. # replace the default empty string "".
  256. rm -f hook403
  257.  
  258. # "hook412" - If exists, printed when a require clause has no heading
  259. # comment to replace the default empty string "".
  260. rm -f hook412
  261.  
  262. # "hook413" - If exists, printed once before the require clause
  263. # heading comment to replace the default empty string "".
  264. echo $eopt '<em>'$eend > hook413
  265.  
  266. # "hook414" - If exists, printed before each line of the heading
  267. # comment to replace the default string " -- ".
  268. rm -f hook414
  269.  
  270. # "hook415" - If exists, printed after each line of the heading
  271. # comment to replace the default string "%N".
  272. rm -f hook415
  273.  
  274. # "hook416" - If exists, printed once after the require clause heading
  275. # comment.
  276. echo $eopt '</em>'$eend > hook416
  277.  
  278. # "hook417" - If exists, printed when a require clause has no
  279. # assertion to replace the default empty string "".
  280. rm -f hook417
  281.  
  282. # "hook418" - If exists, printed once before the first assertion of a
  283. # require clause to replace the default empty string "".
  284. rm -f hook418
  285.  
  286. # "hook433" - If exists, printed once after the last assertion of a
  287. # require clause to replace the default empty string "".
  288. rm -f hook433
  289.  
  290. # "hook434" - If exists, printed to finish a require clause to replace
  291. # the default empty string "".
  292. rm -f hook434
  293.  
  294. # 2.6.2. For each assertion in a require clause
  295.  
  296. # "hook419" - If exists, printed before each assertion of a require
  297. # clause to replace the default string " ".
  298. rm -f hook419
  299.  
  300. # "hook420" - If exists, printed when an assertion has no tag to
  301. # replace the default empty string "".
  302. rm -f hook420
  303.  
  304. # "hook421" - If exists, printed before a tag to replace the default
  305. # empty string "".
  306. rm -f hook421
  307.  
  308. # "hook422" - If exists, printed after a tag to replace the default
  309. # string ": ".
  310. rm -f hook422
  311.  
  312. # "hook423" - If exists, printed when the assertion has no expression
  313. # to replace the default empty string "".
  314. rm -f hook423
  315.  
  316. # "hook424" - If exists, printed before the expression to replace the
  317. # default empty string "".
  318. rm -f hook424
  319.  
  320. # "hook425" - If exists, printed after the expression (except for the
  321. # last assertion) to replace the default string ";".
  322. rm -f hook425
  323.  
  324. # "hook426" - If exists, printed when an assertion has no comment to
  325. # replace the default string "%N".
  326. rm -f hook426
  327.  
  328. # "hook427" - If exists, printed once before the assertion comment to
  329. # replace the default empty string "".
  330. echo $eopt '<em>'$eend > hook427
  331.  
  332. # "hook428" - If exists, printed before each line oqf the expression
  333. # comment to replace the default string " -- ".
  334. rm -f hook428
  335.  
  336. # "hook429" - If exists, printed after each line of the expression
  337. # comment to replace the default string "%N".
  338. rm -f hook429
  339.  
  340. # "hook430" - If exists, printed once after the assertion's comment to
  341. # replace the default string "".
  342. echo $eopt '</em>'$eend > hook430
  343.  
  344. # "hook431" - If exists, printed after the assertion to replace the
  345. # default empty string "".
  346. rm -f hook431
  347.  
  348. # 2.6.3. For the last assertion in a require clause Same hook file
  349. # list as described in section 2.6.2 except "hook425" which becomes :
  350.  
  351. # "hook432" - If exists, printed after the last expresion to replace
  352. # the default empty string "".
  353. rm -f hook432
  354.  
  355. # ---------------------------------------------------------------------------
  356. # 2.7. Changing output of ensure clauses
  357. # 2.7.1. For the header of the ensure clause
  358.  
  359. # "hook500" - If this hook file exists, and a feature has no ensure
  360. # clause, the contents of this file is printed to replace the default
  361. # empty string "".
  362. rm -f hook500
  363.  
  364. # "hook511" - If this hook file exists, the contents of this file is
  365. # printed before each ensure clause to replace the default string "ensure%N".
  366. echo $eopt '      <strong>ensure</strong>
  367. '$eend > hook511
  368.  
  369. # "hook512" - If exists, printed when ensure clause has no heading
  370. # comment to replace default empty string "".
  371. rm -f hook512
  372.  
  373. # "hook513" - If exists, printed once before the ensure clause heading
  374. # comment to replace the default empty string "".
  375. echo $eopt '<em>'$eend > hook513
  376.  
  377. # "hook514" - If exists, printed before each line of the heading
  378. # comment to replace the default string " -- ".
  379. rm -f hook514
  380.  
  381. # "hook515" - If exists, printed after each line of the heading
  382. # comment to replace the default string "%N".
  383. rm -f hook515
  384.  
  385. # "hook516" - If exists, printed once after the ensure clause heading
  386. # comment.
  387. echo $eopt '</em>'$eend > hook516
  388.  
  389. # "hook517" - If exists, printed when an ensure clause has no
  390. # assertion to replace the default empty string "".
  391. rm -f hook517
  392.  
  393. # "hook518" - If exists, printed once before the first assertion of
  394. # the ensure clause to replace the default empty string "".
  395. rm -f hook518
  396.  
  397. # "hook533" - If exists, printed once after the last assertion of the
  398. # ensure clause to replace the default empty string "".
  399. rm -f hook533
  400.  
  401. # "hook534" - If exists, printed to finish the ensure clause to
  402. # replace the default empty string "".
  403. rm -f hook534
  404.  
  405. # 2.7.2. For each assertion in the ensure assertion
  406.  
  407. # "hook519" - If exists, printed before each assertion of the ensure
  408. # clause to replace the default string " ".
  409. rm -f hook519
  410.  
  411. # "hook520" - If exists, printed when an assertion has no tag to
  412. # replace the default empty string "".
  413. rm -f hook520
  414.  
  415. # "hook521" - If exists, printed before a tag to replace the default
  416. # empty string "".
  417. rm -f hook521
  418.  
  419. # "hook522" - If exists, printed after a tag to replace the default
  420. # string ": ".
  421. rm -f hook522
  422.  
  423. # "hook523" - If exists, printed when the assertion has no expression
  424. # to replace the default empty string "".
  425. rm -f hook523
  426.  
  427. # "hook524" - If exists, printed before the expression to replace the
  428. # default empty string "".
  429. rm -f hook524
  430.  
  431. # "hook525" - If exists, printed after the expresion (except for the
  432. # last assertion) to replace the default string ";".
  433. rm -f hook525
  434.  
  435. # "hook526" - If exists, printed when an assertion has no comment to
  436. # replace the default string "%N".
  437. rm -f hook526
  438.  
  439. # "hook527" - If exists, printed once before the assertion comment to
  440. # replace the default empty string "".
  441. echo $eopt '<em>'$eend > hook527
  442.  
  443. # "hook528" - If exists, printed before each line of the expression comment to replace the default string " -- ".
  444. rm -f hook528
  445.  
  446. # "hook529" - If exists, printed after each line of the expression
  447. # comment to replace the default string "%N".
  448. rm -f hook529
  449.  
  450. # "hook530" - If exists, printed once after the assertion's comment to
  451. # replace the default string "".
  452. echo $eopt '</em>'$eend > hook530
  453.  
  454. # "hook531" - If exists, printed after the assertion to replace the
  455. # default empty string "".
  456. rm -f hook531
  457.  
  458. # 2.7.3. For the last assertion in the ensure clause Same hook files
  459. # list as described in section 2.7.2 except "hook525" which becomes:
  460.  
  461. # "hook532" - If exists, printed after the last expresion to replace
  462. # the default empty string "".
  463. rm -f hook532
  464.  
  465. # ---------------------------------------------------------------------------
  466. # 2.8. Changing output after each feature
  467.  
  468. # "hook599" - If exists, printed after each feature to replace the
  469. # default empty string "".
  470. echo $eopt '
  471. '$eend > hook599
  472.  
  473. # ---------------------------------------------------------------------------
  474. # 2.9. Changing output of the class invariant
  475. # 2.9.1. For the header of the class invariant
  476.  
  477. # "hook800" - If this hook file exists, and when no class invariant
  478. # exists, the contents of this file is printed to replace the default
  479. # empty string "".
  480. rm -f hook800
  481.  
  482. # "hook811" - If this hook file exists, the contents of this file is
  483. # printed before the class invariant to replace the default string
  484. # "invariant%N".
  485. echo $eopt '<strong>invariant</strong>
  486. '$eend > hook811
  487.  
  488. # "hook812" - If exists, printed when class invariant has no heading
  489. # comment to replace default empty string "".
  490. rm -f hook812
  491.  
  492. # "hook813" - If exists, printed once before the invariant heading
  493. # comment to replace the default empty string "".
  494. echo $eopt '<em>'$eend > hook813
  495.  
  496. # "hook814" - If exists, printed before each line of the heading
  497. # comment to replace the default string " -- ".
  498. rm -f hook814
  499.  
  500. # "hook855" - If exists, printed after each line of the heading
  501. # comment to replace the default string "%N".
  502. rm -f hook855
  503.  
  504. # "hook816" - If exists, printed once after the invariant heading
  505. # comment.
  506. echo $eopt '</em>'$eend > hook816
  507.  
  508. # "hook817" - If exists, printed when class invariant has no assertion
  509. # to replace the default empty string "".
  510. rm -f hook817
  511.  
  512. # "hook818" - If exists, printed once before the first assertion of
  513. # the class invariant to replace the default empty string "".
  514. rm -f hook818
  515.  
  516. # "hook833" - If exists, printed once after the last assertion of the
  517. # class invariant to replace the default empty string "".
  518. rm -f hook833
  519.  
  520. # "hook834" - If exists, printed to finish the class invariant to
  521. # replace the default empty string "".
  522. rm -f hook834
  523.  
  524. # 2.9.2. For each assertion in the class invariant
  525.  
  526. # "hook819" - If exists, printed before each assertion of the class
  527. # invariant to replace the default string " ".
  528. rm -f hook819
  529.  
  530. # "hook820" - If exists, printed when an assertion has no tag to
  531. # replace the default empty string "".
  532. rm -f hook820
  533.  
  534. # "hook821" - If exists, printed before a tag to replace the default
  535. # empty string "".
  536. rm -f hook821
  537.  
  538. # "hook822" - If exists, printed after a tag to replace the default
  539. # string ": ".
  540. rm -f hook822
  541.  
  542. # "hook823" - If exists, printed when the assertion has no expression
  543. # to replace the default empty string "".
  544. rm -f hook823
  545.  
  546. # "hook824" - If exists, printed before the expression to replace the
  547. # default empty string "".
  548. rm -f hook824
  549.  
  550. # "hook825" - If exists, printed after the expresion (except for the
  551. # last assertion) to replace the default string ";".
  552. rm -f hook825
  553.  
  554. # "hook826" - If exists, printed when an assertion has no comment to
  555. # replace the default string "%N".
  556. rm -f hook826
  557.  
  558. # "hook827" - If exists, printed once before the assertion comment to
  559. # replace the default empty string "".
  560. echo $eopt '<em>'$eend > hook827
  561.  
  562. # "hook828" - If exists, printed before each line of the expression
  563. # comment to replace the default string " -- ".
  564. rm -f hook828
  565.  
  566. # "hook829" - If exists, printed after each line of the expression
  567. # comment to replace the default string "%N".
  568. rm -f hook829
  569.  
  570. # "hook830" - If exists, printed once after the assertion's comment to
  571. # replace the default string "".
  572. echo $eopt '</em>'$eend > hook830
  573.  
  574. # "hook831" - If exists, printed after the assertion to replace the
  575. # default empty string "".
  576. rm -f hook831
  577.  
  578. # 2.9.3. For the last assertion in the class invariant Same hook
  579. # files list as described in section 2.9.2 except "hook825" which
  580. # becomes :
  581.  
  582. # "hook832" - If exists, printed after the last expresion to replace
  583. # the default string ";".
  584. rm -f hook832
  585.  
  586. # ---------------------------------------------------------------------------
  587. # 2.10. Changing output of the class interface footer
  588.  
  589. # "hook900" - When exists, printed once before class footer to replace
  590. # the default empty string "".
  591. echo $eopt '
  592. <strong>'$eend > hook900
  593.  
  594. # "hook901" - When exists, printed once at the end of an expanded
  595. # class before the class name to replace the default "end of expanded".
  596. rm -f hook901
  597.  
  598. # "hook902" - When exists, printed once at the end of a deferred class
  599. # before the class name to replace the default "end of deferred ".
  600. rm -f hook902
  601.  
  602. # "hook903" - When exists, printed once at the end of an ordinary (not
  603. # expanded nor deferred) class, before the class name to replace the
  604. # default string "end of ".
  605. rm -f hook903
  606.  
  607. # "hook904" - When exist, printed just before the class name to
  608. # replace the default empty string "".
  609. rm -f hook904
  610.  
  611. # "hook905" - When exists, the contents of this file is printed after
  612. # the class name to replace the default string "%N".
  613. echo $eopt '</strong>'$eend > hook905
  614.  
  615. # "hook999" - If this hook file exists, the contents of this file is
  616. # printed once to finish the job.
  617. cat >hook999 <<END
  618. </pre>
  619. </body>
  620. </html>
  621. END
  622.  
  623. # ---------------------------------------------------------------------------
  624. # 2.11. Changing the output of class names
  625.  
  626. # "Bcn" - When exists, printed Before each class name.
  627. echo $eopt '<a href="'$eend > Bcn
  628.  
  629. # "Mcn" - When exists, the corresponding class name is printed one more 
  630. #       time (using lower case letters) just before the contents of this 
  631. #       hook file. 
  632. echo $eopt '.html">'$eend> Mcn
  633.  
  634. # "Acn" - When exists, printed After each class name.
  635. echo $eopt '</a>'$eend > Acn
  636.  
  637. # "Ucn" - To replace the Underscore character in a class name.
  638. rm -f Ucn
  639.  
  640. # ---------------------------------------------------------------------------
  641. # 2.12. Changing the output of a type mark
  642.  
  643. # "Btm" - When exists, printed Before each type mark.
  644. # echo $eopt '<em>'$eend > Btm
  645. rm -f Btm
  646.  
  647. # "Atm" - When exists, printed After each type mark.
  648. # echo $eopt '</em>'$eend > Atm
  649. rm -f Atm
  650.  
  651. # "open_sb" - To replace the opening square bracket (default "[").
  652. rm -f open_sb
  653.  
  654. # "close_sb" - To replace the closing square bracket (default "]").
  655. rm -f close_sb
  656.  
  657. # "fgl_sep" - To replace the default comma "," in a formal generic argument list.
  658. rm -f fgl_sep
  659.  
  660. # "tm_blank" - To replace a blank character in a type mark.
  661. rm -f tm_blank
  662.  
  663. # "tm_sep" - To replace default string "," as a separator in a generic list.
  664. rm -f tm_sep
  665.  
  666. # "like" - To replace the default string "like ".
  667. rm -f like
  668.  
  669. # "expanded" - To replace the default string "expanded ".
  670. rm -f expanded
  671.  
  672. # ---------------------------------------------------------------------------
  673. #  2.14. Changing the output of an argument name
  674.  
  675. # "Ban" - When exists, printed Before each argument name.
  676. # echo $eopt '<tt>'$eend > Ban
  677. rm -f Ban
  678.  
  679. # "Aan" - When exists, printed after each argument name.
  680. # echo $eopt '</tt>'$eend > Aan
  681. rm -f Aan
  682.  
  683. # "Uan" - To replace the Underscore character in an argument name.
  684. rm -f Uan
  685.  
  686. # ---------------------------------------------------------------------------
  687. # 2.15. Changing the output of tag name
  688.  
  689. # "Btag" - When exists, printed Before each tag name.
  690. rm -f Btag
  691.  
  692. # "Atag" - When exists, printed after each tag name.
  693. rm -f Atag
  694.  
  695. # "Utag" - To replace the Underscore character in a tag name.
  696. rm -f Utag
  697.  
  698. # ---------------------------------------------------------------------------
  699. # 2.19. Changing the output of comments line
  700.  
  701. # "BECL" - Before Each Comment Line. This hook is applied to all
  702. # comments whatever the kind of comment. If exists, printed before the
  703. # contents of each line of each comment (usually after the default
  704. # string "-- ").
  705. rm -f BECL
  706.  
  707. # "AECL" - After Each Comment Line. This hook is applied to all
  708. # comments whatever the kind of comment. If exits, printed after the
  709. # contents of each line of each comment (usually, printed before the
  710. # default "%N").
  711. rm -f AECL
  712.  
  713. # "Ucomment" - To replace the Underscore character in a comment.
  714. rm -f Ucomment
  715.  
  716. # "op_quote" - To replace the default opening quote mark "`".
  717. echo $eopt '</em>'$eend > op_quote
  718.  
  719. # "cl_quote" - To close an "op_quote" to replace the closing quote mark "'".
  720. echo $eopt '<em>'$eend > cl_quote
  721.  
  722. chmod a-w *
  723. chmod a=rwx $0
  724.