trackler 2.0.3.6 → 2.0.3.7

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA1:
-  metadata.gz: b901d5120c25f537dcee46f542598bbb15a01356
-  data.tar.gz: 8466d0a7d4886cd07a4c9110398131daf7e3dcf9
+  metadata.gz: 7778e095275365245b61d227de2380686d8f52a6
+  data.tar.gz: baf69491b1aa86f855c0a3a0dc312c169d3f91b7
 SHA512:
-  metadata.gz: b25a7bcb55bb5636de9f61f7ad52e304fa68c9761fc5f479debfd0b58176635183714511d6d3cd0c5a515007c271ebaddf70ac6c7913bc526fdacc4d66e9073b
-  data.tar.gz: dda9f974754afe11ae94ec7d937c422ce3dcb5e2cfc24b16fcfc3ee4527df995802b124e0ea46a2d1ab1a491ad602d2ca4ad8ccf2b933d2aa1ea91450b6d3d1b
+  metadata.gz: ef3092dcc542059ebcb8dce86d78c9e36ab07624096d962b469cb06a00d16a6f85684e7a015e8dfd32446172b33b8e49b4ecdb3c01e40eed7d187b5f80beeb11
+  data.tar.gz: 55cb0a7661c46826a0272c15bb231790ada521268054b488e4d219819b61231b0a9cb7ccee5a1e1cd9f3f80923f64187d8d357221322b1799098ab15829d5ad6

data/lib/trackler/version.rb

@@ -1,3 +1,3 @@
 module Trackler
-  VERSION = "2.0.3.6"
+  VERSION = "2.0.3.7"
 end

data/tracks/csharp/build.fsx

@@ -43,8 +43,7 @@ Target "Test" (fun _ ->
         [compiledOutput]
         |> NUnit3 (fun p -> { p with 
                                 ShadowCopy = false
-                                ToolPath = @"C:\Tools\NUnit3\bin\nunit3-console.exe"
-                                ResultSpecs = ["myresults.xml;format=AppVeyor"] })
+                                ToolPath = "nunit3-console.exe" })
     else
         [compiledOutput]
         |> NUnit3 (fun p -> { p with ShadowCopy = false })

data/tracks/csharp/exercises/clock/ClockTest.cs

@@ -107,6 +107,15 @@ public class ClockTest
         Assert.That(clock1, Is.EqualTo(clock2));
     }
 
+    [Ignore("Remove to run test")]
+    [Test]
+    public void Clocks_with_different_time_are_not_equal()
+    {
+        var clock1 = new Clock(15, 30);
+        var clock2 = new Clock(14, 30);
+        Assert.That(clock1, Is.Not.EqualTo(clock2));
+    }
+
     [Ignore("Remove to run test")]
     [Test]
     public void Overflown_clocks_with_same_time_are_equal()

data/tracks/fsharp/build.fsx

@@ -41,8 +41,7 @@ Target "Test" (fun _ ->
         [compiledOutput]
         |> NUnit3 (fun p -> { p with 
                                 ShadowCopy = false
-                                ToolPath = @"C:\Tools\NUnit3\bin\nunit3-console.exe"
-                                ResultSpecs = ["myresults.xml;format=AppVeyor"] })
+                                ToolPath = "nunit3-console.exe" })
     else
         [compiledOutput]
         |> NUnit3 (fun p -> { p with ShadowCopy = false })

data/tracks/fsharp/exercises/binary-search-tree/BinarySearchTreeTest.fs

@@ -34,12 +34,12 @@ let ``Inserting greater`` () =
 let ``Complex tree`` () =
     let tree = fromList [4; 2; 6; 1; 3; 7; 5]
     Assert.That(tree |> value, Is.EqualTo(4))
-    Assert.That(tree |> left |> Option.map value, Is.EqualTo(2))
+    Assert.That(tree |> left |> Option.map value, Is.EqualTo(Some 2))
     Assert.That(tree |> left |> Option.bind (fun x -> x |> left) |> Option.map value, Is.EqualTo(Some 1))
     Assert.That(tree |> left |> Option.bind (fun x -> x |> right) |> Option.map value, Is.EqualTo(Some 3))
-    Assert.That(tree |> right |> Option.map value, Is.EqualTo(6))
+    Assert.That(tree |> right |> Option.map value, Is.EqualTo(Some 6))
     Assert.That(tree |> right |> Option.bind (fun x -> x |> left) |> Option.map value, Is.EqualTo(Some 5))
-    Assert.That(tree |> right |> Option.bind (fun x -> x |> right) |> Option.map value, Is.EqualTo(7))
+    Assert.That(tree |> right |> Option.bind (fun x -> x |> right) |> Option.map value, Is.EqualTo(Some 7))
 
 [<Test>]
 [<Ignore("Remove to run test")>]

data/tracks/objective-c/Dangerfile

@@ -18,7 +18,7 @@ warn("PR is classed as Work in Progress") if github.pr_title.include? "[WIP]"
 warn("Big PR") if git.lines_of_code > 500
 
 #ENSURE THERE IS A SUMMARY FOR A PR
-warn("Please provide a summary in the Pull Request description") if github.pr_body.length < 5
+warn("Please provide a summary in the Pull Request description. See more info <a href=\"http\://tinyletter.com/exercism/letters/exercism-pull-requests\">here.</a>") if github.pr_body.length < 5
 
 # LINT Comments in for each Line
 jsonpath = ".oclint.json"

