[fpc-pascal] CreateGUID() [was Re: GUID code]

[listmember]

Michael Van Canneyt wrote:

> It's in SubVersion. 
> 2 demo units are in packages/extra/uuid, with testprograms.

http://svn.freepascal.org/svn/fpc/trunk/packages/extra/uuid/

It looks OK to me, except that it may be a little more optimized
for speed since GUIDs are CPU-expensive to begin with.

A couple of questions, wrt FPC v2.x:

-- Is Int64 supported in all platforms?

-- Is there a Int128 or something like it?
    When Windows was 32bit, Delphi had Int64; it's only natural
    that now we should have Int128 :-)

-- GUID unit being in extra/uuid/, does it mean it will not
    be available in, say, Windows since Windows has a native
    call for that.
    Personally, I'd like 'OnCreateGUID : TCreateGUIDFunc = Nil;
    to be available in all platforms.

Cheers,
Basri