World: r3wp

correct, an ip address can only have one PTR record, so for virtual 
hosting it's impossible for the reverse lookup to work.

I see, thank you all

amacleod:   Do you mean the download address?   
http://rebol.com/view-platforms.html
http://rebol.com/platforms.html

Alan, let me know if this works for you.

make-char-elements: func [name count /local result][
    result: copy []
    loop count [insert tail result reduce [:name [char!]]]
    result
]


OSVERSIONINFO: make struct! compose [
    OSVersionInfoSize [integer!]
    MajorVersion      [integer!]
    MinorVersion      [integer!]
    BuildNumber       [integer!]
    PlatformId        [integer!]
    (make-char-elements 'CSDVersion 128)
] none
OSVERSIONINFO/OSVersionInfoSize: length? third OSVERSIONINFO


;-- Requires NT 5.0 (NT4 SP6) or later
OSVERSIONINFOEX: make struct! compose [
    OSVersionInfoSize [integer!]
    MajorVersion      [integer!]
    MinorVersion      [integer!]
    BuildNumber       [integer!]
    PlatformId        [integer!]
    (make-char-elements 'CSDVersion 128)
    SvcPackMajor      [short]
    SvcPackMinor      [short]
    SuiteMask         [short]
    ProductType       [char!]
    Reserved          [char!]
] none
OSVERSIONINFOEX/OSVersionInfoSize: length? third OSVERSIONINFOEX


;---------------------------------------------------------------

lib: load/library %kernel32.dll

GetVersion: make routine! compose/deep [
    lpVerInfo [struct! [(OSVERSIONINFO)]]
    return: [integer!]
] lib "GetVersion"

GetVersionEx: make routine! compose/deep [
    lpVerInfo [struct! [(OSVERSIONINFOEX)]]
    return: [integer!]
] lib "GetVersionExA"


; load the OS version info data.
OSVI: OSVERSIONINFOEX
if 0 = GetVersionEx OSVI [
    OSVI: OSVERSIONINFO
    GetVersion OSVI
]

free lib

;---------------------------------------------------------------

get-CSDVersion: func [OSVer-struct [struct!]] [
    trim/tail to string! copy/part at third OSVer-struct 18 128
]

ExInfoAvailable?: equal? third OSVI third OSVERSIONINFOEX


OSPlatform: [
    0 Win32s    ; Win32s Win32s on Windows 3.1.
    1 Win32     ; Win32 on 95, 98, SE, or Me.
    2 WinNT     ; WinNT Win32 on Windows NT.
]

major-ver: OSVI/MajorVersion
minor-ver: OSVI/MinorVersion

major-ver?: func [val [integer!]] [major-ver = val]
minor-ver?: func [val [integer!]] [minor-ver = val]


PlatWin32s?: does ['Win32s = select OSPlatform OSVI/PlatformId]
PlatWin32?:  does ['Win32  = select OSPlatform OSVI/PlatformId]
PlatWinNT?:  does ['WinNT  = select OSPlatform OSVI/PlatformId]

Win95?: does [all [PlatWin32?  major-ver? 4  minor-ver? 0]]
Win98?: does [all [PlatWin32?  major-ver? 4  minor-ver? 10]]
WinMe?: does [all [PlatWin32?  major-ver? 4  minor-ver? 90]]

WinNT?: does [all [PlatWinNT?  major-ver <= 4]]
WinNT351?: does [all [PlatWinNT?  major-ver? 3  minor-ver? 51]]

Win2K?: does [all [PlatWinNT?  major-ver? 5  minor-ver? 0]]
WinXP?: does [all [PlatWinNT?  major-ver? 5  minor-ver? 1]]

WinServer2003?: does [all [PlatWinNT?  major-ver? 5  minor-ver? 2]]

WuJian, No I was looking for a way for my app to know what it is 
running on...Thanks though..

Gregg, That looks far more intricate than I need but I will definitly 
keep it in mind.

I used a simple method...

first i used system/version to see what version of rebol is running 
so I can see if its Windows , Mac or Linux.

2nd- If its Windows I use 'Call/output "ver" win_ver' to get the 
windows version. I parse out what I need from the output. I just 
need to know if its vista as it has some file structure differences 
that screw up my "install".

Thanks for hte help...

Here is the group for discussing R2 releases and plans.

What happended to the r2beta world?

please remove the .3 seconds delay on call/wait

We already have a list of priorities there.

Too closed. We can use the R3 development infrastructure for R2 releases. 
That means here, chat, CureCode.

Ok, just a little background info/goals:

we can pull the data in from there then.

1. I would like to release this week.
2. BrianH will set the priorities.

3. I can post any code needed to fix problems. But, if you make a 
change, be sure to test it really well. I do not have the time to 
test.
4. We can release again next month, and each month after that.

What do you mean by "remove the restrictions on the special features 
in View"

Right now it requires a license key for special features.

That release schedule sounds good to me. That way we can triage and 
schedule changes.

rebcmdview ?

Last year we sold very few View/Pro licenses (maybe 2?)  People buy 
the SDK or Command.

SSL and other protocols will come from the SDK too ?

Is there any difference between the free View now and Pro ??

Without sounding too critical, it's taken this long to make what 
seems to be THE most important decision in the last 10 years? (IMO)

G: no diff, just license key.

T: I agree. Sorry.

Sorry, I thought you released all the pro features a while ago ...

S: SSL, not sure about others.

G: did we?

That was my impression ... sound ports, library calls

that was part of /Pro and is now free

Good, then mainly SSL.

The only significant thing you can do now is release SSL and OBDC 
free

What is the reason to do R2 release in current time-frame, when we 
are supposed to be heading for R3 beta?

Ok, on ODBC.

Encryption ports ...

Pekr, promises made.

DLL access?

Pekr, because R3's compatibility policy depends on continued support 
of R2.

Terry - DLL and Shell were released long time ago.

Believe me, I do not want to take extra time away from R3 beta, but 
also, I did not want to delay R2 this long.

Yes ..

The only thing left in /Command is - fastcgi, SSL, ODBC, mySQL?

so, just release a license ??

And Oracle (does anyone use that?)

if SSL and ODBC would be released for free, it would make many folks 
happy ...

Larry Ellison?

B: on O, yes. Odd as it seems.

simplest thing to do is just release a license ...

BrianH, Carl ... under Windows, many DBs are just used via ODBC drivers 
...

Graham, let's do it right.