data/tracks/ocaml/config.json

@@ -61,11 +61,6 @@
       "difficulty": 3,
       "topics": []
     },
-    {
-      "slug": "hexadecimal",
-      "difficulty": 3,
-      "topics": []
-    },
     {
       "slug": "anagram",
       "difficulty": 3,
@@ -76,6 +71,11 @@
       "difficulty": 3,
       "topics": []
     },
+    {
+      "slug": "all-your-base",
+      "difficulty": 4,
+      "topics": ["Mathematics"]
+    },
     {
       "slug": "bracket-push",
       "difficulty": 4,
@@ -158,6 +158,7 @@
     }
   ],
   "deprecated": [
+    "hexadecimal",
     "point-mutations"
   ],
   "ignored": [

data/tracks/ocaml/exercises/all-your-base/.merlin

@@ -0,0 +1,5 @@
+PKG findlib
+PKG core
+PKG ounit
+S *
+B *

data/tracks/ocaml/exercises/all-your-base/Makefile

@@ -0,0 +1,11 @@
+test: test.native
+	@./test.native
+
+test.native: *.ml *.mli
+	@corebuild -r -quiet -pkg oUnit test.native
+
+clean:
+	rm -rf _build
+	rm -f test.native
+
+.PHONY: clean

data/tracks/ocaml/exercises/all-your-base/all_your_base.mli

@@ -0,0 +1,5 @@
+open Core.Std
+
+type base = int
+
+val convert_bases : from: base -> digits: int list -> target: base -> (int list) option

data/tracks/ocaml/exercises/all-your-base/example.ml

@@ -0,0 +1,20 @@
+open Core.Std
+
+type base = int
+
+let rec to_digits (b: base) (acc: int list) = function
+  | 0 -> acc
+  | n -> to_digits b (n % b :: acc) (n / b)
+
+let convert_bases ~from ~digits ~target =
+  if from <= 1 || target <= 1 || List.is_empty digits
+  then None
+  else
+    let open Option.Monad_infix in
+    let digits = List.fold_left digits ~init:(Some 0) ~f:(fun acc d ->
+        if d < 0 || d >= from
+        then None
+        else acc >>= (fun acc -> Some (acc * from + d))
+      ) in
+    Option.map digits ~f:(to_digits target [])
+    |> Option.map ~f:(fun xs -> if List.is_empty xs then [0] else xs)

data/tracks/ocaml/exercises/all-your-base/test.ml

@@ -0,0 +1,58 @@
+open Core.Std
+open OUnit2
+open All_your_base
+
+let option_printer = function
+  | None -> "None"
+  | Some xs -> "Some [" ^ String.concat ~sep:";" (List.map xs ~f:Int.to_string) ^ "]"
+
+let ae exp got _test_ctxt =
+  assert_equal exp got ~printer:option_printer
+
+let tests = [
+  "single bit one to decimal" >::
+    ae (Some [1]) (convert_bases ~from:2 ~digits:[1] ~target:10);
+  "binary to single decimal" >::
+    ae (Some [5]) (convert_bases ~from:2 ~digits:[1; 0; 1] ~target:10);
+  "single decimal to binary" >::
+    ae (Some [1; 0; 1]) (convert_bases ~from:10 ~digits:[5] ~target:2);
+  "binary to multiple decimal" >::
+    ae (Some [4; 2]) (convert_bases ~from:2 ~digits:[1; 0; 1; 0; 1; 0] ~target:10);
+  "decimal to binary" >::
+    ae (Some [1; 0; 1; 0; 1; 0]) (convert_bases ~from:10 ~digits:[4; 2] ~target:2);
+  "trinary to hexadecimal" >::
+    ae (Some [2; 10]) (convert_bases ~from:3 ~digits:[1; 1; 2; 0] ~target:16);
+  "hexadecimal to trinary" >::
+    ae (Some [1; 1; 2; 0]) (convert_bases ~from:16 ~digits:[2; 10] ~target:3);
+  "15-bit integer" >::
+    ae (Some [6; 10; 45]) (convert_bases ~from:97 ~digits:[3; 46; 60] ~target:73);
+  "empty list" >::
+    ae None (convert_bases ~from:2 ~digits:[] ~target:10);
+  "single zero" >::
+    ae (Some [0]) (convert_bases ~from:10 ~digits:[0] ~target:2);
+  "multiple zeros" >::
+    ae (Some [0]) (convert_bases ~from:10 ~digits:[0; 0; 0] ~target:2);
+  "leading zeros" >::
+    ae (Some [4; 2]) (convert_bases ~from:7 ~digits:[0; 0; 6; 0] ~target:10);
+  "negative digit" >::
+    ae None (convert_bases ~from:2 ~digits:[1; -1; 1; 0; 1; 0] ~target:10);
+  "invalid positive digit" >::
+    ae None (convert_bases ~from:2 ~digits:[1; 2; 1; 0; 1; 0] ~target:10);
+  "first base is one" >::
+    ae None (convert_bases ~from:1 ~digits:[] ~target:10);
+  "second base is one" >::
+    ae None (convert_bases ~from:2 ~digits:[1; 0; 1; 0; 1; 0] ~target:1);
+  "first base is zero" >::
+    ae None (convert_bases ~from:0 ~digits:[] ~target:10);
+  "second base is zero" >::
+    ae None (convert_bases ~from:10 ~digits:[7] ~target:0);
+  "first base is negative" >::
+    ae None (convert_bases ~from:(-2) ~digits:[1] ~target:10);
+  "second base is negative" >::
+    ae None (convert_bases ~from:2 ~digits:[1] ~target:(-7));
+  "both bases are negative" >::
+    ae None (convert_bases ~from:(-2) ~digits:[1] ~target:(-7));
+]
+
+let () =
+  run_test_tt_main ("all-your-bases tests" >::: tests)

data/tracks/ocaml/tools/test-generator/src/special_cases.ml

@@ -8,7 +8,7 @@ let optional_int ~(none: int) = function
   | x -> parameter_to_string x
 
 let optional_int_list = function
-  | IntList xs -> "(Some " ^ String.concat ~sep:"; " (List.map ~f:Int.to_string xs) ^ ")"
+  | IntList xs -> "(Some [" ^ String.concat ~sep:"; " (List.map ~f:Int.to_string xs) ^ "])"
   | _ -> "None"
 
 let optional_int_or_string ~(none: int) = function
@@ -37,7 +37,14 @@ let edit_expected ~(stringify: parameter -> string) ~(slug: string) ~(value: par
 
 let edit_say (ps: (string * string) list) =
   let edit = function
-    | ("input", v) -> ("input", if Int.of_string v < 0 then "(" ^ v ^ "L)" else v ^ "L")
+    | ("input", v) -> ("input", if Int.of_string v >= 0 then "(" ^ v ^ "L)" else v ^ "L")
+    | x -> x in
+  List.map ps ~f:edit
+
+let edit_all_your_base (ps: (string * string) list) =
+  let edit = function
+    | ("output_base", v) -> ("output_base", if Int.of_string v >= 0 then v else "(" ^ v ^ ")")
+    | ("input_base", v) -> ("input_base", if Int.of_string v >= 0 then v else "(" ^ v ^ ")")
     | x -> x in
   List.map ps ~f:edit
 
@@ -46,4 +53,5 @@ let edit_parameters ~(slug: string) (parameters: (string * string) list) = match
     @@ optional_strings ~f:(fun _x -> true)
     @@ parameters
   | ("say", ps) -> edit_say ps
+  | ("all-your-base", ps) -> edit_all_your_base ps
   | (_, ps) -> ps

data/tracks/ocaml/tools/test-generator/templates/all-your-base/template.ml

@@ -1,15 +1,19 @@
 open Core.Std
 open OUnit2
-open All_your_bases
+open All_your_base
+
+let option_printer = function
+  | None -> "None"
+  | Some xs -> "Some [" ^ String.concat ~sep:";" (List.map xs ~f:Int.to_string) ^ "]"
 
 let ae exp got _test_ctxt =
-  assert_equal exp got ~printer:Bool.to_string
+  assert_equal exp got ~printer:option_printer
 
 let tests = [
-  (* TEST
-     "$description" >::
-      ae $expected (convert_bases $input_base $input_digits $output_base);
-     END TEST *)
+(* TEST
+  "$description" >::
+    ae $expected (convert_bases ~from:$input_base ~digits:$input_digits ~target:$output_base);
+END TEST *)
 ]
 
 let () =

data/tracks/perl6/config.json

@@ -80,6 +80,11 @@
       "difficulty": 1,
       "slug": "trinary",
       "topics": []
+    },
+    {
+      "difficulty": 1,
+      "slug": "space-age",
+      "topics": []
     }
   ]
 }

