Resolved merge.

[factor.git] / core / math / order / order-tests.factor

diff --git a/core/math/order/order-tests.factor b/core/math/order/order-tests.factor
index 665537be5da845de6428800242bbab87f1f629cf..edd50d3f55a68052debc33956e7e16ddd59d7473 100644 (file)
--- a/core/math/order/order-tests.factor
+++ b/core/math/order/order-tests.factor
@@ -7,3 +7,6 @@ IN: math.order.tests
 [ +eq+ ] [ 4 4 <=> ] unit-test
 [ +gt+ ] [ 4 3 <=> ] unit-test
 
+[ 20 ] [ 20 0 100 clamp ] unit-test
+[ 0 ] [ -20 0 100 clamp ] unit-test
+[ 100 ] [ 120 0 100 clamp ] unit-test