INDEX
CLUSTER
FEATURES
SHORT
FRAMES
NO FRAMES
indexing
project:
"Visual Eiffel COM"
copyright:
"Object Tools, 1998-2001"
version:
"1.1"
key:
"COM",
"GUID",
"UUID"
cluster:
ecom
class
ECOM_GUID
inherit
COMPARABLE
undefine
is_equal
,
out
end
ECOM_GLOBALS
redefine
is_equal
,
out
end
feature
-- Members
Data1
:
INTEGER
Data2
:
RTS_SHORT_INTEGER
Data3
:
RTS_SHORT_INTEGER
Data4
:
BIT
64
feature
-- Get reference
get_ptr
:
expanded
ECOM_PTR
[
expanded
ECOM_GUID
]
feature
-- Adapt
adapt
(
other
:
ECOM_GUID
)
feature
-- operations
from_string
(
sguid
:
STRING
)
require
non_void_sguid
:
sguid
/=
void
feature
-- size
sizeof
:
INTEGER
feature
-- comparison
is_identical
(
other
:
ECOM_GUID
):
BOOLEAN
-- Is Current identical to other?
is_string_identical
(
other
:
STRING
):
BOOLEAN
-- Is Current identical to other?
require
non_void_other
:
other
/=
void
is_equal
(
other
:
like
Current
):
BOOLEAN
infix
"<" (
other
:
like
Current
):
BOOLEAN
feature
-- queries
out
:
STRING
end
-- class
ECOM_GUID
INDEX
CLUSTER
FEATURES
SHORT
FRAMES
NO FRAMES