data/tracks/perl6/exercises/space-age/Example.p6

@@ -0,0 +1,16 @@
+our $earth_revolution = 31557600;
+
+our %planets = (
+    mercury => 0.2408467,
+    venus   => 0.61519726,
+    mars    => 1.8808158,
+    jupiter => 11.862615,
+    saturn  => 29.447498,
+    uranus  => 84.016846,
+    neptune => 164.79132,
+    earth   => 1,
+);
+
+sub age-on( $planet, $seconds ) is export {
+    ( $seconds / %planets{$planet.lc} / $earth_revolution ).round(0.01);
+}

data/tracks/perl6/exercises/space-age/cases.json

@@ -0,0 +1,46 @@
+{ "#": [],
+  "age on": {
+    "cases": [
+      {
+        "planet": "Earth",
+        "seconds": 1000000000,
+        "expected": 31.69
+      },
+      {
+        "planet": "Mercury",
+        "seconds": 2134835688,
+        "expected": 280.88
+      },
+      {
+        "planet": "Venus",
+        "seconds": 189839836,
+        "expected": 9.78
+      },
+      {
+        "planet": "Mars",
+        "seconds": 2329871239,
+        "expected": 39.25
+      },
+      {
+        "planet": "Jupiter",
+        "seconds": 901876382,
+        "expected": 2.41
+      },
+      {
+        "planet": "Saturn",
+        "seconds": 3000000000,
+        "expected": 3.23
+      },
+      {
+        "planet": "Uranus",
+        "seconds": 3210123456,
+        "expected": 1.21
+      },
+      {
+        "planet": "Neptune",
+        "seconds": 8210123456,
+        "expected": 1.58
+      }
+    ]
+  }
+}

