steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

ui.gadgets.plot: Use the new slate

db4
Eduardo Cavazos 2008-07-31 16:13:27 -05:00
parent 22f2a0d856
commit 52085a4e49
1 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
extra/ui/gadgets/plot/plot.factor
View File

@ -47,12 +47,14 @@ M: function plot-function ( plot function -- plot )
[ [ drop 0 ] [ y-min>> ] bi 2array ] [ [ drop 0 ] [ y-min>> ] bi 2array ]
[ [ drop 0 ] [ y-max>> ] bi 2array ] bi line* ; [ [ drop 0 ] [ y-max>> ] bi 2array ] bi line* ;
M: plot draw-gadget* ( plot -- ) ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
dup call-next-method
USING: ui.gadgets.slate ;
M: plot draw-slate ( plot -- plot )
2 glLineWidth 2 glLineWidth
draw-axis draw-axis
plot-functions plot-functions
drop
fill-mode fill-mode
1 glLineWidth ; 1 glLineWidth ;