blob: 0937b45a4cf41600d5f3a666a834a5a4f4230055 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
/*
Copyright (c) 1990-1999 Info-ZIP. All rights reserved.
See the accompanying file LICENSE, version 1999-Oct-05 or later
(the contents of which are also included in zip.h) for terms of use.
If, for some reason, both of these files are missing, the Info-ZIP license
also may be found at: ftp://ftp.cdrom.com/pub/infozip/license.html
*/
/* Change UNIX modes */
#pragma library
#include <sc.h>
int _chmod(const char *fname, short mask)
{
extern char _um2tm_(short);
return _filechange(fname,'p',(size_t) _um2tm_(mask)|0x80);
}
|