fix `expt' on small negative number and large positive odd

The pow() function apparently gets it wrong on some platforms. Closes PR 13391 original commit: 07d5a9e3857f9f4f243b3f4891b1ff1b0d087698
2013-01-01 12:31:24 -07:00 · 2013-01-01 12:31:24 -07:00 · 0a1811126a
commit 0a1811126a
parent c344fd47cd
1 changed files with 1 additions and 0 deletions
--- a/collects/mred/private/wx/gtk/frame.rkt
+++ b/collects/mred/private/wx/gtk/frame.rkt
@ -406,6 +406,7 @@

    (define focus-here? #f)
    (define/override (on-focus? on?)
+      (unless on? (on-menu-click))
      (on-focus-child on?)
      (cond
       [on?