data/tracks/perl6/exercises/space-age/space-age.t

@@ -0,0 +1,23 @@
+#!/usr/bin/env perl6
+
+use Test;
+use JSON::Tiny;
+
+use lib ( my $dir = IO::Path.new($?FILE).parent ).path;
+
+my $module_name = %*ENV<EXERCISM>.so ?? 'Example' !! 'SpaceAge';
+my @potential_module = <p6 pm6 pm>.map:  $module_name ~ '.' ~ *; 
+
+my $module = first { $dir.child($_).e }, |@potential_module
+    or die "No file '$module_name.p6' found\n";
+
+require $module <&age-on>;
+
+plan 8;
+
+my %testcase = from-json $dir.child('cases.json').slurp;
+
+for |%testcase{'age on'}{'cases'} -> %case {
+        is age-on( |%case<planet seconds>), %case{'expected'},
+             %case<planet seconds>.gist;
+}

data/tracks/purescript/.gitignore

@@ -3,6 +3,8 @@
 bin/configlet
 bin/configlet.exe
 
+**/npm-debug.log
+
 # Purescript artifact directories
 **/bower_components/
 **/node_modules/

data/tracks/purescript/.travis.yml

@@ -1,5 +1,13 @@
 language: bash
 
+sudo: false
+
+install:
+  - nvm install 6
+  - nvm use 6
+  - npm install -g purescript@0.10.2 pulp bower
+
 script:
   - bin/fetch-configlet
   - bin/configlet .
+  - bin/test.sh

data/tracks/purescript/bin/test.sh

@@ -0,0 +1,39 @@
+#!/usr/bin/env bash
+
+# TEST
+
+declare -i TEST_RESULT=0
+FAILED_EXERCISES=''
+
+for exercise_dir in exercises/**
+do
+  exercise_src="$exercise_dir/src"
+  exercise_examples_src="$exercise_dir/examples/src"
+
+  mv "$exercise_src" "$exercise_src.impl"
+  mv "$exercise_examples_src" "$exercise_src"
+
+  echo "-------------------------------------------------------"
+  echo "Testing $exercise_dir"
+
+  cd "$exercise_dir"
+  bower install
+  pulp test
+
+  # capture result from last command (pulp test)
+  if [ $? -ne 0 ]; then
+      TEST_RESULT=1
+      FAILED_EXERCISES+="$exercise_dir\n"
+  fi
+
+  # be kind, rewind
+  cd -
+  mv "$exercise_src" "$exercise_examples_src"
+  mv "$exercise_src.impl" "$exercise_src"
+done
+
+if [ $TEST_RESULT -ne 0 ]; then
+  echo "The following exercises failed"
+  printf $FAILED_EXERCISES
+  exit $TEST_RESULT
+fi

data/tracks/purescript/config.json

@@ -10,6 +10,28 @@
       "topics": [
         "maybe"
       ]
+    },
+    {
+      "slug": "leap",
+      "difficulty": 1,
+      "topics": [
+        "modulo"
+      ]
+    },
+    {
+      "slug": "raindrops",
+      "difficulty": 1,
+      "topics": [
+        "modulo"
+      ]
+    },
+    {
+      "slug": "pangram",
+      "difficulty": 1,
+      "topics": [
+        "strings",
+        "chars"
+      ]
     }
   ],
   "deprecated": [

data/tracks/purescript/docs/INSTALLATION.md

@@ -0,0 +1,12 @@
+The simplest way to install Purescript is via Node.js and NPM.
+
+If you don't already have Node.js installed on your computer, you can download
+it from the [Node.js website](https://nodejs.org/). Once you have Node.js up
+and running, enter this command into the terminal to install the Purescript
+compiler, the Pulp build tool and the Bower package manager.
+
+    npm install --global purescript pulp bower
+
+More information can be found in [the Purescript repository][ps-repo]
+
+[ps-repo]: (https://github.com/purescript/purescript/blob/master/INSTALL.md).

data/tracks/purescript/docs/TESTS.md

@@ -0,0 +1,6 @@
+The Purescript exercise test suites may be run from the exercise directory
+using the pulp tool.
+
+    cd exercism/project/directory/purescript/hello-world
+    bower install
+    pulp test

data/tracks/purescript/exercises/hello-world/src/HelloWorld.purs

@@ -1,6 +1 @@
 module HelloWorld where
-
-import Prelude
-import Data.Maybe (Maybe(Just, Nothing))
-
-helloWorld :: Maybe String -> String

data/tracks/purescript/exercises/leap/bower.json

@@ -0,0 +1,16 @@
+{
+  "name": "leap",
+  "ignore": [
+    "**/.*",
+    "node_modules",
+    "bower_components",
+    "output"
+  ],
+  "dependencies": {
+    "purescript-prelude": "^2.1.0"
+  },
+  "devDependencies": {
+    "purescript-psci-support": "^2.0.0",
+    "purescript-test-unit": "^10.0.1"
+  }
+}

data/tracks/purescript/exercises/leap/examples/src/Leap.purs

@@ -0,0 +1,9 @@
+module Leap where
+
+import Prelude
+
+isLeapYear :: Int -> Boolean
+isLeapYear year =
+  mod year 4 == 0 &&
+  mod year 100 /= 0 ||
+  mod year 400 == 0

