realbasic-nug
[Top] [All Lists]

Re: Carbonizing Declares

To: REALbasic Network Users Group <realbasic-nug at lists dot realsoftware dot com>
Subject: Re: Carbonizing Declares
From: Ryan Govostes <panic at twcny dot rr dot com>
Date: Sun, 30 Mar 2003 15:49:19 -0500
Woops! I forgot to put "then" after one of the Ifs. I wrote that code off the top of my head, since REALbasic wasn't open.

Function GetFragmentName(ClassicLib as String) As String
   dim sysV as integer
   if system.gestalt("sysv", sysV) and sysV >= &h1000 then
      return "CarbonLib"
   else
      return ClassicLib
   end if
End Function

Regards,
Ryan Govostes


---
A searchable archive of this list is available at:
<http://support.realsoftware.com/listarchives/search.php>

Unsubscribe:
<mailto:realbasic-nug-off at lists dot realsoftware dot com>

Subscribe to the digest: <mailto:realbasic-nug-digest at lists dot realsoftware dot com>
.


<Prev in Thread] Current Thread [Next in Thread>