/[emacs]/emacs/lisp/progmodes/flymake.el
ViewVC logotype

Diff of /emacs/lisp/progmodes/flymake.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.25 by monnier, Mon Jul 4 18:54:30 2005 UTC revision 1.26 by rms, Wed Jul 6 19:00:21 2005 UTC
# Line 64  Line 64 
64  (defalias 'flymake-float-time  (defalias 'flymake-float-time
65    (if (fboundp 'float-time)    (if (fboundp 'float-time)
66        'float-time        'float-time
67      (with-no-warnings      (if (featurep 'xemacs)
68        (lambda ()          (lambda ()
69          (multiple-value-bind (s0 s1 s2) (current-time)            (multiple-value-bind (s0 s1 s2) (current-time)
70            (+ (* (float (ash 1 16)) s0) (float s1) (* 0.0000001 s2)))))))              (+ (* (float (ash 1 16)) s0) (float s1) (* 0.0000001 s2)))))))
71    
72  (defsubst flymake-replace-regexp-in-string (regexp rep str)  (defsubst flymake-replace-regexp-in-string (regexp rep str)
73    (if (fboundp 'replace-regexp-in-string)    (if (fboundp 'replace-in-string)
74        (replace-regexp-in-string regexp rep str)        (replace-in-string str regexp rep)
75      (replace-in-string str regexp rep)))      (replace-regexp-in-string regexp rep str)))
76    
77  (defun flymake-split-string (str pattern)  (defun flymake-split-string (str pattern)
78    "Split STR into a list of substrings bounded by PATTERN.    "Split STR into a list of substrings bounded by PATTERN.

Legend:
Removed from v.1.25  
changed lines
  Added in v.1.26

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26