Mercurial > hg > octave-nkf
comparison src/variables.cc @ 1766:e8e76be43e79
[project @ 1996-01-23 03:33:34 by jwe]
| author | jwe |
|---|---|
| date | Tue, 23 Jan 1996 03:34:14 +0000 |
| parents | 3a9462b655f1 |
| children | e6d79e281f7d |
comparison
equal
deleted
inserted
replaced
| 1765:a51354c34bea | 1766:e8e76be43e79 |
|---|---|
| 47 #include "defaults.h" | 47 #include "defaults.h" |
| 48 #include "defun.h" | 48 #include "defun.h" |
| 49 #include "dirfns.h" | 49 #include "dirfns.h" |
| 50 #include "dynamic-ld.h" | 50 #include "dynamic-ld.h" |
| 51 #include "error.h" | 51 #include "error.h" |
| 52 #include "file-ops.h" | |
| 52 #include "help.h" | 53 #include "help.h" |
| 53 #include "input.h" | 54 #include "input.h" |
| 54 #include "lex.h" | 55 #include "lex.h" |
| 55 #include "mappers.h" | 56 #include "mappers.h" |
| 56 #include "oct-hist.h" | 57 #include "oct-hist.h" |
| 57 #include "toplev.h" | 58 #include "toplev.h" |
| 58 #include "pager.h" | 59 #include "pager.h" |
| 59 #include "parse.h" | 60 #include "parse.h" |
| 60 #include "statdefs.h" | |
| 61 #include "symtab.h" | 61 #include "symtab.h" |
| 62 #include "sysdep.h" | 62 #include "sysdep.h" |
| 63 #include "pt-const.h" | 63 #include "pt-const.h" |
| 64 #include "oct-obj.h" | 64 #include "oct-obj.h" |
| 65 #include "pt-exp.h" | 65 #include "pt-exp.h" |
| 281 { | 281 { |
| 282 retval = 3.0; | 282 retval = 3.0; |
| 283 } | 283 } |
| 284 else | 284 else |
| 285 { | 285 { |
| 286 struct stat buf; | 286 file_stat fs (name); |
| 287 if (stat (name.c_str (), &buf) == 0 && S_ISREG (buf.st_mode)) | 287 |
| 288 if (fs && fs.is_reg ()) | |
| 288 retval = 2.0; | 289 retval = 2.0; |
| 289 } | 290 } |
| 290 } | 291 } |
| 291 } | 292 } |
| 292 | 293 |