Failures:

  test/MyLanguagesSpec.hs:34:9: 
  1) MyLanguages, My languages, Random tests
       Falsifiable (after 43 tests):
         [("Clojure",93),("Haskell",21),("Ruby",93),("Scala",19),("ASM",28)]
       expected: ["Clojure","Ruby"]
        but got: ["Ruby","Clojure"]

It is provided. Just type (SELECT * FROM events), then you'll see the expected results in the output.