HCoop
/
bpt
/
guile.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
build: Don't include <config.h> in native programs when cross-compiling.
[bpt/guile.git]
/
libguile
/
filesys.h
diff --git
a/libguile/filesys.h
b/libguile/filesys.h
index
6534da9
..
776b263
100644
(file)
--- a/
libguile/filesys.h
+++ b/
libguile/filesys.h
@@
-3,21
+3,23
@@
#ifndef SCM_FILESYS_H
#define SCM_FILESYS_H
#ifndef SCM_FILESYS_H
#define SCM_FILESYS_H
-/* Copyright (C) 1995,1997,1998,1999,2000,2001, 2006 Free Software Foundation, Inc.
+/* Copyright (C) 1995, 1997, 1998, 1999, 2000, 2001, 2006, 2008, 2009,
+ * 2010, 2013 Free Software Foundation, Inc.
*
* This library is free software; you can redistribute it and/or
*
* This library is free software; you can redistribute it and/or
- * modify it under the terms of the GNU Lesser General Public
- *
License as published by the Free Software Foundation; either
- *
version 2.1 of
the License, or (at your option) any later version.
+ * modify it under the terms of the GNU Lesser General Public
License
+ *
as published by the Free Software Foundation; either version 3 of
+ * the License, or (at your option) any later version.
*
*
- * This library is distributed in the hope that it will be useful,
- *
but
WITHOUT ANY WARRANTY; without even the implied warranty of
+ * This library is distributed in the hope that it will be useful,
but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the Free Software
- * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+ * 02110-1301 USA
*/
\f
*/
\f
@@
-28,10
+30,10
@@
SCM_API scm_t_bits scm_tc16_dir;
SCM_API scm_t_bits scm_tc16_dir;
-#define SCM_DIR_FLAG_OPEN (1L <<
16
)
+#define SCM_DIR_FLAG_OPEN (1L <<
0
)
#define SCM_DIRP(x) (!SCM_IMP (x) && (SCM_TYP16 (x) == scm_tc16_dir))
#define SCM_DIRP(x) (!SCM_IMP (x) && (SCM_TYP16 (x) == scm_tc16_dir))
-#define SCM_DIR_OPEN_P(x) (SCM_
CELL_WORD_0
(x) & SCM_DIR_FLAG_OPEN)
+#define SCM_DIR_OPEN_P(x) (SCM_
SMOB_FLAGS
(x) & SCM_DIR_FLAG_OPEN)
\f
\f
@@
-42,7
+44,7
@@
SCM_API SCM scm_open_fdes (SCM path, SCM flags, SCM mode);
SCM_API SCM scm_open (SCM path, SCM flags, SCM mode);
SCM_API SCM scm_close (SCM fd_or_port);
SCM_API SCM scm_close_fdes (SCM fd);
SCM_API SCM scm_open (SCM path, SCM flags, SCM mode);
SCM_API SCM scm_close (SCM fd_or_port);
SCM_API SCM scm_close_fdes (SCM fd);
-SCM_API SCM scm_stat (SCM object);
+SCM_API SCM scm_stat (SCM object
, SCM exception_on_error
);
SCM_API SCM scm_link (SCM oldpath, SCM newpath);
SCM_API SCM scm_rename (SCM oldname, SCM newname);
SCM_API SCM scm_delete_file (SCM str);
SCM_API SCM scm_link (SCM oldpath, SCM newpath);
SCM_API SCM scm_rename (SCM oldname, SCM newname);
SCM_API SCM scm_delete_file (SCM str);
@@
-64,8
+66,11
@@
SCM_API SCM scm_lstat (SCM str);
SCM_API SCM scm_copy_file (SCM oldfile, SCM newfile);
SCM_API SCM scm_dirname (SCM filename);
SCM_API SCM scm_basename (SCM filename, SCM suffix);
SCM_API SCM scm_copy_file (SCM oldfile, SCM newfile);
SCM_API SCM scm_dirname (SCM filename);
SCM_API SCM scm_basename (SCM filename, SCM suffix);
+SCM_API SCM scm_canonicalize_path (SCM path);
+SCM_API SCM scm_sendfile (SCM out, SCM in, SCM count, SCM offset);
+SCM_INTERNAL SCM scm_i_relativize_path (SCM path, SCM in_path);
-SCM_
API
void scm_init_filesys (void);
+SCM_
INTERNAL
void scm_init_filesys (void);
#endif /* SCM_FILESYS_H */
#endif /* SCM_FILESYS_H */