shithub: qk1

ref: 0928124e1e88acf3e255310397412a291e4647cf
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 }
' $*