maxjhandsome
/
llvm-project
forked from OSchip/llvm-project
1
0
Fork 0
Code Issues Pull Requests Packages Releases Wiki Activity

[flang] One more 

Original-commit: flang-compiler/f18@8d73b44eae
Reviewed-on: https://github.com/flang-compiler/f18/pull/535
This commit is contained in:
peter klausler 2019-06-28 11:43:57 -07:00
parent 17fdb0a0e4
commit 0ae02c8630
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
flang/lib/evaluate/type.cc
View File

@ -234,9 +234,9 @@ int SelectedCharKind(const std::string &s) { // 16.9.168
}
if (lower == "ascii") {
return 1;
} else if (lower == "jis") {
} else if (lower == "ucs-2") {
return 2;
} else if (lower == "iso_10646") {
} else if (lower == "iso_10646" || lower == "ucs-4") {
return 4;
} else {
return -1;