"<$" made generic + moved to monads

[factor.git] / extra / monads / monads.factor

diff --git a/extra/monads/monads.factor b/extra/monads/monads.factor
index f4503cbdd3f1f1f552f91f3a96002d95332de64f..9a3e605c7fc4926f5b5f90fd1fd4af6259208529 100644 (file)
--- a/extra/monads/monads.factor
+++ b/extra/monads/monads.factor
@@ -7,6 +7,7 @@ IN: monads
 
 ! Functors
 GENERIC# fmap 1 ( functor quot -- functor' )
+GENERIC# <$ 1 ( functor quot -- functor' )
 
 ! Monads