1 /** 2 * Copyright (c) 2025 Huawei Device Co., Ltd. 3 * Licensed under the Apache License, Version 2.0 (the "License"); 4 * you may not use this file except in compliance with the License. 5 * You may obtain a copy of the License at 6 * 7 * http://www.apache.org/licenses/LICENSE-2.0 8 * 9 * Unless required by applicable law or agreed to in writing, software 10 * distributed under the License is distributed on an "AS IS" BASIS, 11 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. 12 * See the License for the specific language governing permissions and 13 * limitations under the License. 14 */ 15 16 #include <cstdint> 17 #include "intrinsics.h" 18 #include "types/ets_primitives.h" 19 20 namespace ark::ets::intrinsics { 21 StdCoreIntToShort(EtsInt val)22EtsShort StdCoreIntToShort(EtsInt val) 23 { 24 return static_cast<int16_t>(val); 25 } 26 StdCoreIntToByte(EtsInt val)27EtsByte StdCoreIntToByte(EtsInt val) 28 { 29 return static_cast<int8_t>(val); 30 } 31 StdCoreIntToLong(EtsInt val)32EtsLong StdCoreIntToLong(EtsInt val) 33 { 34 return static_cast<int64_t>(val); 35 } 36 StdCoreIntToFloat(EtsInt val)37EtsFloat StdCoreIntToFloat(EtsInt val) 38 { 39 return static_cast<float>(val); 40 } 41 StdCoreIntToDouble(EtsInt val)42EtsDouble StdCoreIntToDouble(EtsInt val) 43 { 44 return static_cast<double>(val); 45 } 46 StdCoreIntToChar(EtsInt val)47EtsChar StdCoreIntToChar(EtsInt val) 48 { 49 return static_cast<uint16_t>(val); 50 } 51 52 } // namespace ark::ets::intrinsics 53