diff options
-rw-r--r-- | usr.bin/vgrind/vgrind.1 | 6 | ||||
-rw-r--r-- | usr.bin/vgrind/vgrindefs.src | 11 |
2 files changed, 15 insertions, 2 deletions
diff --git a/usr.bin/vgrind/vgrind.1 b/usr.bin/vgrind/vgrind.1 index 352ba7eea8ba..50f52e880edb 100644 --- a/usr.bin/vgrind/vgrind.1 +++ b/usr.bin/vgrind/vgrind.1 @@ -137,9 +137,11 @@ or the default), .Pq Fl l Ns Ar yacc , .Tn LISP .Pq Fl l Ns Ar isp , -and .Tn ICON -.Pq Fl l Ns Ar I . +.Pq Fl l Ns Ar I , +and +.Tn PERL +.Pq Fl l Ns Ar perl . .It Fl n forces no keyword bolding .It Fl p Ar postproc diff --git a/usr.bin/vgrind/vgrindefs.src b/usr.bin/vgrind/vgrindefs.src index 91ef58fed4db..becf7732ae98 100644 --- a/usr.bin/vgrind/vgrindefs.src +++ b/usr.bin/vgrind/vgrindefs.src @@ -144,3 +144,14 @@ C++|c++:\ ifdef ifndef include undef defined\ class const delete friend inline new operator overload private\ protected public virtual: +# +# Hack alert: defining function calls as `alternate comments' (ab/ae) seems +# to be the only way to avoid major confusion inside vfontedpr for calls like: +# &packagename'function; +# +Perl|perl|pl:\ + :pb=sub\d\p\d:bb={:be=}:cb=#:ce=$:tl:\ + :ab=&:ae=(;|\d|,):\ + :sb=":se=(\e"|$):lb=':le=(\e'|$):\ + :kw=do if unless while until else elsif for foreach continue\ + next redo sub last goto return die exit require: |