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