data/tracks/purescript/exercises/leap/src/Leap.purs

@@ -0,0 +1 @@
+module Leap where

data/tracks/purescript/exercises/leap/test/Main.purs

@@ -0,0 +1,25 @@
+module Test.Main where
+
+import Prelude
+import Test.Unit (suite, test)
+import Test.Unit.Main (runTest)
+import Test.Unit.Assert as Assert
+import Leap as Leap
+
+
+main = runTest do
+  suite "Leap.isLeapYear" do
+    test "leap year" do
+      Assert.equal true $ Leap.isLeapYear 1996
+    test "non-leap year" do
+      Assert.equal false $ Leap.isLeapYear 1997
+    test "non-leap even year" do
+      Assert.equal false $ Leap.isLeapYear 1998
+    test "century" do
+      Assert.equal false $ Leap.isLeapYear 1900
+    test "second century" do
+      Assert.equal false $ Leap.isLeapYear 1800
+    test "fourth century" do
+      Assert.equal true $ Leap.isLeapYear 2400
+    test "y2k" do
+      Assert.equal true $ Leap.isLeapYear 2000

data/tracks/purescript/exercises/pangram/bower.json

@@ -0,0 +1,17 @@
+{
+  "name": "hello-world",
+  "ignore": [
+    "**/.*",
+    "node_modules",
+    "bower_components",
+    "output"
+  ],
+  "dependencies": {
+    "purescript-prelude": "^2.1.0",
+    "purescript-sets": "^2.0.0"
+  },
+  "devDependencies": {
+    "purescript-psci-support": "^2.0.0",
+    "purescript-test-unit": "^10.0.1"
+  }
+}

data/tracks/purescript/exercises/pangram/examples/src/Pangram.purs

@@ -0,0 +1,25 @@
+module Pangram
+  ( isPangram
+  ) where
+
+import Prelude
+import Data.Set as Set
+import Data.String as String
+
+isPangram :: String -> Boolean
+isPangram str =
+  let
+    letters =
+      charSet $ String.toLower str
+  in
+    Set.subset alphabet letters
+
+
+alphabet :: Set.Set Char
+alphabet =
+  charSet "abcdefghijklmnopqrstuvwxyz"
+
+
+charSet :: String -> Set.Set Char
+charSet =
+  String.toCharArray >>> Set.fromFoldable

data/tracks/purescript/exercises/pangram/src/Pangram.purs

@@ -0,0 +1,3 @@
+module Pangram
+  ( isPangram
+  ) where

data/tracks/purescript/exercises/pangram/test/Main.purs

@@ -0,0 +1,46 @@
+module Test.Main where
+
+import Prelude
+import Test.Unit (suite, test)
+import Test.Unit.Main (runTest)
+import Test.Unit.Assert as Assert
+import Pangram (isPangram)
+
+
+main = runTest do
+  suite "Pangram.isPangram" do
+    test "sentence empty" do
+      Assert.equal false $
+        isPangram ""
+
+    test "pangram with only lower case" do
+      Assert.equal true $
+        isPangram "the quick brown fox jumps over the lazy dog"
+
+    test "missing character 'x'" do
+      Assert.equal false $
+        isPangram "a quick movement of the enemy will jeopardize five gunboats"
+
+    test "another missing character 'x'" do
+      Assert.equal false $
+        isPangram "the quick brown fish jumps over the lazy dog"
+
+    test "pangram with underscores" do
+      Assert.equal true $
+        isPangram "the_quick_brown_fox_jumps_over_the_lazy_dog"
+
+    test "pangram with numbers" do
+      Assert.equal true $
+        isPangram "the 1 quick brown fox jumps over the 2 lazy dogs"
+
+    test "missing letters replaced by numbers" do
+      Assert.equal false $
+        isPangram "7h3 qu1ck brown fox jumps ov3r 7h3 lazy dog"
+
+    test "pangram with mixed case and punctuation" do
+      Assert.equal true $
+        isPangram "\"Five quacking Zephyrs jolt my wax bed.\""
+
+    test "pangram with non ascii characters" do
+      Assert.equal true $
+        isPangram "Victor jagt zwölf Boxkämpfer quer über den großen Sylter Deich."

data/tracks/purescript/exercises/raindrops/bower.json

@@ -0,0 +1,16 @@
+{
+  "name": "hello-world",
+  "ignore": [
+    "**/.*",
+    "node_modules",
+    "bower_components",
+    "output"
+  ],
+  "dependencies": {
+    "purescript-prelude": "^2.1.0"
+  },
+  "devDependencies": {
+    "purescript-psci-support": "^2.0.0",
+    "purescript-test-unit": "^10.0.1"
+  }
+}

data/tracks/purescript/exercises/raindrops/examples/src/Raindrops.purs

@@ -0,0 +1,23 @@
+module Raindrops
+  ( raindrops
+  ) where
+
+import Prelude
+
+raindrops :: Int -> String
+raindrops n =
+  let
+    fn = toNoise n
+    noises =
+      fn 3 "Pling" <>
+      fn 5 "Plang" <>
+      fn 7 "Plong"
+  in
+    case noises of
+      "" -> show n
+      other -> other
+
+toNoise :: Int -> Int -> String -> String
+toNoise n factor noise
+  | mod n factor == 0 = noise
+  | otherwise = ""

