H
g/<pre lang=[^>]/.+1,/<\/pre/-1s/\([][(){} 	]\)\([[:alnum:]!#$%&*+/:;=?@^_`|~-]\{1,\}\)/\1<span token='\2'>\2<\/span token='\2'>/g
g/<pre lang=[^>]/.+1,/<\/pre/-1s/^\([[:alnum:]!#$%&*+/:;=?@^_`|~-]\{1,\}\)/<span token='\1'>\1<\/span token='\1'>/g
g/<\/[^s][^p]/s/<span token='[^']*'>//g\
s/<\/span token='[^']*'>//g
g/<pre lang=[^>]/.+1,/<\/pre/-1s/$/<span newline><\/span newline>/
!# Remove comment tokens, for further comment wrapping
g;<span token='#'>#</span token='#'>\(.*\)\(<span newline><\/span newline>\);s;;<span comment>#\1</span comment>\2;
g;<span token='//'>//</span token='//'>\(.*\)\(<span newline><\/span newline>\);s;;<span comment>//\1</span comment>\2;
g;<span token='--'>--</span token='--'>\(.*\)\(<span newline><\/span newline>\);s;;<span comment>--\1</span comment>\2;
w
Q