-USING: help.markup help.syntax io.streams.string kernel sequences strings urls syndication calendar ;
+USING: calendar help.markup help.syntax kernel strings
+syndication urls ;
IN: furnace.syndication
HELP: <feed-action>
! Copyright (C) 2010 Erik Charlebois, William Schlieper.
! See http://factorcode.org/license.txt for BSD license.
-USING: accessors alien.c-types alien.data arrays kernel game.input
-namespaces math classes bit-arrays system sequences vectors
-x11 x11.xlib assocs generalizations ;
+USING: accessors alien.c-types alien.data assocs bit-arrays
+game.input kernel math namespaces sequences system x11 x11.xlib ;
IN: game.input.x11
SINGLETON: x11-game-input-backend
! Copyright (C) 2008 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
-USING: classes help.markup help.syntax io.streams.string ;
+USING: classes help.markup help.syntax ;
IN: http.server.dispatchers
HELP: new-dispatcher
! Based on Clojure's PersistentHashMap by Rich Hickey.
-USING: math math.bitwise arrays kernel accessors locals sequences
-sequences.private
-persistent.sequences
-persistent.hashtables.config
-persistent.hashtables.nodes ;
+USING: accessors kernel math math.bitwise
+persistent.hashtables.config persistent.hashtables.nodes
+persistent.sequences sequences sequences.private ;
IN: persistent.hashtables.nodes.bitmap
: index ( bit bitmap -- n ) [ 1 - ] dip bitand bit-count ; inline
! Based on Clojure's PersistentHashMap by Rich Hickey.
-USING: kernel accessors math arrays fry sequences
-locals persistent.sequences
-persistent.hashtables.config
-persistent.hashtables.nodes
-persistent.hashtables.nodes.leaf ;
+USING: accessors kernel persistent.hashtables.nodes
+persistent.hashtables.nodes.leaf persistent.sequences sequences ;
IN: persistent.hashtables.nodes.collision
: find-index ( key hashcode collision-node -- n leaf-node )
! Based on Clojure's PersistentHashMap by Rich Hickey.
-USING: accessors kernel locals persistent.hashtables.nodes ;
+USING: accessors kernel persistent.hashtables.nodes ;
IN: persistent.hashtables.nodes.empty
M: empty-node (entry-at) 3drop f ;
! Based on Clojure's PersistentHashMap by Rich Hickey.
-USING: math accessors kernel arrays sequences sequences.private
-locals
-persistent.sequences
-persistent.hashtables.config
-persistent.hashtables.nodes ;
+USING: accessors kernel math persistent.hashtables.config
+persistent.hashtables.nodes persistent.sequences sequences
+sequences.private ;
IN: persistent.hashtables.nodes.full
M:: full-node (new-at) ( shift value key hashcode full-node -- node' added-leaf )
! Based on Clojure's PersistentHashMap by Rich Hickey.
-USING: kernel accessors locals math arrays namespaces make
-persistent.hashtables.config
-persistent.hashtables.nodes ;
+USING: accessors arrays kernel make persistent.hashtables.nodes ;
IN: persistent.hashtables.nodes.leaf
: matching-key? ( key hashcode leaf-node -- ? )
-USING: kernel accessors locals combinators math arrays
-assocs namespaces sequences ;
+USING: accessors arrays assocs combinators kernel math sequences ;
IN: persistent.heaps
! These are minheaps
! Copyright (C) 2011 John Benediktsson
! See http://factorcode.org/license.txt for BSD license
-USING: accessors combinators fry hash-sets hashtables kernel
-locals math math.parser sequences sets vectors ;
+USING: accessors hash-sets kernel math sequences sets vectors ;
IN: benchmark.ant
-USING: cuckoo-filters endian fry kernel math sequences ;
+USING: cuckoo-filters endian kernel math sequences ;
IN: benchmark.cuckoo-filters
: insert-data ( cuckoo-filter -- cuckoo-filter )
! Copyright (C) 2012 John Benediktsson
! See http://factorcode.org/license.txt for BSD license.
-USING: kernel math memoize sequences ;
+USING: kernel math sequences ;
IN: benchmark.memoize
MEMO: mem0 ( -- ) ;
! Copyright (C) 2011 John Benediktsson
! See http://factorcode.org/license.txt for BSD license
-USING: arrays assocs kernel ranges random sequences sets
+USING: arrays assocs kernel random sequences
sorting trees.splay ;
IN: benchmark.splay
-USING: kernel sequences math math.functions vectors ;
+USING: kernel sequences math vectors ;
IN: benchmark.stack
: stack-loop ( vec -- )
! Copyright (C) 2009 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors alien.data classes.struct combinators.smart
-fry kernel math math.functions math.order math.parser sequences
+kernel math math.functions math.order math.parser sequences
specialized-arrays io ;
FROM: alien.c-types => float ;
IN: benchmark.struct-arrays
-USING: math kernel kernel.private slots.private ;
+USING: math kernel slots.private ;
IN: benchmark.typecheck2
TUPLE: hello n ;
-USING: math kernel kernel.private slots.private ;
+USING: math kernel slots.private ;
IN: benchmark.typecheck3
TUPLE: hello n ;
! Copyright (C) 2011 John Benediktsson
! See http://factorcode.org/license.txt for BSD license
-USING: accessors destructors endian fry io.sockets kernel
+USING: accessors destructors endian io.sockets kernel
sequences ;
IN: benchmark.udp-echo0
! Copyright (C) 2012 John Benediktsson
! See http://factorcode.org/license.txt for BSD license.
-USING: kernel math random sequences splitting strings unicode ;
+USING: kernel math random sequences splitting unicode ;
IN: benchmark.unicode
: crazy-unicode-string ( -- string )
! Copyright (C) 2012 John Benediktsson
! See http://factorcode.org/license.txt for BSD license.
-USING: kernel math math.parser sequences splitting wrap wrap.strings ;
+USING: kernel math math.parser sequences splitting wrap.strings ;
IN: benchmark.wrap
: wrap-benchmark ( -- )
! Copyright (C) 2008 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
-USING: io.encodings.utf8 io.directories io.files kernel
-sequences xml ;
+USING: io.directories kernel sequences xml ;
IN: benchmark.xml
: xml-benchmark ( -- )
! Copyright (C) Chris Double.
! See http://factorcode.org/license.txt for BSD license.
-USING: alien.accessors alien.c-types alien.syntax byte-arrays
-destructors generalizations kernel libc locals math math.order
-sequences sequences.private classes.struct accessors alien.data
-typed ;
+USING: accessors alien.accessors alien.c-types alien.data
+byte-arrays classes.struct destructors generalizations kernel
+libc math math.order sequences sequences.private typed ;
IN: benchmark.yuv-to-rgb
STRUCT: yuv-buffer
! See http://factorcode.org/license.txt for BSD license
USING: accessors base64.private byte-arrays combinators endian
-generalizations grouping io io.encodings.binary
-io.encodings.string io.encodings.utf8 io.files
-io.streams.byte-array kernel kernel.private literals make math
-math.bitwise sequences splitting.monotonic ;
+grouping io io.encodings.binary io.encodings.string
+io.encodings.utf8 io.files io.streams.byte-array kernel
+kernel.private literals make math math.bitwise sequences
+splitting.monotonic ;
IN: binhex
assocs
base64
byte-arrays
- hashtables
http
http.client
io.encodings.binary
json.reader
json.writer
kernel
- locals
namespaces
sequences
strings
! See http://factorcode.org/license.txt for BSD license
USING: accessors arrays assocs bencode byte-arrays byte-vectors
calendar checksums checksums.sha combinators destructors endian
-fry grouping http.client io io.encodings.binary io.files
+grouping http.client io io.encodings.binary io.files
io.pathnames io.sockets io.streams.byte-array io.streams.duplex
-kernel literals locals make math math.bitwise math.functions
-math.order math.parser ranges multiline namespaces
-prettyprint random sequences splitting strings timers
-tools.annotations ui ui.gadgets.panes ui.tools.listener urls
-urls.encoding ;
+kernel literals make math math.bitwise math.functions math.order
+math.parser namespaces random ranges sequences splitting strings
+timers ui ui.gadgets.panes ui.tools.listener urls ;
IN: bittorrent
! See http://factorcode.org/license.txt for BSD license.
USING: accessors arrays boids.simulation calendar classes colors
-kernel literals locals math math.functions math.trig models
-namespaces opengl opengl.demo-support opengl.gl sequences
+kernel literals math math.functions math.trig models
+models.range opengl opengl.demo-support opengl.gl sequences
threads ui ui.commands ui.gadgets ui.gadgets.borders
ui.gadgets.buttons ui.gadgets.frames ui.gadgets.grids
ui.gadgets.labeled ui.gadgets.labels ui.gadgets.packs
-ui.gadgets.sliders ui.gadgets.tracks ui.gadgets.worlds ui.render
-ui.tools.common ;
+ui.gadgets.sliders ui.render ui.tools.common ;
QUALIFIED-WITH: models.range mr
IN: boids
! Copyright (C) 2008 Eduardo Cavazos.
! Copyright (C) 2011 Anton Gorenko.
! See http://factorcode.org/license.txt for BSD license.
-USING: accessors arrays combinators.short-circuit kernel
-locals math math.vectors random sequences ;
+USING: accessors arrays combinators.short-circuit kernel math
+math.vectors random sequences ;
IN: boids.simulation
CONSTANT: WIDTH 512
! Copyright (C) 2018 Alexander Ilin.
! See http://factorcode.org/license.txt for BSD license.
-USING: arrays help.markup help.syntax kernel quotations sequences ;
+USING: arrays help.markup help.syntax kernel ;
IN: boolean-expr
ABOUT: "boolean-expr"
USING: accessors arrays ascii calendar colors colors.gray
-combinators.short-circuit fry kernel locals math math.constants
-math.functions math.libm math.order math.points ranges
-math.vectors namespaces opengl processing.shapes quotations
-random sequences splitting timers ui ui.gadgets
-ui.gadgets.borders ui.gadgets.buttons ui.gadgets.frame-buffer
-ui.gadgets.packs ui.gestures ;
+combinators.short-circuit kernel math math.constants
+math.functions math.libm math.order math.points math.vectors
+namespaces opengl processing.shapes quotations random ranges
+sequences splitting timers ui ui.gadgets ui.gadgets.borders
+ui.gadgets.buttons ui.gadgets.frame-buffer ui.gadgets.packs
+ui.gestures ;
IN: bubble-chamber
! Copyright (C) 2009 Doug Coleman.
! See http://factorcode.org/license.txt for BSD license.
-USING: accessors combinators combinators.short-circuit
-generalizations kernel locals math.order ranges
-sequences.parser sequences sequences.generalizations
-sorting.functor sorting.slots unicode ;
+USING: accessors combinators combinators.short-circuit kernel
+math.order ranges sequences sequences.generalizations
+sequences.parser sorting.functor sorting.slots unicode ;
IN: c.lexer
: take-c-comment ( sequence-parser -- seq/f )
! http://cairographics.org/samples/text/
-USING: accessors byte-arrays combinators kernel math
+USING: accessors byte-arrays cairo.ffi combinators kernel math
math.constants opengl.gl pango.cairo.ffi ui ui.gadgets ui.render ;
IN: cairo-demo
TUPLE: cairo-demo-gadget < gadget image-array cairo-t ;
-USE: io
-USE: formatting
-
M: cairo-demo-gadget draw-gadget* ( gadget -- )
0 0 glRasterPos2i
1.0 -1.0 glPixelZoom
! Copyright (C) 2008 Matthew Willis.
! See http://factorcode.org/license.txt for BSD license.
-USING: accessors cairo destructors kernel libc math namespaces
-opengl.gl pango.cairo.ffi sequences ui.gadgets ui.render ;
+USING: accessors cairo cairo.ffi destructors kernel libc math
+namespaces opengl.gl sequences ui.gadgets ui.render ;
IN: cairo-gadgets
SYMBOL: current-cairo
! Copyright (C) 2008 Doug Coleman, Joe Groff.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors byte-arrays images images.normalization
-images.viewer kernel locals math namespaces opengl opengl.gl
+images.viewer kernel math namespaces opengl opengl.gl
sequences ui ui.gadgets.worlds ;
IN: cap
! See http:// factorcode.org/license.txt for BSD license.
USING: accessors alien alien.c-types alien.data alien.libraries
alien.syntax classes.struct combinators combinators.short-circuit
-kernel math math.order sequences typed specialized-arrays locals
-system ;
+kernel math math.order sequences typed specialized-arrays system ;
SPECIALIZED-ARRAY: void*
IN: chipmunk.ffi
! Copyright (C) 2009 Joe Groff.
! See http://factorcode.org/license.txt for BSD license.
-USING: accessors assocs classes.tuple generalizations kernel
-quotations sequences ;
+USING: assocs classes help.markup help.syntax kernel math
+quotations strings ;
IN: combinators.tuple
HELP: 1make-tuple
! Copyright (C) 2009 Joe Groff.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors assocs classes.tuple generalizations kernel
-locals quotations sequences ;
+quotations sequences ;
IN: combinators.tuple
<PRIVATE
! Copyright (C) 2005 Chris Double, 2007 Clemens Hofreither, 2008 James Cash.
! See http://factorcode.org/license.txt for BSD license.
-USING: kernel hashtables namespaces make continuations quotations
-accessors ;
+USING: kernel hashtables namespaces make continuations accessors ;
IN: coroutines
SYMBOL: current-coro
! Copyright (C) 2010 Doug Coleman.
! See http://factorcode.org/license.txt for BSD license.
-USING: accessors alien.c-types alien.strings byte-arrays cuda
-cuda.contexts cuda.devices cuda.libraries cuda.memory cuda.syntax
-destructors io io.encodings.string io.encodings.utf8 kernel locals
-math math.parser namespaces sequences strings ;
+USING: alien.c-types cuda cuda.contexts cuda.devices
+cuda.libraries cuda.memory cuda.syntax destructors io
+io.encodings.string io.encodings.utf8 kernel math math.parser
+sequences strings ;
IN: cuda.demos.hello-world
CUDA-LIBRARY: hello cuda32 "vocab:cuda/demos/hello-world/hello.ptx"
! Copyright (C) 2010 Erik Charlebois.
! See http://factorcode.org/license.txt for BSD license.
-USING: arrays destructors fry gpu.framebuffers gpu.render gpu.shaders
-gpu.state gpu.textures gpu.util images kernel locals math
-math.rectangles sequences ;
+USING: destructors gpu.render gpu.shaders gpu.state gpu.textures
+gpu.util images kernel math math.rectangles sequences ;
IN: gpu.effects.blur
GLSL-SHADER: blur-fragment-shader fragment-shader
! Copyright (C) 2010 Erik Charlebois.
! See http://factorcode.org/license.txt for BSD license.
-USING: destructors gpu.render gpu.shaders gpu.state gpu.textures
-gpu.util images kernel locals math.rectangles ;
+USING: destructors gpu.render gpu.shaders gpu.state gpu.util
+images kernel math.rectangles ;
IN: gpu.effects.step
GLSL-SHADER: step-fragment-shader fragment-shader
! See http://factorcode.org/license.txt for BSD license.
USING: accessors alien alien.c-types alien.data arrays assocs
classes classes.parser classes.struct classes.tuple
-classes.tuple.private combinators combinators.tuple fry generic
+classes.tuple.private combinators combinators.tuple generic
generic.parser gpu.buffers gpu.framebuffers
gpu.framebuffers.private gpu.shaders gpu.shaders.private
-gpu.textures gpu.textures.private kernel lexer locals math
+gpu.textures gpu.textures.private kernel lexer math
math.parser math.vectors.simd opengl.gl parser quotations
sequences slots sorting specialized-arrays strings variants words ;
FROM: math => float ;
! Copyright (C) 2009 Joe Groff.
! See http://factorcode.org/license.txt for BSD license.
USING: arrays destructors gpu.buffers gpu.framebuffers gpu.render
-gpu.shaders gpu.state gpu.textures images kernel locals math
+gpu.shaders gpu.state gpu.textures images kernel math
math.rectangles opengl.gl sequences specialized-arrays ;
FROM: alien.c-types => float ;
SPECIALIZED-ARRAY: float
-USING: accessors alien.data alien.data.map byte-arrays combinators combinators.short-circuit
-fry generalizations images kernel locals math math.constants math.functions
-math.libm math.matrices.simd math.vectors math.vectors.conversion math.vectors.simd
-memoize random random.mersenne-twister sequences sequences.private specialized-arrays
-typed ;
+USING: accessors alien.data alien.data.map
+byte-arrays combinators combinators.short-circuit
+generalizations images kernel math math.matrices.simd
+math.vectors math.vectors.conversion math.vectors.simd random
+random.mersenne-twister sequences sequences.private
+specialized-arrays typed ;
QUALIFIED-WITH: alien.c-types c
SPECIALIZED-ARRAYS: c:float c:uchar float-4 uchar-16 ;
IN: noise
USING: alien.c-types alien.data arrays colors grouping kernel
-locals math math.vectors namespaces opengl opengl.demo-support
-opengl.gl opengl.glu sequences sequences.generalizations shuffle
-;
-
+math math.vectors namespaces opengl opengl.demo-support
+opengl.gl opengl.glu sequences sequences.generalizations ;
IN: processing.shapes
SYMBOL: fill-color
-USING: accessors alien.data.map arrays byte-arrays combinators
-combinators.smart fry grouping images kernel math
-math.matrices.simd math.order math.vectors noise random
-sequences math.vectors.simd typed ;
+USING: accessors alien.data.map byte-arrays combinators grouping
+images kernel math math.matrices.simd math.order math.vectors
+math.vectors.simd noise random sequences typed ;
FROM: alien.c-types => float uchar ;
IN: terrain.generation
! Copyright (C) 2007 Alex Chapman
! See http://factorcode.org/license.txt for BSD license.
USING: accessors arrays assocs combinators
-combinators.short-circuit deques dlists kernel locals make math
+combinators.short-circuit deques dlists kernel make math
math.order namespaces parser prettyprint.custom random sequences
vectors ;
IN: trees
-USING: accessors alien.c-types alien.data combinators grouping
-kernel locals math math.vectors opengl opengl.gl sequences
+USING: accessors alien.c-types alien.data grouping kernel
+math math.vectors opengl opengl.gl sequences
specialized-arrays ui.gadgets ui.render ;
SPECIALIZED-ARRAY: uint
IN: ui.gadgets.frame-buffer