data/tracks/purescript/exercises/raindrops/src/Raindrops.purs

@@ -0,0 +1,3 @@
+module Raindrops
+  ( raindrops
+  ) where

data/tracks/purescript/exercises/raindrops/test/Main.purs

@@ -0,0 +1,41 @@
+module Test.Main where
+
+import Prelude
+import Test.Unit (suite, test)
+import Test.Unit.Main (runTest)
+import Test.Unit.Assert as Assert
+import Raindrops (raindrops)
+
+
+main = runTest do
+  suite "Raindrops.raindrops" do
+    test "1" do
+      Assert.equal "1" $ raindrops 1
+    test "3" do
+      Assert.equal "Pling" $ raindrops 3
+    test "5" do
+      Assert.equal "Plang" $ raindrops 5
+    test "7" do
+      Assert.equal "Plong" $ raindrops 7
+    test "6" do
+      Assert.equal "Pling" $ raindrops 6
+    test "9" do
+      Assert.equal "Pling" $ raindrops 9
+    test "10" do
+      Assert.equal "Plang" $ raindrops 10
+    test "14" do
+      Assert.equal "Plong" $ raindrops 14
+    test "15" do
+      Assert.equal "PlingPlang" $ raindrops 15
+    test "21" do
+      Assert.equal "PlingPlong" $ raindrops 21
+    test "25" do
+      Assert.equal "Plang" $ raindrops 25
+    test "35" do
+      Assert.equal "PlangPlong" $ raindrops 35
+    test "49" do
+      Assert.equal "Plong" $ raindrops 49
+    test "52" do
+      Assert.equal "52" $ raindrops 52
+    test "105" do
+      Assert.equal "PlingPlangPlong" $ raindrops 105

data/tracks/swift/Dangerfile

@@ -18,7 +18,7 @@ warn("PR is classed as Work in Progress") if github.pr_title.include? "[WIP]"
 warn("Big PR") if git.lines_of_code > 500
 
 #ENSURE THERE IS A SUMMARY FOR A PR
-warn("Please provide a summary in the Pull Request description") if github.pr_body.length < 5
+warn("Please provide a summary in the Pull Request description. See more info <a href=\"http\://tinyletter.com/exercism/letters/exercism-pull-requests\">here.</a>") if github.pr_body.length < 5
 
 # LINT Comments in for each Line
 jsonpath = "lintreport.json"

data/tracks/swift/config.json

@@ -120,6 +120,14 @@
             "Transforming"
         ]
     },
