shithub: qk1

ref: 229a1dc2e021af252c97cd42db70fb5b414b9246
dir: /plan9/inline/

View raw version 
#!/bin/rc

awk '
	/ inline / { inlining = 1; striptypes = 1; printf "#define "; next }
	/^}$/ && inlining { inlining = 0; print; next }
	inlining {
		if(striptypes)
			gsub(/[a-zA-Z_0-9]+ [*]?/, "")
		striptypes = 0
		printf "%s\\\n", $0
		next
	}
	!inlining { print }
' $*