From octave-maintainers-request at bevo dot che dot wisc dot edu Fri Aug 31 23:50:37 2001 Subject: improvement to otags From: "Joseph P. Skudlarek" To: octave-maintainers at bevo dot che dot wisc dot edu Date: Fri, 31 Aug 2001 21:49:27 -0700 ======================================================================== diff -cr otags /usr/local/bin/otags ======================================================================== *** otags Thu Nov 12 19:44:33 1998 --- /usr/local/bin/otags Wed Apr 18 19:40:47 2001 *************** *** 1,4 **** ! #! /bin/sh # Generate a TAGS file from a set of Octave .m files for use with Emacs. # --- 1,4 ---- ! #! /bin/sh -ue # Generate a TAGS file from a set of Octave .m files for use with Emacs. # *************** *** 18,26 **** # jump to it. :-( # Author: Mario Storti ! etags --lang=none \ ! --regex='/[ \t]*function.*=[ \t]*\([^ \t]*\)[ \t]*(/\1/' \ --regex='/###key \(.*\)/\1/' \ --regex='/[ \t]*global[ \t].*/' \ *.m --- 18,33 ---- # jump to it. :-( # Author: Mario Storti + # Jskud 18Apr01: handle function dcl w/ no result and/or no args ! exec etags --lang=none \ ! --regex='/[ \t]*function.*=[ \t]*\([^ \t()]*\)[ \t]*(/\1/' \ ! --regex='/[ \t]*function.*=[ \t]*\([^ \t()]*\)[ \t]*$/\1/' \ ! --regex='/[ \t]*function[ \t]*\([^ \t()]*\)[ \t]*(/\1/' \ ! --regex='/[ \t]*function[ \t]*\([^ \t()]*\)[ \t]*$/\1/' \ --regex='/###key \(.*\)/\1/' \ --regex='/[ \t]*global[ \t].*/' \ *.m + + #*NOTREACHED*# + ##[] ======================================================================== Suggested ChangeLog Entry ======================================================================== 2001-08-31 Joseph P. Skudlarek * emacs/otags: generate entries for function declarations with no return value(s) and/or no arguments. ======================================================================== [] ========================================================================