intel/llvm
1
0
Fork 0
mirror of https://github.com/intel/llvm.git synced 2026-02-01 08:56:15 +08:00
Code Issues Packages Projects Releases Wiki Activity

[flang] Changed *.cc file extension to *.cpp (updated scripts) (flang-compiler/f18#958)

Browse Source 
Updated CMake files accordingly, using better regex
Updated license headers to match new extension and fit within 80 columns
Updated other comments within files that referred to the old extension

Original-commit: flang-compiler/f18@ae7721e611
Reviewed-on: https://github.com/flang-compiler/f18/pull/958
This commit is contained in:
Alexis Perry
2020-01-27 19:18:45 -07:00
committed by Steve Scalpone
parent 65b62f9bde
commit 352d347aa5
137 changed files with 247 additions and 247 deletions
Download Patch File Download Diff File Expand all files Collapse all files

56
flang/runtime/type-code.cpp Normal file
View File

@@ -0,0 +1,56 @@
//===-- runtime/type-code.cpp ---------------------------------------------===//
//
// Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
// See https://llvm.org/LICENSE.txt for license information.
// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
//
//===----------------------------------------------------------------------===//
#include "type-code.h"
namespace Fortran::runtime {
TypeCode::TypeCode(TypeCategory f, int kind) {
switch (f) {
case TypeCategory::Integer:
switch (kind) {
case 1: raw_ = CFI_type_int8_t; break;
case 2: raw_ = CFI_type_int16_t; break;
case 4: raw_ = CFI_type_int32_t; break;
case 8: raw_ = CFI_type_int64_t; break;
case 16: raw_ = CFI_type_int128_t; break;
}
break;
case TypeCategory::Real:
switch (kind) {
case 4: raw_ = CFI_type_float; break;
case 8: raw_ = CFI_type_double; break;
case 10:
case 16: raw_ = CFI_type_long_double; break;
}
break;
case TypeCategory::Complex:
switch (kind) {
case 4: raw_ = CFI_type_float_Complex; break;
case 8: raw_ = CFI_type_double_Complex; break;
case 10:
case 16: raw_ = CFI_type_long_double_Complex; break;
}
break;
case TypeCategory::Character:
if (kind == 1) {
raw_ = CFI_type_char;
}
break;
case TypeCategory::Logical:
switch (kind) {
case 1: raw_ = CFI_type_Bool; break;
case 2: raw_ = CFI_type_int16_t; break;
case 4: raw_ = CFI_type_int32_t; break;
case 8: raw_ = CFI_type_int64_t; break;
}
break;
case TypeCategory::Derived: raw_ = CFI_type_struct; break;
}
}
}