Source

xemacs-devel / bench.el

Diff from to
 			  (substring rcsvers 11 (- (length rcsvers) 2)))
   "*Version number of bench.el")
 
-(defconst bench-large-lisp-file (concat (temp-directory) "./bench-large.el")
+(defconst bench-large-lisp-file (expand-file-name
+                                 "bench-large.el" (temp-directory))
   "Large lisp file to use in benchmarks should be /temp-dir/bench-text.el")
 
-(defconst bench-small-lisp-file (concat (temp-directory) "./bench-small.el")
+(defconst bench-small-lisp-file (expand-file-name
+                                 "bench-small.el" (temp-directory))
   "Large lisp file to use in benchmarks should be /temp-dir/bench-text.el")
 
 (defconst bench-lisp-file bench-large-lisp-file)