Plan 9 from Bell Labs’s /usr/web/sources/plan9/rc/bin/soelim

Copyright © 2021 Plan 9 Foundation.
Distributed under the MIT License.
Download the Plan 9 distribution.


#!/bin/rc
# joyless reimplementation of soelim
# the $0 recursion is a bit ugly

# canonicalise troff commands first with sed into ". so file" form.
# but the space after the dot has to come out; tbl can't cope with it.
# friggin' html macros can be longer than two characters; grrr.
sed '/^[.'']/{
	s/([^\\])\\".*$/\1/
#	s/^(.)[	 ]*([^	 \\][^	 \\])[	 ]*/\1 \2 /
	s/^(.)[	 ]*([^	 \\][^	 \\])/\1 \2/
}' $* | awk '	BEGIN { me = "'$0'" }
		$1 !~ /^[.'']$/	{ print; next }
		$2 == "so" { system(me " " $3) ; next }
		$2 == "nx" { system(me " " $3) ; exit }
		{ print }' | sed 's/^([.'']) /\1/'

Bell Labs OSI certified Powered by Plan 9

(Return to Plan 9 Home Page)

Copyright © 2021 Plan 9 Foundation. All Rights Reserved.
Comments to [email protected].