diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-03-18 12:51:30 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-03-18 12:51:30 (GMT) |
commit | af7fa225c1d0ec592c7af29ead5922f45c1c15fb (patch) | |
tree | 3582411900a7dd47db3f96290226a1dea37804e4 /unix/tclUnixFCmd.c | |
parent | 27c27e941a08c8ea873a5de4333a498788a22c33 (diff) | |
download | tcl-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.c | 8 |
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; |