compat.m4

来自「操作系统SunOS 4.1.3版本的源码」· M4 代码 · 共 11 行

##########################################################
#  General code to convert back to old style UUCP names
S5
R$+<@LOCAL>		$@ $w!$1			name@LOCAL => sun!name
R$+<@$-.LOCAL>		$@ $2!$1			[e-mail] => h!u
R$+<@$+.uucp>		$@ $2!$1			[e-mail] => h!u
R$+<@$*>		$@ $2!$1			u@h => h!u
# Route-addrs do not work here.  Punt til uucp-mail comes up with something.
R<@$+>$*		$@ @$1$2			just defocus and punt
R$*<$*>$*		$@ $1$2$3			Defocus strange stuff