From 0a63d12099bf0ce85ac9cdf0a036b5ccf4f22aba Mon Sep 17 00:00:00 2001 From: ivost Date: Sat, 16 Dec 2006 11:32:35 +0000 Subject: [PATCH] * added RFC4122 fields to TGuid (those are used by uuid.pas, an implementation of RFC4122 functions) git-svn-id: trunk@5609 - --- rtl/inc/objpash.inc | 8 ++++++++ 1 file changed, 8 insertions(+) diff --git a/rtl/inc/objpash.inc b/rtl/inc/objpash.inc index 8c4dcc2ae3..c36b8320bd 100644 --- a/rtl/inc/objpash.inc +++ b/rtl/inc/objpash.inc @@ -105,6 +105,14 @@ D3 : word; D4 : array[0..7] of byte; ); + 3 : ( { uuid fields according to RFC4122 } + time_low : dword; // The low field of the timestamp + time_mid : word; // The middle field of the timestamp + time_hi_and_version : word; // The high field of the timestamp multiplexed with the version number + clock_seq_hi_and_reserved : byte; // The high field of the clock sequence multiplexed with the variant + clock_seq_low : byte; // The low field of the clock sequence + node : array[0..5] of byte; // The spatially unique node identifier + ); end; // This enumerate is found both in the rtl and compiler. Do not change the order of the fields.