16 lines
218 B
Text
Executable file
16 lines
218 B
Text
Executable file
# blank-line activity:
|
|
# Merge adjacent blank lines. Loop til no change.
|
|
:blin
|
|
/^$/,/^ *[^ ]*.*$/{
|
|
/^$/N
|
|
s/^ *\n *$//
|
|
}
|
|
t blin
|
|
#
|
|
/^$/,/^ *[^ ]*.*$/{
|
|
/^$/N
|
|
# Transpose <blank line> <end comment>
|
|
/^ *\n\*\/$/c\
|
|
*\/\
|
|
|
|
}
|