From b05120e5872382528c73416046d4e19cdb1bc88f Mon Sep 17 00:00:00 2001 From: Jose Antonio Ortega Ruiz Date: Sun, 2 Sep 2012 14:11:30 +0200 Subject: [PATCH] Racket: fix for enter! --- scheme/racket/geiser/enter.rkt | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/scheme/racket/geiser/enter.rkt b/scheme/racket/geiser/enter.rkt index d7802f5..924ef59 100644 --- a/scheme/racket/geiser/enter.rkt +++ b/scheme/racket/geiser/enter.rkt @@ -121,7 +121,7 @@ (values -inf.0 path))) (values -inf.0 path))))) -(define (check-latest mod flags) +(define (check-latest mod) (define mpi (module-path-index-join mod #f)) (define done (make-hash)) (let loop ([mpi mpi]) @@ -139,8 +139,8 @@ (when (ts . > . (mod-timestamp mod)) (define orig (current-load/use-compiled)) (parameterize ([current-load/use-compiled - (enter-load/use-compiled orig #f flags)] + (enter-load/use-compiled orig #f)] [current-module-declare-name rpath] [current-module-declare-source actual-path]) - ((enter-load/use-compiled orig #t flags) + ((enter-load/use-compiled orig #t) npath (mod-name mod))))))))) -- 2.11.4.GIT