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 "plugins/ets/runtime/intrinsics/helpers/ets_intrinsics_helpers.h" 19 #include "types/ets_primitives.h" 20 21 namespace ark::ets::intrinsics { 22 StdCoreLongToShort(EtsLong val)23EtsShort StdCoreLongToShort(EtsLong val) 24 { 25 return static_cast<int16_t>(val); 26 } 27 StdCoreLongToByte(EtsLong val)28EtsByte StdCoreLongToByte(EtsLong val) 29 { 30 return static_cast<int8_t>(val); 31 } 32 StdCoreLongToInt(EtsLong val)33EtsInt StdCoreLongToInt(EtsLong val) 34 { 35 return static_cast<int32_t>(val); 36 } 37 StdCoreLongToFloat(EtsLong val)38EtsFloat StdCoreLongToFloat(EtsLong val) 39 { 40 return static_cast<float>(val); 41 } 42 StdCoreLongToDouble(EtsLong val)43EtsDouble StdCoreLongToDouble(EtsLong val) 44 { 45 return static_cast<double>(val); 46 } 47 StdCoreLongToChar(EtsLong val)48EtsChar StdCoreLongToChar(EtsLong val) 49 { 50 return static_cast<uint16_t>(val); 51 } 52 53 } // namespace ark::ets::intrinsics 54