/[eiffelstudio]/FreeELKS/trunk/library/kernel/ise_runtime.e
ViewVC logotype

Contents of /FreeELKS/trunk/library/kernel/ise_runtime.e

Parent Directory Parent Directory | Revision Log Revision Log


Revision 91477 - (show annotations)
Sun Jan 14 09:47:13 2007 UTC (13 years ago) by ericb
File size: 4152 byte(s)
Synchronized with ISE 6.0.65740
1 indexing
2 description: "[
3 Set of features to access ISE runtime functionality.
4 To be used at your own risk.
5 ]"
6 library: "Free implementation of ELKS library"
7 copyright: "Copyright (c) 1986-2004, Eiffel Software and others"
8 license: "Eiffel Forum License v2 (see forum.txt)"
9 date: "$Date$"
10 revision: "$Revision$"
11
12 class
13 ISE_RUNTIME
14
15 feature -- Feature specific to ISE runtime.
16
17 frozen c_standard_clone (other: POINTER): ANY is
18 -- New object of same dynamic type as `other'
19 external
20 "C signature (EIF_REFERENCE): EIF_REFERENCE use %"eif_copy.h%""
21 alias
22 "eclone"
23 end
24
25 frozen c_conforms_to (obj1, obj2: POINTER): BOOLEAN is
26 -- Does dynamic type of object attached to `obj1' conform to
27 -- dynamic type of object attached to `obj2'?
28 external
29 "C macro use %"eif_plug.h%""
30 alias
31 "econfg"
32 end
33
34 frozen c_same_type (obj1, obj2: POINTER): BOOLEAN is
35 -- Are dynamic type of object attached to `obj1' and
36 -- dynamic type of object attached to `obj2' the same?
37 external
38 "C macro use %"eif_plug.h%""
39 alias
40 "estypeg"
41 end
42
43 frozen c_standard_is_equal (target, source: POINTER): BOOLEAN is
44 -- C external performing standard equality
45 external
46 "C signature (EIF_REFERENCE, EIF_REFERENCE): EIF_BOOLEAN use %"eif_equal.h%""
47 alias
48 "eequal"
49 end
50
51 frozen c_standard_copy (source, target: POINTER) is
52 -- C external performing standard copy
53 external
54 "C signature (EIF_REFERENCE, EIF_REFERENCE) use %"eif_copy.h%""
55 alias
56 "ecopy"
57 end
58
59 frozen c_deep_clone (other: POINTER): ANY is
60 -- New object structure recursively duplicated from the one
61 -- attached to `other'
62 external
63 "C signature (EIF_REFERENCE): EIF_REFERENCE use %"eif_copy.h%""
64 alias
65 "edclone"
66 end
67
68 frozen c_deep_equal (some: POINTER; other: like some): BOOLEAN is
69 -- Are `some' and `other' attached to recursively isomorphic
70 -- object structures?
71 external
72 "C signature (EIF_REFERENCE, EIF_REFERENCE): EIF_BOOLEAN use %"eif_equal.h%""
73 alias
74 "ediso"
75 end
76
77 frozen c_tagged_out (some: ANY): STRING is
78 -- Printable representation of current object
79 external
80 "C use %"eif_out.h%""
81 end
82
83 frozen c_generator_of_type (type_id: INTEGER): STRING is
84 -- Name of the generating class of current object
85 external
86 "C use %"eif_out.h%""
87 end
88
89 frozen c_generator (some: POINTER): STRING is
90 -- Name of the generating class of current object
91 external
92 "C macro use %"eif_out.h%""
93 end
94
95 frozen check_assert (b: BOOLEAN): BOOLEAN is
96 external
97 "C use %"eif_copy.h%""
98 alias
99 "c_check_assert"
100 end
101
102 frozen c_generating_type (obj: POINTER): STRING is
103 external
104 "C macro use %"eif_gen_conf.h%""
105 alias
106 "eif_gen_typename"
107 end
108
109 frozen c_generating_type_of_type (type_id: INTEGER): STRING is
110 external
111 "C signature (int16): EIF_REFERENCE use %"eif_gen_conf.h%""
112 alias
113 "eif_gen_typename_of_type"
114 end
115
116 frozen sp_count (sp_obj: POINTER): INTEGER is
117 -- Count of special object
118 external
119 "C signature (EIF_REFERENCE): EIF_INTEGER use %"eif_plug.h%""
120 end
121
122 frozen in_assertion: BOOLEAN is
123 -- Are we currently checking some assertions?
124 external
125 "C inline use %"eif_eiffel.h%""
126 alias
127 "[
128 GTCX; /* Needed in multithreaded mode as `in_assertion' is a per-thread data. */
129 return EIF_TEST(in_assertion!=0);
130 ]"
131 end
132
133 feature -- Internal C routines
134
135 frozen type_id_from_name (s: POINTER): INTEGER is
136 -- Dynamic type whose name is represented by `s'.
137 external
138 "C signature (char *): EIF_INTEGER use %"eif_cecil.h%""
139 alias
140 "eif_type_id"
141 end
142
143 frozen dynamic_type (object: POINTER): INTEGER is
144 -- Dynamic type of `object'.
145 external
146 "C macro signature (EIF_REFERENCE): EIF_INTEGER use %"eif_macros.h%""
147 alias
148 "Dftype"
149 end
150
151 frozen pre_ecma_mapping_status: BOOLEAN is
152 -- Do we map old name to new name by default?
153 external
154 "C inline use %"eif_cecil.h%""
155 alias
156 "return eif_pre_ecma_mapping();"
157 end
158
159 frozen set_pre_ecma_mapping (v: BOOLEAN) is
160 -- Set `pre_ecma_mapping_status' with `v'.
161 external
162 "C inline use %"eif_cecil.h%""
163 alias
164 "eif_set_pre_ecma_mapping($v)"
165 end
166
167 end

Properties

Name Value
svn:eol-style native
svn:keywords Author Date Id Revision

  ViewVC Help
Powered by ViewVC 1.1.23