Version 3.6.0.4, tag libreoffice-3.6.0.4
[LibreOffice.git] / dmake / winnt / dchdir.c
blobde2cf18041a81ad4c20ec56cc7d985bd23e3ee1e
1 /* RCS $Id: dchdir.c,v 1.1.1.1 2000-09-22 15:33:37 hr Exp $
2 --
3 -- SYNOPSIS
4 -- Change directory.
5 --
6 -- DESCRIPTION
7 -- Under DOS change the current drive as well as the current directory.
8 --
9 -- AUTHOR
10 -- Dennis Vadura, dvadura@dmake.wticorp.com
12 -- WWW
13 -- http://dmake.wticorp.com/
15 -- COPYRIGHT
16 -- Copyright (c) 1996,1997 by WTI Corp. All rights reserved.
18 -- This program is NOT free software; you can redistribute it and/or
19 -- modify it under the terms of the Software License Agreement Provided
20 -- in the file <distribution-root>/readme/license.txt.
22 -- LOG
23 -- Use cvs log to obtain detailed change logs.
26 #include <dir.h>
27 #include <direct.h>
28 #include "extern.h"
30 PUBLIC int
31 dchdir(path)
32 char *path;
34 int res;
36 res = chdir(path);
38 if (res != -1 && path[1] == ':') {
39 unsigned new_drive;
41 /* for WIN32 just use the _chdrive library call */
42 new_drive = (*path & ~0x20) - 'A' + 1;
43 _chdrive(new_drive);
46 return (res);