/
fp_to_si_inst.e
50 lines (39 loc) · 888 Bytes
/
fp_to_si_inst.e
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
note
description: "Summary description for {FP_TO_SI_INST}."
author: ""
date: "$Date$"
revision: "$Revision$"
class
FP_TO_SI_INST
inherit
CAST_INST
create
make,
make_name
feature {NONE}
make (s: VALUE; ty: VALUE)
do
item := make_external (s.item, ty.item)
end
make_name (s: VALUE; ty: VALUE; name: TWINE)
do
item := make_name_external (s.item, ty.item, name.item)
end
feature {NONE} -- Externals
make_external (s: POINTER; ty: POINTER): POINTER
external
"C++ inline use %"llvm/Instructions.h%""
alias
"[
return new llvm::FPToSIInst ((llvm::Value *)$s, (llvm::Value *)$ty);
]"
end
make_name_external (s: POINTER; ty: POINTER; name: POINTER): POINTER
external
"C++ inline use %"llvm/Instructions.h%""
alias
"[
return new llvm::FPToSIInst ((llvm::Value *)$s, (llvm::Value *)$ty, *((llvm::Twine *)$name));
]"
end
end