tools.test: Make the flag public. Finish porting tester changes to fuzzer.

[factor.git] / unmaintained / ori / ori.factor

diff --git a/unmaintained/ori/ori.factor b/unmaintained/ori/ori.factor
index b7c2458c6b032db74434f15d64880b026714a43b..0683c0c3eb2536df6c08b6c2894050acf5b42c90 100644 (file)
--- a/unmaintained/ori/ori.factor
+++ b/unmaintained/ori/ori.factor
@@ -13,7 +13,7 @@ C: <ori> ori
 
 : ori> ( -- val ) self> val>> ;
 
-: >ori ( val -- ) self> (>>val) ;
+: >ori ( val -- ) self> val<< ;
 
 ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!