Mercurial > octave-nkf
comparison src/DLD-FUNCTIONS/fftw_wisdom.cc @ 5832:5e41e06f6a78
[project @ 2006-05-26 21:41:32 by jwe]
author | jwe |
---|---|
date | Fri, 26 May 2006 21:42:22 +0000 |
parents | 080c08b192d8 |
children | 160958073cde |
comparison
equal
deleted
inserted
replaced
5831:b0d4ff99a0c5 | 5832:5e41e06f6a78 |
---|---|
35 #include "defun-dld.h" | 35 #include "defun-dld.h" |
36 #include "error.h" | 36 #include "error.h" |
37 #include "file-ops.h" | 37 #include "file-ops.h" |
38 #include "gripes.h" | 38 #include "gripes.h" |
39 #include "lo-mappers.h" | 39 #include "lo-mappers.h" |
40 #include "load-path.h" | |
40 #include "oct-env.h" | 41 #include "oct-env.h" |
41 #include "oct-obj.h" | 42 #include "oct-obj.h" |
42 #include "sighandlers.h" | 43 #include "sighandlers.h" |
43 #include "utils.h" | 44 #include "utils.h" |
44 | 45 |
109 overwrite = true; | 110 overwrite = true; |
110 } | 111 } |
111 | 112 |
112 std::string str = args(0).string_value (); | 113 std::string str = args(0).string_value (); |
113 std::string wisdom = octave_env::make_absolute | 114 std::string wisdom = octave_env::make_absolute |
114 (Vload_path_dir_path.find_first_of (str), octave_env::getcwd ()); | 115 (load_path::find_file (str), octave_env::getcwd ()); |
115 | 116 |
116 // FIXME -- should probably protect FILE* resources with | 117 // FIXME -- should probably protect FILE* resources with |
117 // auto_ptr or similar... | 118 // auto_ptr or similar... |
118 | 119 |
119 if (wisdom.empty () || overwrite) | 120 if (wisdom.empty () || overwrite) |