factor: fix load-all
parent
5d7c397b00
commit
eb1bcf642c
|
@ -6,7 +6,8 @@ literals locals math math.functions math.trig models opengl
|
||||||
opengl.demo-support opengl.gl sequences threads ui ui.gadgets
|
opengl.demo-support opengl.gl sequences threads ui ui.gadgets
|
||||||
ui.gadgets.borders ui.gadgets.buttons ui.gadgets.frames
|
ui.gadgets.borders ui.gadgets.buttons ui.gadgets.frames
|
||||||
ui.gadgets.grids ui.gadgets.labeled ui.gadgets.labels
|
ui.gadgets.grids ui.gadgets.labeled ui.gadgets.labels
|
||||||
ui.gadgets.packs ui.gadgets.sliders ui.render ;
|
ui.gadgets.packs ui.gadgets.sliders ui.render
|
||||||
|
combinators.smart.syntax ;
|
||||||
QUALIFIED-WITH: models.range mr
|
QUALIFIED-WITH: models.range mr
|
||||||
IN: boids
|
IN: boids
|
||||||
|
|
||||||
|
|
|
@ -47,12 +47,12 @@ M: object expr>str unparse ;
|
||||||
basic-block get number>> ;
|
basic-block get number>> ;
|
||||||
|
|
||||||
: add-gvns ( graph -- graph' )
|
: add-gvns ( graph -- graph' )
|
||||||
"gvns" [add-node
|
"gvns" add-node[
|
||||||
congruence-classes =label
|
congruence-classes =label
|
||||||
"plaintext" =shape
|
"plaintext" =shape
|
||||||
];
|
]
|
||||||
"gvns" 0 [add-edge "invis" =style ];
|
"gvns" 0 add-edge[ "invis" =style ]
|
||||||
basic-block# [add-node "bold" =style ];
|
basic-block# add-node[ "bold" =style ]
|
||||||
;
|
;
|
||||||
|
|
||||||
SYMBOL: iteration
|
SYMBOL: iteration
|
||||||
|
|
|
@ -4,7 +4,8 @@ USING: accessors alien.c-types alien.data arrays circular colors
|
||||||
colors.constants columns destructors fonts gpu.buffers
|
colors.constants columns destructors fonts gpu.buffers
|
||||||
gpu.render gpu.shaders gpu.state gpu.textures images kernel
|
gpu.render gpu.shaders gpu.state gpu.textures images kernel
|
||||||
literals locals make math math.constants math.functions
|
literals locals make math math.constants math.functions
|
||||||
math.vectors sequences specialized-arrays typed ui.text fry ;
|
math.vectors sequences specialized-arrays typed ui.text fry
|
||||||
|
multiline ;
|
||||||
FROM: alien.c-types => float ;
|
FROM: alien.c-types => float ;
|
||||||
SPECIALIZED-ARRAYS: float uint ;
|
SPECIALIZED-ARRAYS: float uint ;
|
||||||
IN: game.debug
|
IN: game.debug
|
||||||
|
|
|
@ -1,7 +1,8 @@
|
||||||
! Copyright (c) 2012 Anonymous
|
! Copyright (c) 2012 Anonymous
|
||||||
! See http://factorcode.org/license.txt for BSD license.
|
! See http://factorcode.org/license.txt for BSD license.
|
||||||
USING: accessors arrays formatting kernel literals math
|
USING: accessors arrays combinators.smart.syntax formatting
|
||||||
math.functions math.matrices math.ranges sequences ;
|
kernel literals math math.functions math.matrices math.ranges
|
||||||
|
sequences ;
|
||||||
IN: rosetta-code.pythagorean-triples
|
IN: rosetta-code.pythagorean-triples
|
||||||
|
|
||||||
! http://rosettacode.org/wiki/Pythagorean_triples
|
! http://rosettacode.org/wiki/Pythagorean_triples
|
||||||
|
|
|
@ -3,7 +3,7 @@
|
||||||
USING: accessors arrays colors fonts fry help.markup help.stylesheet
|
USING: accessors arrays colors fonts fry help.markup help.stylesheet
|
||||||
io.styles kernel literals math math.ranges models namespaces parser
|
io.styles kernel literals math math.ranges models namespaces parser
|
||||||
sequences system ui ui.gadgets ui.gadgets.books ui.gadgets.panes
|
sequences system ui ui.gadgets ui.gadgets.books ui.gadgets.panes
|
||||||
ui.gestures ui.pens.gradient ui.pens.solid ;
|
ui.gestures ui.pens.gradient ui.pens.solid combinators.smart.syntax ;
|
||||||
IN: slides
|
IN: slides
|
||||||
|
|
||||||
CONSTANT: stylesheet
|
CONSTANT: stylesheet
|
||||||
|
|
|
@ -87,7 +87,7 @@ CONSTANT: node-colors {
|
||||||
|
|
||||||
: <heap-graph> ( -- graph )
|
: <heap-graph> ( -- graph )
|
||||||
<digraph>
|
<digraph>
|
||||||
[graph "dot" =layout ];
|
graph[ "dot" =layout ]
|
||||||
<graph-attributes> "false" >>overlap add ;
|
<graph-attributes> "false" >>overlap add ;
|
||||||
|
|
||||||
: image>graph ( image -- graph )
|
: image>graph ( image -- graph )
|
||||||
|
|
|
@ -6,7 +6,9 @@ math.constants math.functions sequences ui ui.gadgets
|
||||||
ui.gadgets.charts ui.gadgets.charts.axes ui.gadgets.charts.lines ;
|
ui.gadgets.charts ui.gadgets.charts.axes ui.gadgets.charts.lines ;
|
||||||
IN: ui.gadgets.charts.demos
|
IN: ui.gadgets.charts.demos
|
||||||
|
|
||||||
CONSTANT: -pi $[ pi neg ]
|
<<
|
||||||
|
CONSTANT: -pi 1[ pi neg ]
|
||||||
|
>>
|
||||||
|
|
||||||
: sine-wave ( steps -- seq )
|
: sine-wave ( steps -- seq )
|
||||||
[ <iota> ] keep
|
[ <iota> ] keep
|
||||||
|
|
Loading…
Reference in New Issue