summaryrefslogtreecommitdiffstats
path: root/unix/tclUnixFCmd.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2020-03-18 12:51:30 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2020-03-18 12:51:30 (GMT)
commitaf7fa225c1d0ec592c7af29ead5922f45c1c15fb (patch)
tree3582411900a7dd47db3f96290226a1dea37804e4 /unix/tclUnixFCmd.c
parent27c27e941a08c8ea873a5de4333a498788a22c33 (diff)
downloadtcl-af7fa225c1d0ec592c7af29ead5922f45c1c15fb.zip
tcl-af7fa225c1d0ec592c7af29ead5922f45c1c15fb.tar.gz
tcl-af7fa225c1d0ec592c7af29ead5922f45c1c15fb.tar.bz2
More uppercase HEX representations in source-code.
Diffstat (limited to 'unix/tclUnixFCmd.c')
-rw-r--r--unix/tclUnixFCmd.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/unix/tclUnixFCmd.c b/unix/tclUnixFCmd.c
index ae20ee0..9abd70a 100644
--- a/unix/tclUnixFCmd.c
+++ b/unix/tclUnixFCmd.c
@@ -1841,7 +1841,7 @@ GetModeFromPermString(
/* who */
switch (*(modeStringPtr+n+i)) {
case 'u':
- who |= 0x9c0;
+ who |= 0x9C0;
continue;
case 'g':
who |= 0x438;
@@ -1850,13 +1850,13 @@ GetModeFromPermString(
who |= 0x207;
continue;
case 'a':
- who |= 0xfff;
+ who |= 0xFFF;
continue;
}
}
who_found = 1;
if (who == 0) {
- who = 0xfff;
+ who = 0xFFF;
}
if (!op_found) {
/* op */
@@ -1889,7 +1889,7 @@ GetModeFromPermString(
what |= 0x49;
continue;
case 's':
- what |= 0xc00;
+ what |= 0xC00;
continue;
case 't':
what |= 0x200;