+    {
+        "difficulty": 2,
+        "slug": "isogram",
+        "topics": [
+            "Strings",
+            "Filtering"
+        ]
+    },
     {
         "difficulty": 3,
         "slug": "clock",

data/tracks/swift/exercises/isogram/IsogramExample.swift

@@ -0,0 +1,25 @@
+import Foundation
+
+struct Isogram {
+
+    static func isIsogram(_ string: String) -> Bool {
+        let lowercasedString = string.lowercased()
+        let lowercaseLetterSet = CharacterSet.lowercaseLetters
+
+        var letters: Set<UnicodeScalar> = []
+
+        for character in lowercasedString.unicodeScalars {
+            guard lowercaseLetterSet.contains(character) else {
+                continue
+            }
+
+            guard !letters.contains(character) else {
+                return false
+            }
+
+            letters.insert(character)
+        }
+
+        return true
+    }
+}

data/tracks/swift/exercises/isogram/IsogramTest.swift

@@ -0,0 +1,38 @@
+#if swift(>=3.0)
+    import XCTest
+#endif
+
+class IsogramTest: XCTestCase {
+
+    func testEmptyString() {
+        XCTAssertTrue(Isogram.isIsogram(""))
+    }
+
+    func testIsogramWithOnlyLowerCaseCharacters() {
+        XCTAssertTrue(Isogram.isIsogram("isogram"))
+    }
+
+    func testWordWithOneDuplicatedCharacter() {
+        XCTAssertFalse(Isogram.isIsogram("eleven"))
+    }
+
+    func testLongestReportedEnglishIsogram() {
+        XCTAssertTrue(Isogram.isIsogram("subdermatoglyphic"))
+    }
+
+    func testWordWithDuplicatedCharacterInMixedCase() {
+        XCTAssertFalse(Isogram.isIsogram("Alphabet"))
+    }
+
+    func testHypotheticalIsogrammicWordWithHyphen() {
+        XCTAssertTrue(Isogram.isIsogram("thumbscrew-japingly"))
+    }
+
+    func testIsogramWithDuplicatedNonLetterCharacter() {
+        XCTAssertTrue(Isogram.isIsogram("Hjelmqvist-Gryb-Zock-Pfund-Wax"))
+    }
+
+    func testMadeUpNameThatIsAnIsogram() {
+        XCTAssertTrue(Isogram.isIsogram("Emily Jung Schwartzkopf"))
+    }
+}

data/tracks/swift/exercises/space-age/SpaceAgeExample.swift

@@ -11,7 +11,7 @@ struct SpaceAge {
     var onSaturn: Float { return round((seconds / 929_596_608.0) * 100) / 100 }
     var onUranus: Float { return round((seconds / 2_661_041_808.0) * 100) / 100 }
     var onNeptune: Float { return round((seconds / 5_200_418_592.0) * 100) / 100 }
-    
+
     init(_ input: Float) {
         self.seconds = input
     }

data/tracks/swift/xcodeProject/xSwift.xcodeproj/project.pbxproj

@@ -127,6 +127,8 @@
 		E90D62081C653ADC00C266D3 /* PalindromeProductsTest.swift in Sources */ = {isa = PBXBuildFile; fileRef = E90D62071C653ADC00C266D3 /* PalindromeProductsTest.swift */; };
 		E90DE39C1D3E812300F3B881 /* AllYourBaseExample.swift in Sources */ = {isa = PBXBuildFile; fileRef = E90DE39B1D3E812300F3B881 /* AllYourBaseExample.swift */; };
 		E90DE39E1D3E818000F3B881 /* AllYourBaseTest.swift in Sources */ = {isa = PBXBuildFile; fileRef = E90DE39D1D3E818000F3B881 /* AllYourBaseTest.swift */; };
+		E92EA8F91DFB5CF200C5CFF7 /* IsogramExample.swift in Sources */ = {isa = PBXBuildFile; fileRef = E92EA8F81DFB5CF200C5CFF7 /* IsogramExample.swift */; };
+		E92EA8FB1DFB5D0200C5CFF7 /* IsogramTest.swift in Sources */ = {isa = PBXBuildFile; fileRef = E92EA8FA1DFB5D0200C5CFF7 /* IsogramTest.swift */; };
 		E9443F251DF5C02700A468B7 /* TransposeExample.swift in Sources */ = {isa = PBXBuildFile; fileRef = E9443F241DF5C02700A468B7 /* TransposeExample.swift */; };
 		E9443F271DF5C04000A468B7 /* TransposeTest.swift in Sources */ = {isa = PBXBuildFile; fileRef = E9443F261DF5C04000A468B7 /* TransposeTest.swift */; };
 		E94BDECF1C510E68009318BB /* BinarySearchExample.swift in Sources */ = {isa = PBXBuildFile; fileRef = E94BDECD1C510E68009318BB /* BinarySearchExample.swift */; };
@@ -287,6 +289,8 @@
 		E90D62071C653ADC00C266D3 /* PalindromeProductsTest.swift */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.swift; lineEnding = 0; name = PalindromeProductsTest.swift; path = "palindrome-products/PalindromeProductsTest.swift"; sourceTree = "<group>"; xcLanguageSpecificationIdentifier = xcode.lang.swift; };
 		E90DE39B1D3E812300F3B881 /* AllYourBaseExample.swift */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.swift; name = AllYourBaseExample.swift; path = "../all-your-base/AllYourBaseExample.swift"; sourceTree = "<group>"; };
 		E90DE39D1D3E818000F3B881 /* AllYourBaseTest.swift */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.swift; name = AllYourBaseTest.swift; path = "../all-your-base/AllYourBaseTest.swift"; sourceTree = "<group>"; };
+		E92EA8F81DFB5CF200C5CFF7 /* IsogramExample.swift */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.swift; name = IsogramExample.swift; path = isogram/IsogramExample.swift; sourceTree = "<group>"; };
+		E92EA8FA1DFB5D0200C5CFF7 /* IsogramTest.swift */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.swift; name = IsogramTest.swift; path = isogram/IsogramTest.swift; sourceTree = "<group>"; };
 		E9443F241DF5C02700A468B7 /* TransposeExample.swift */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.swift; name = TransposeExample.swift; path = ../transpose/TransposeExample.swift; sourceTree = "<group>"; };
 		E9443F261DF5C04000A468B7 /* TransposeTest.swift */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.swift; name = TransposeTest.swift; path = ../transpose/TransposeTest.swift; sourceTree = "<group>"; };
 		E94BDECD1C510E68009318BB /* BinarySearchExample.swift */ = {isa = PBXFileReference; fileEncoding = 4; lastKnownFileType = sourcecode.swift; name = BinarySearchExample.swift; path = "binary-search/BinarySearchExample.swift"; sourceTree = "<group>"; };
@@ -362,6 +366,7 @@
 				1E9A63191C506EFC00E28AE1 /* hello-world */,
 				E9AFA14E1C594423006AD72D /* hexadecimal */,
 				E9AFA1751C614D6A006AD72D /* house */,
+				E92EA8F61DFB5CCF00C5CFF7 /* isogram */,
 				1E9A63221C506EFC00E28AE1 /* kindergarten-garden */,
 				E9AFA15D1C5BFB55006AD72D /* largest-series-product */,
 				1E9A63251C506EFC00E28AE1 /* leap */,
@@ -988,6 +993,15 @@
 			path = acronym;
 			sourceTree = "<group>";
 		};
