From fa740ebfcf083d7813fdf2d73fb2185502bbcd03 Mon Sep 17 00:00:00 2001 From: Patrick Mahoney Date: Fri, 3 Aug 2012 16:49:06 -0400 Subject: [PATCH] Reorder and cleanup requires in lang-core.rkt. --- collects/frtime/lang-core.rkt | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) diff --git a/collects/frtime/lang-core.rkt b/collects/frtime/lang-core.rkt index 18c555471d..98ecfb2e4c 100644 --- a/collects/frtime/lang-core.rkt +++ b/collects/frtime/lang-core.rkt @@ -3,13 +3,12 @@ (only racket/base foldl) (only racket/list empty)) (require (only racket/list cons? first second rest empty empty?) + (only racket/base vector-ref build-vector build-list) + (only racket/function identity) + (only mzlib/etc opt-lambda) (only frtime/core/frp super-lift undefined undefined? behavior? do-in-manager-after do-in-manager proc->signal set-signal-thunk! register unregister iq-enqueue value-now/no-copy signal? signal-depth signal:switching? signal-value value-now signal:compound? signal:compound-content signal:switching-current signal:switching-trigger set-cell!) - (only racket/base vector-ref) - (only frtime/lang-ext lift new-cell switch ==> changes deep-value-now) - (only mzlib/etc opt-lambda) - (only racket/base build-vector build-list) - (only racket/function identity)) + (only frtime/lang-ext lift new-cell switch ==> changes deep-value-now)) #| (VECTOR-ANY ) -> value ;;; Apply PRED? to each element in VECTOR ...; if PRED?