home *** CD-ROM | disk | FTP | other *** search
/ minnie.tuhs.org / unixen.tar / unixen / PDP-11 / Trees / V6 / usr / man / man0 / tocrc < prev    next >
Encoding:
Text File  |  1975-06-26  |  1.1 KB  |  98 lines
  1. if $2x != x goto both
  2. goto $1x
  3. : allx
  4. sh $0 1 I
  5. sh $0 2 II
  6. sh $0 3 III
  7. sh $0 4 IV
  8. sh $0 5 V
  9. sh $0 6 VI
  10. sh $0 7 VII
  11. sh $0 8 VIII
  12. : tx
  13. cat tocx? >cattoc
  14. ptx -t cattoc ptxx
  15. rm cattoc
  16. ed - tocx1
  17. 1,$s/([IV]*) /" "/
  18. 1,$s/.*/.xx "&"/
  19. w toc1
  20. e tocx2
  21. 1,$s/([IV]*) /" "/
  22. 1,$s/.*/.xx "&"/
  23. w toc2
  24. e tocx3
  25. 1,$s/([IV]*) /" "/
  26. 1,$s/.*/.xx "&"/
  27. w toc3
  28. e tocx4
  29. 1,$s/([IV]*) /" "/
  30. 1,$s/.*/.xx "&"/
  31. w toc4
  32. e tocx5
  33. 1,$s/([IV]*) /" "/
  34. 1,$s/.*/.xx "&"/
  35. w toc5
  36. e tocx6
  37. 1,$s/([IV]*) /" "/
  38. 1,$s/.*/.xx "&"/
  39. w toc6
  40. e tocx7
  41. 1,$s/([IV]*) /" "/
  42. 1,$s/.*/.xx "&"/
  43. w toc7
  44. e tocx8
  45. 1,$s/([IV]*) /" "/
  46. 1,$s/.*/.xx "&"/
  47. w toc8
  48. q
  49. exit
  50. : 1x
  51. sh $0 1 I
  52. exit
  53. : 2x
  54. sh $0 2 II
  55. exit
  56. : 3x
  57. sh $0 3 III
  58. exit
  59. : 4x
  60. sh $0 4 IV
  61. exit
  62. : 5x
  63. sh $0 5 V
  64. exit
  65. : 6x
  66. sh $0 6 VI
  67. exit
  68. : 7x
  69. sh $0 7 VII
  70. exit
  71. : 8x
  72. sh $0 8 VIII
  73. exit
  74. : x
  75. echo usage: sh tocrc "[12345678]"
  76. exit
  77. : both
  78. chdir /usr/man/man$1
  79. ls >xa
  80. ed - xa
  81. v/\.[12345678]$/d
  82. g/intro.2/d
  83. g/^/s//e /\
  84. .a\
  85. /NAME/1p
  86. w
  87. q
  88. ed - <xa >xb
  89. echo "1,$s/ *\\\*- */("$2") /" >xa
  90. if $1 != 2 goto 1f
  91. echo 0a >>xa
  92. echo "intro(II) introduction to system calls" >>xa
  93. echo . >>xa
  94. : 1f
  95. echo w /usr/man/man0/tocx$1 >>xa
  96. ed - xb <xa
  97. rm xa xb
  98.