+		E92EA8F61DFB5CCF00C5CFF7 /* isogram */ = {
+			isa = PBXGroup;
+			children = (
+				E92EA8F81DFB5CF200C5CFF7 /* IsogramExample.swift */,
+				E92EA8FA1DFB5D0200C5CFF7 /* IsogramTest.swift */,
+			);
+			name = isogram;
+			sourceTree = "<group>";
+		};
 		E9443F201DF5BFBF00A468B7 /* transpose */ = {
 			isa = PBXGroup;
 			children = (
@@ -1222,6 +1236,7 @@
 				1E9A63BC1C506EFD00E28AE1 /* PerfectNumbersExample.swift in Sources */,
 				E99909621D792446002A2B6E /* RunLengthEncodingExample.swift in Sources */,
 				1E9A63BB1C506EFD00E28AE1 /* OctalTest.swift in Sources */,
+				E92EA8FB1DFB5D0200C5CFF7 /* IsogramTest.swift in Sources */,
 				1E9A63ED1C506EFD00E28AE1 /* WordCountTest.swift in Sources */,
 				1E9A63951C506EFD00E28AE1 /* BobTest.swift in Sources */,
 				1E9A63BE1C506EFD00E28AE1 /* PhoneNumberExample.swift in Sources */,
@@ -1248,6 +1263,7 @@
 				1E9A63B81C506EFD00E28AE1 /* NucleotideCountExample.swift in Sources */,
 				1E9A63881C506EFC00E28AE1 /* AccumulateExample.swift in Sources */,
 				E9AFA1491C593AF5006AD72D /* BinarySearchTreeTest.swift in Sources */,
+				E92EA8F91DFB5CF200C5CFF7 /* IsogramExample.swift in Sources */,
 				E908CD541C6D7AD1005D081E /* PascalsTriangleExample.swift in Sources */,
 				1E9A63D61C506EFD00E28AE1 /* SeriesExample.swift in Sources */,
 				1E9A638B1C506EFD00E28AE1 /* AcronymTest.swift in Sources */,

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: trackler
 version: !ruby/object:Gem::Version
-  version: 2.0.3.6
+  version: 2.0.3.7
 platform: ruby
 authors:
 - Katrina Owen
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2016-12-09 00:00:00.000000000 Z
+date: 2016-12-10 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: rubyzip
@@ -4788,6 +4788,11 @@ files:
 - tracks/ocaml/docs/LEARNING.md
 - tracks/ocaml/docs/RESOURCES.md
 - tracks/ocaml/docs/TESTS.md
+- tracks/ocaml/exercises/all-your-base/.merlin
+- tracks/ocaml/exercises/all-your-base/Makefile
+- tracks/ocaml/exercises/all-your-base/all_your_base.mli
+- tracks/ocaml/exercises/all-your-base/example.ml
+- tracks/ocaml/exercises/all-your-base/test.ml
 - tracks/ocaml/exercises/anagram/.merlin
 - tracks/ocaml/exercises/anagram/Makefile
 - tracks/ocaml/exercises/anagram/anagram.mli
@@ -5195,6 +5200,9 @@ files:
 - tracks/perl6/exercises/robot-name/robot.t
 - tracks/perl6/exercises/scrabble-score/Example.pm
 - tracks/perl6/exercises/scrabble-score/scrabble_score.t
+- tracks/perl6/exercises/space-age/Example.p6
+- tracks/perl6/exercises/space-age/cases.json
+- tracks/perl6/exercises/space-age/space-age.t
 - tracks/perl6/exercises/trinary/Example.p6
 - tracks/perl6/exercises/trinary/trinary.t
 - tracks/perl6/exercises/word-count/Example.pm
@@ -5427,6 +5435,7 @@ files:
 - tracks/purescript/README.md
 - tracks/purescript/SETUP.md
 - tracks/purescript/bin/fetch-configlet
+- tracks/purescript/bin/test.sh
 - tracks/purescript/config.json
 - tracks/purescript/docs/ABOUT.md
 - tracks/purescript/docs/INSTALLATION.md
@@ -5437,6 +5446,18 @@ files:
 - tracks/purescript/exercises/hello-world/examples/src/HelloWorld.purs
 - tracks/purescript/exercises/hello-world/src/HelloWorld.purs
 - tracks/purescript/exercises/hello-world/test/Main.purs
+- tracks/purescript/exercises/leap/bower.json
+- tracks/purescript/exercises/leap/examples/src/Leap.purs
+- tracks/purescript/exercises/leap/src/Leap.purs
+- tracks/purescript/exercises/leap/test/Main.purs
+- tracks/purescript/exercises/pangram/bower.json
+- tracks/purescript/exercises/pangram/examples/src/Pangram.purs
+- tracks/purescript/exercises/pangram/src/Pangram.purs
+- tracks/purescript/exercises/pangram/test/Main.purs
+- tracks/purescript/exercises/raindrops/bower.json
+- tracks/purescript/exercises/raindrops/examples/src/Raindrops.purs
+- tracks/purescript/exercises/raindrops/src/Raindrops.purs
+- tracks/purescript/exercises/raindrops/test/Main.purs
 - tracks/purescript/img/icon.png
 - tracks/python/.git
 - tracks/python/.gitignore
@@ -6766,6 +6787,8 @@ files:
 - tracks/swift/exercises/hexadecimal/HexadecimalTest.swift
 - tracks/swift/exercises/house/HouseExample.swift
 - tracks/swift/exercises/house/HouseTest.swift
+- tracks/swift/exercises/isogram/IsogramExample.swift
+- tracks/swift/exercises/isogram/IsogramTest.swift
 - tracks/swift/exercises/kindergarten-garden/KindergartenGardenExample.swift
 - tracks/swift/exercises/kindergarten-garden/KindergartenGardenTest.swift
 - tracks/swift/exercises/largest-series-product/LargestSeriesProductExample.swift