summaryrefslogtreecommitdiff
path: root/libguile/filesys.h
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2010-04-19 16:39:11 +0200
committerAndy Wingo <wingo@pobox.com>2010-04-19 16:39:11 +0200
commit22457d5730b2d5302c55a8f1f4c07470be975021 (patch)
tree8f5d07f95bff0346203331f203218c12f1bba045 /libguile/filesys.h
parent0abc21094420dc00312cfa74788e5d9c1524b04a (diff)
downloadguile-22457d5730b2d5302c55a8f1f4c07470be975021.tar.gz
filesystem trickery to scm_i_relativize_path in filesys.c; bugfix.
* libguile/filesys.h: * libguile/filesys.c (scm_i_relativize_path): New function, moved here from fports.c. Internal for now; we can make it external though if people like its interface. * libguile/fports.c (fport_canonicalize_filename): Move all of the tricky bits to filesys.c. Also fixes a bug in which a delimiter wasn't stripped.
Diffstat (limited to 'libguile/filesys.h')
-rw-r--r--libguile/filesys.h3
1 files changed, 2 insertions, 1 deletions
diff --git a/libguile/filesys.h b/libguile/filesys.h
index a07f20496..967ce7450 100644
--- a/libguile/filesys.h
+++ b/libguile/filesys.h
@@ -3,7 +3,7 @@
#ifndef SCM_FILESYS_H
#define SCM_FILESYS_H
-/* Copyright (C) 1995,1997,1998,1999,2000,2001, 2006, 2008, 2009 Free Software Foundation, Inc.
+/* Copyright (C) 1995,1997,1998,1999,2000,2001, 2006, 2008, 2009, 2010 Free Software Foundation, Inc.
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public License
@@ -66,6 +66,7 @@ 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_INTERNAL SCM scm_i_relativize_path (SCM path, SCM in_path);
SCM_INTERNAL void scm_init_filesys (void);