49 lines
1.3 KiB
Factor
49 lines
1.3 KiB
Factor
! Copyright (C) 2016 Alexander Ilin.
|
|
! See http://factorcode.org/license.txt for BSD license.
|
|
USING: accessors colors.constants google.charts
|
|
google.charts.private kernel math present sequences tools.test ;
|
|
IN: google.charts.tests
|
|
|
|
! The order of the constructors below is important, because we
|
|
! are testing side-effects. If you remove the clone word from
|
|
! chart>url implementation, the second object in each test
|
|
! will incorrectly result in the same URL as the first one
|
|
! (although the order of parameters in the URL may vary).
|
|
! The order of tests is important for the same reason.
|
|
|
|
{ t } [
|
|
"" <formula> t >>data-scale
|
|
"" <formula>
|
|
[ chart>url present length ] bi@ >
|
|
] unit-test
|
|
|
|
{ t } [
|
|
{ 0 0 } <line>
|
|
{ 0 0 } <line> f >>width f >>height
|
|
[ chart>url present length ] bi@ >
|
|
] unit-test
|
|
|
|
{ t } [
|
|
{ 0 0 } <line> COLOR: red >>background
|
|
{ 0 0 } <line>
|
|
[ chart>url present length ] bi@ >
|
|
] unit-test
|
|
|
|
{ t } [
|
|
{ 0 0 } <line> COLOR: red >>foreground
|
|
{ 0 0 } <line>
|
|
[ chart>url present length ] bi@ >
|
|
] unit-test
|
|
|
|
{ t } [
|
|
{ 0 0 } <line> { 0 0 } >>margin
|
|
{ 0 0 } <line>
|
|
[ chart>url present length ] bi@ >
|
|
] unit-test
|
|
|
|
{ t } [
|
|
{ 0 0 } <line> 5 >>bar-width
|
|
{ 0 0 } <line>
|
|
[ chart>url present length ] bi@ >
|
|
] unit-test
|