diff --git a/.github/CODEOWNERS b/.github/CODEOWNERS index 20408047c..b5b0dfcdd 100644 --- a/.github/CODEOWNERS +++ b/.github/CODEOWNERS @@ -1,6 +1,9 @@ # Code owners .github/CODEOWNERS @exercism/maintainers-admin +# The code sample shown in the code check when people sign up to Exercism +docs/SIGN_UP_SNIPPET.txt @exercism/maintainers-admin + # Changes to `fetch-configlet` should be made in the `exercism/configlet` repo bin/fetch-configlet @exercism/maintainers-admin diff --git a/docs/SIGN_UP_SNIPPET.txt b/docs/SIGN_UP_SNIPPET.txt new file mode 100644 index 000000000..387a75bc4 --- /dev/null +++ b/docs/SIGN_UP_SNIPPET.txt @@ -0,0 +1,8 @@ +(defn most-common-word [text] + (let [[best counts] + (reduce (fn [[best counts] word] + (let [counts (update counts word (fnil inc 0))] + [(if (> (counts word) (get counts best 0)) word best) counts])) + [nil {}] + (str/split (str/lower-case text) #" "))] + (format "\"%s\" appears %d times" best (counts best))))