factor: fix load-all

modern-harvey2
Doug Coleman 2017-09-11 17:43:28 -05:00
parent 5d7c397b00
commit eb1bcf642c
7 changed files with 16 additions and 11 deletions

View File

@ -6,7 +6,8 @@ literals locals math math.functions math.trig models opengl
opengl.demo-support opengl.gl sequences threads ui 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.render ;
ui.gadgets.packs ui.gadgets.sliders ui.render
combinators.smart.syntax ;
QUALIFIED-WITH: models.range mr
IN: boids

View File

@ -47,12 +47,12 @@ M: object expr>str unparse ;
basic-block get number>> ;
: add-gvns ( graph -- graph' )
"gvns" [add-node
"gvns" add-node[
congruence-classes =label
"plaintext" =shape
];
"gvns" 0 [add-edge "invis" =style ];
basic-block# [add-node "bold" =style ];
]
"gvns" 0 add-edge[ "invis" =style ]
basic-block# add-node[ "bold" =style ]
;
SYMBOL: iteration

View File

@ -4,7 +4,8 @@ USING: accessors alien.c-types alien.data arrays circular colors
colors.constants columns destructors fonts gpu.buffers
gpu.render gpu.shaders gpu.state gpu.textures images kernel
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 ;
SPECIALIZED-ARRAYS: float uint ;
IN: game.debug

View File

@ -1,7 +1,8 @@
! Copyright (c) 2012 Anonymous
! See http://factorcode.org/license.txt for BSD license.
USING: accessors arrays formatting kernel literals math
math.functions math.matrices math.ranges sequences ;
USING: accessors arrays combinators.smart.syntax formatting
kernel literals math math.functions math.matrices math.ranges
sequences ;
IN: rosetta-code.pythagorean-triples
! http://rosettacode.org/wiki/Pythagorean_triples

View File

@ -3,7 +3,7 @@
USING: accessors arrays colors fonts fry help.markup help.stylesheet
io.styles kernel literals math math.ranges models namespaces parser
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
CONSTANT: stylesheet

View File

@ -87,7 +87,7 @@ CONSTANT: node-colors {
: <heap-graph> ( -- graph )
<digraph>
[graph "dot" =layout ];
graph[ "dot" =layout ]
<graph-attributes> "false" >>overlap add ;
: image>graph ( image -- graph )

View File

@ -6,7 +6,9 @@ math.constants math.functions sequences ui ui.gadgets
ui.gadgets.charts ui.gadgets.charts.axes ui.gadgets.charts.lines ;
IN: ui.gadgets.charts.demos
CONSTANT: -pi $[ pi neg ]
<<
CONSTANT: -pi 1[ pi neg ]
>>
: sine-wave ( steps -- seq )
[ <iota> ] keep