Use phc-toolkit's compat functions for racket v6.5

2016-09-05 23:23:32 +02:00 · 2016-09-05 23:23:32 +02:00 · e8b0cc8cff
commit e8b0cc8cff
parent 8cd12257ed
1 changed files with 4 additions and 4 deletions
--- a/private/mixin.rkt
+++ b/private/mixin.rkt
@ -2,6 +2,7 @@

 (require "no-order.rkt"
         (for-syntax syntax/parse
+                     phc-toolkit/untyped
                     racket/syntax))

 (provide ~mixin)
@ -9,7 +10,6 @@
 (define-eh-mixin-expander ~mixin
  (syntax-parser
    [(_ (~var mixin (static eh-mixin-expander? "an eh-mixin expander")))
-     (with-disappeared-uses
-      (begin
-        (record-disappeared-uses #'mixin)
-        #'(mixin)))]))
+     (with-disappeared-uses*
+      (record-disappeared-uses* #'mixin)
+      #'(mixin))]))