I had looked at the module and the problem was that even requiring it started the gui stuff, but taking a closer look I found a solution.<div><br></div><div><div>(module helper racket/base</div><div> (module inner-helper racket/base</div>
<div> (require ffi/unsafe)</div><div> (require mred/private/wx/common/once)</div><div> (void (scheme_register_process_global "PLT_IS_FOREGROUND_APP" (get-ffi-obj "main" #f _pointer))))</div><div>
(require 'inner-helper mred/private/wx/cocoa/init))</div><div>(require 'helper)</div></div><div><br></div><div>It seems like this could be made simpler, but it works for me now. Thanks for the pointer.</div>
<div class="gmail_extra"><br><br><div class="gmail_quote">On Sat, Dec 8, 2012 at 4:29 AM, Matthew Flatt <span dir="ltr"><<a href="mailto:mflatt@cs.utah.edu" target="_blank">mflatt@cs.utah.edu</a>></span> wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">I think you mostly want `mred/private/wx/cocoa/queue', but some<br>
refactoring or parameterization may be needed to get it in the right<br>
form.<br>
<div><div class="h5"><br>
At Sat, 8 Dec 2012 01:44:54 -0800, Eric Dobson wrote:<br>
> I'm trying to do some OS X programming and one of the api's I'm using<br>
> requires a CFRunLoop. Using CFRunLoopGetMain works fine if I require<br>
> racket/gui/base, but not otherwise (The loop does not seem to be running).<br>
> The problem with this is that this starts up a gui application in the dock<br>
> and changes the focus to this application. Is it possible to get racket to<br>
> do the necessary setup to interact with Carbon and Core Foundations without<br>
> bringing in the whole gui?<br>
</div></div>> ____________________<br>
> Racket Users list:<br>
> <a href="http://lists.racket-lang.org/users" target="_blank">http://lists.racket-lang.org/users</a><br>
</blockquote></div><br></div>