From: John Benediktsson <mrjbq7@gmail.com>
Date: Wed, 22 Nov 2023 04:04:11 +0000 (-0800)
Subject: anagrams: removing unix platform restriction
X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=commitdiff_plain;h=0bdacf4468c245b4dff17b1cf6b0b4bea1f4866f

anagrams: removing unix platform restriction
---

diff --git a/extra/anagrams/anagrams.factor b/extra/anagrams/anagrams.factor
index 75b064645d..095757da3d 100644
--- a/extra/anagrams/anagrams.factor
+++ b/extra/anagrams/anagrams.factor
@@ -2,7 +2,7 @@
 ! See https://factorcode.org/license.txt for BSD license
 
 USING: ascii assocs io.encodings.ascii io.files kernel math
-sequences sequences.extras sorting sets ;
+sequences sequences.extras sets sorting system ;
 IN: anagrams
 
 : make-anagram-hash ( strings -- assoc )
@@ -10,7 +10,9 @@ IN: anagrams
     [ members ] assoc-map
     [ length 1 > ] filter-values ;
 
-MEMO: dict-words ( -- seq )
+HOOK: dict-words os ( -- seq )
+
+M: unix dict-words
     "/usr/share/dict/words" ascii file-lines [ >lower ] map ;
 
 MEMO: dict-anagrams ( -- assoc )
diff --git a/extra/anagrams/platforms.txt b/extra/anagrams/platforms.txt
deleted file mode 100644
index 509143d863..0000000000
--- a/extra/anagrams/platforms.txt
+++ /dev/null
@@ -1 +0,0 @@
-unix