trackler 2.0.7.0 → 2.0.8.1

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

@@ -33,10 +33,16 @@ let optional_strings ~(f: string -> bool) (parameters: (string * json) list): (s
     else (k, json_to_string v) in
   List.map ~f:replace parameters
 
+let option_of_null (value: json): string = match value with
+| `Null -> "None"
+| `String s -> "(Some \"" ^ s ^ "\")"
+| _ -> failwith "cannot handle this type"
+
 let edit_expected ~(stringify: json -> string) ~(slug: string) ~(value: json) = match slug with
 | "hamming" -> optional_int ~none:(-1) value
 | "all-your-base" -> optional_int_list value
 | "say" -> optional_int_or_string ~none:(-1) value
+| "phone-number" -> option_of_null value
 | _ -> stringify value
 
 let edit_say (ps: (string * json) list) =

data/tracks/ocaml/tools/test-generator/templates/phone-number/template.ml

@@ -0,0 +1,21 @@
+open Core.Std
+open OUnit2
+open Phone_number
+
+let option_to_string f = function
+  | None   -> "None"
+  | Some x -> "Some " ^ f x
+
+let ae exp got _test_ctxt =
+  assert_equal ~printer:(option_to_string String.to_string) exp got
+
+let (* SUITE *)$(suite_name)_tests = [
+(* TEST
+   "$description" >::
+      ae $expected (number $phrase);
+   END TEST *)
+]
+(* END SUITE *)
+
+let () =
+  run_test_tt_main ("phone-number tests" >::: number_tests)

data/tracks/pony/config.json

@@ -13,8 +13,8 @@
       "slug": "hello-world",
       "difficulty": 1,
       "topics": [
-        "strings",
-        "default arguments"
+        "primitives",
+        "methods"
       ]
     },
     {

data/tracks/pony/exercises/hello-world/example.pony

@@ -1,3 +1,2 @@
 primitive HelloWorld
-  fun hello(name: String = "World"): String =>
-    "Hello, " + name + "!"
+  fun hello(): String => "Hello, World!"

data/tracks/pony/exercises/hello-world/test.pony

@@ -12,4 +12,3 @@ class iso _TestHelloWorld is UnitTest
 
   fun apply(h: TestHelper) =>
     h.assert_eq[String]("Hello, World!", HelloWorld.hello())
-    h.assert_eq[String]("Hello, Exercism!", HelloWorld.hello("Exercism"))

data/tracks/rust/config.json

@@ -8,7 +8,6 @@
       "slug": "hello-world",
       "difficulty": 1,
       "topics": [
-        "Some/None",
         "println!"
       ]
     },

data/tracks/rust/exercises/hello-world/example.rs

@@ -1,6 +1,3 @@
-pub fn hello(name: Option<&str>) -> String {
-    match name {
-        Some(n) => format!("Hello, {}!", n),
-        None => "Hello, World!".to_string(),
-    }
+pub fn hello() -> &'static str {
+    "Hello, World!"
 }

data/tracks/rust/exercises/hello-world/tests/hello-world.rs

@@ -1,18 +1,6 @@
 extern crate hello_world;
 
 #[test]
-fn test_no_name() {
-    assert_eq!("Hello, World!", hello_world::hello(None));
-}
-
-#[test]
-#[ignore]
-fn test_sample_name() {
-    assert_eq!("Hello, Alice!", hello_world::hello(Some("Alice")));
-}
-
-#[test]
-#[ignore]
-fn test_other_same_name() {
-    assert_eq!("Hello, Bob!", hello_world::hello(Some("Bob")));
+fn test_hello_world() {
+    assert_eq!("Hello, World!", hello_world::hello());
 }

data/tracks/scala/config.json

@@ -593,6 +593,15 @@
             "Searching"
          ]
       },
+      {
+         "slug":"rail-fence-cipher",
+         "difficulty":1,
+         "topics":[
+            "Strings",
+            "Algorithms",
+            "Transforming"
+         ]
+      },
       {
          "slug":"dominoes",
          "difficulty":1,
@@ -653,7 +662,7 @@
          "slug":"lens-person",
          "difficulty":1,
          "topics":[
-
+
          ]
       },
       {
@@ -680,6 +689,6 @@
       "testgen"
    ],
    "foregone":[
-
+
    ]
 }

data/tracks/scala/docs/LEARNING.md

@@ -1,3 +1,11 @@
-The creator of the languague, Martin Odersky, teaches an online class that introduces the basics of Scala and requires previous knowledge of another programming language:
+## Books
 
-[Functional Programming Principles in Scala](https://www.coursera.org/learn/progfun1)
+* [Programming Scala - Dean Wampler, Ph.D.](http://shop.oreilly.com/product/0636920033073.do)
+* [Programming in Scala - Oderksy, Spoon, Venners](http://www.artima.com/shop/programming_in_scala_3ed)
+* [Functional Programming in Scala - Chiusano, Bjarnason](https://www.manning.com/books/functional-programming-in-scala)
+* [Scala for the Impatient - Cay S. Horstmann](http://horstmann.com/scala/)
+
+## Online Courses
+
+* [Functional Programming Principles in Scala](https://www.coursera.org/learn/progfun1) - In this course you will discover the elements of the functional programming style and learn how to apply them usefully in your daily programming tasks. You will also develop a solid foundation for reasoning about functional programs, by touching upon proofs of invariants and the tracing of execution symbolically.
+* [Functional Program Design in Scala](https://www.coursera.org/learn/progfun2) -  In this course you will learn how to apply the functional programming style in the design of larger applications.

data/tracks/scala/docs/RESOURCES.md

@@ -3,7 +3,6 @@
 Exercism provides exercises and feedback but can be difficult to jump into for those learning Scala for the first time. These resources can help you get started:
 
 * [Scala - Getting Started](http://www.scala-lang.org/documentation/getting-started.html)
-* [Programming Scala](http://www.oreilly.com/ofps/)
 * [StackOverflow](http://stackoverflow.com/)
 * [Scala Exercises](https://www.scala-exercises.org/std_lib)
 * [The Neophyte's Guide to Scala](http://danielwestheide.com/scala/neophytes.html)

data/tracks/scala/docs/TESTS.md

@@ -1,20 +1,24 @@
 ## Running Tests
 
-Execute the tests with:
+With `sbt` installed, the tests can be executed from the command line with:
 
 ```bash
 $ sbt test
 ```
 
-You can also use sbt to re-run your tests whenever the source files change:
+You can also use `sbt` to re-run your tests whenever the source files change:
 
 ```bash
 $ sbt
 >~ test
 ```
 
-You should place your code in:
+Note that all tests have been disabled except the first one for you to work on. 
+To continue, just remove the `pending` keyword from the beginning of each test case.
+
+Tests can also be run within the following IDEs
+
+* [IntelliJ IDEA with Scala Plugin](https://www.jetbrains.com/idea/)
+* [ScalaIDE](http://scala-ide.org/index.html)
+* [NetBeans with Scala Plugin](https://netbeans.org/)
 
-```bash
-src/main/scala/bob.scala
-```

data/tracks/scala/exercises/rail-fence-cipher/build.sbt

@@ -0,0 +1,3 @@
+scalaVersion := "2.12.1"
+
+libraryDependencies += "org.scalatest" %% "scalatest" % "3.0.1" % "test"

data/tracks/scala/exercises/rail-fence-cipher/example.scala

@@ -0,0 +1,46 @@
+case class RailFenceCipher(rails: Int) {
+  private val size = rails * 2 - 2
+
+  def encode(clearText: String): String =
+    clearText
+      .zipWithIndex
+      .map { case (c, i) => (track(i), c) }
+      .groupBy {_._1}
+      .toSeq
+      .sortBy { case (t, _) => t }
+      .flatMap { case (t, v) => v.map { case (_, c) => c }}
+      .mkString
+
+  def decode (encodedText: String): String =
+    Range.apply(0, encodedText.length)
+      .groupBy(i => track(i))
+      .toSeq
+      .sortBy{ case (i, _) => i}
+      .flatMap { case (_, v) => v }
+      .zip(encodedText)
+      .sortBy { case (i, _) => i }
+      .map { case (_, c) => c }
+      .mkString
+
+  private def track(i: Int): Int = {
+    if (isCorrectRail(i))
+      0
+    else if (isCorrectRail(i - rails + 1)) {
+      rails - 1
+    } else
+      Range.inclusive(1, rails - 1)
+        .filter{j => isCorrectRail(i - j) || isCorrectRail(i - size + j)}
+        .head
+  }
+
+  private def isCorrectRail(i: Int) = i % size == 0
+}
+
+object RailFenceCipher {
+
+  def encode(clearText: String, rails: Int): String =
+    RailFenceCipher(rails).encode(clearText)
+
+  def decode(encodedText: String, rails: Int): String =
+    RailFenceCipher(rails).decode(encodedText)
+}

data/tracks/scala/exercises/rail-fence-cipher/src/test/scala/RailFenceCipherTest.scala

@@ -0,0 +1,42 @@
+import org.scalatest.{FunSuite, Matchers}
+
+class RailFenceCipherTest extends FunSuite with Matchers {
+
+  // Encode test cases
+  test("test to encode with two rails") {
+    val encoded = RailFenceCipher.encode("XOXOXOXOXOXOXOXOXO", 2)
+    encoded should be ("XXXXXXXXXOOOOOOOOO")
+  }
+
+  test("test to encode with three rails") {
+    pending
+    val encoded = RailFenceCipher.encode("WEAREDISCOVEREDFLEEATONCE", 3)
+    encoded should be ("WECRLTEERDSOEEFEAOCAIVDEN")
+  }
+
+  test("test to encode with ending in the middle") {
+    pending
+    val encoded = RailFenceCipher.encode("EXERCISES", 4)
+    encoded should be ("ESXIEECSR")
+  }
+
+  // Decode test cases
+  test("test to decode with three rails") {
+    pending
+    val decoded = RailFenceCipher.decode("TEITELHDVLSNHDTISEIIEA", 3)
+    decoded should be ("THEDEVILISINTHEDETAILS")
+  }
+
+  test("test to decode with five rails") {
+    pending
+    val decoded = RailFenceCipher.decode("EIEXMSMESAORIWSCE", 5)
+    decoded should be ("EXERCISMISAWESOME")
+  }
+
+  test("test to decode with six rails") {
+    pending
+    val decoded = RailFenceCipher.decode("133714114238148966225439541018335470986172518171757571896261", 6)
+    decoded should be ("112358132134558914423337761098715972584418167651094617711286")
+  }
+
+}

data/tracks/scala/testgen/src/main/scala/RailFenceCipherTestGenerator.scala

@@ -0,0 +1,59 @@
+import play.api.libs.json.Json
+
+import scala.io.Source
+
+// Generates test suite from json test definition for the RailFenceCipher exercise.
+class RailFenceCipherTestGenerator {
+  implicit val railFenceTestCaseReader = Json.reads[RailFenceTestCase]
+
+  private val filename = "rail-fence.json"
+  private val fileContents = Source.fromFile(filename).getLines.mkString
+  private val json = Json.parse(fileContents)
+
+  def write {
+    val testBuilder = new TestBuilder("RailFenceCipherTest")
+    addEncodeTests(testBuilder)
+    addDecodeTests(testBuilder)
+    testBuilder.toFile
+  }
+
+  private def addEncodeTests(testBuilder: TestBuilder): Unit = {
+    val description = "Encode test cases"
+    val encodeTestCases = (json \ "encode" \ "cases").get.as[List[RailFenceTestCase]]
+
+    implicit def testCaseToGen(tc: RailFenceTestCase): TestCaseGen = {
+      val callSUT = s"""RailFenceCipher.encode("${tc.msg}", ${tc.rails})"""
+      val expected = tc.expected
+      val result = s"val encoded = $callSUT"
+      val checkResult = s"""encoded should be ("$expected")"""
+
+      TestCaseGen(tc.description, callSUT, expected, result, checkResult)
+    }
+
+    testBuilder.addTestCases(encodeTestCases, Some(description))
+  }
+
+  private def addDecodeTests(testBuilder: TestBuilder): Unit = {
+    val description = "Decode test cases"
+    val encodeTestCases = (json \ "decode" \ "cases").get.as[List[RailFenceTestCase]]
+
+    implicit def testCaseToGen(tc: RailFenceTestCase): TestCaseGen = {
+      val callSUT = s"""RailFenceCipher.decode("${tc.msg}", ${tc.rails})"""
+      val expected = tc.expected
+      val result = s"val decoded = $callSUT"
+      val checkResult = s"""decoded should be ("$expected")"""
+
+      TestCaseGen(tc.description, callSUT, expected, result, checkResult)
+    }
+
+    testBuilder.addTestCases(encodeTestCases, Some(description))
+  }
+}
+
+case class RailFenceTestCase(description: String, msg: String, rails: Int, expected: String)
+
+object RailFenceCipherTestGenerator {
+  def main(args: Array[String]): Unit = {
+    new RailFenceCipherTestGenerator().write
+  }
+}

data/tracks/typescript/.gitignore

@@ -1,4 +1,11 @@
 *.swp
 .DS_Store
+npm-debug.log
+tmp
 bin/configlet
 bin/configlet.exe
+node_modules
+.idea
+.build
+babel-output
+lintreport.json

data/tracks/typescript/.travis.yml

@@ -1,5 +1,22 @@
-language: bash
+language: node_js
+node_js:
+  - "node"
+
+cache: yarn
+
+sudo: true
+
+before_install:
+  - gem install bundler
+  - gem install danger
+
+before_script:
+  - npm install -g yarn
 
 script:
   - bin/fetch-configlet
   - bin/configlet .
+  - make test
+
+after_success:
+  - danger

data/tracks/typescript/Dangerfile

@@ -0,0 +1,43 @@
+# Ensure a clean commits history
+if git.commits.any? { |c| c.message =~ /^Merge branch '#{github.branch_for_base}'/ }
+  fail('Please rebase to get rid of the merge commits in this PR')
+end
+can_merge = github.pr_json["mergeable"]
+is_merged = github.pr_json["merged"]
+
+if is_merged
+  warn("This PR was merged before CI was done.", sticky: false)
+else
+  warn("This PR cannot be merged yet.", sticky: false) unless can_merge
+end
+
+# Make it more obvious that a PR is a work in progress and shouldn't be merged yet
+warn("PR is classed as Work in Progress") if github.pr_title.include? "[WIP]"
+
+# Warn when there is a big PR
+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. 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"
+contents = File.read jsonpath
+require "json"
+if contents.to_s == ''
+	contents = "[]"
+end
+json = JSON.parse contents
+json.each do |object|
+   shortFile =  object["name"]
+   shortFile = shortFile.to_s || ''
+   msg = object["failure"].to_s || ''
+   line = object["endPosition"]["line"] || 1
+   #only warn for files that were edited in this PR.
+   if git.modified_files.include? shortFile
+   	shortFile.prepend("/")  # get away from doing inline comments since they are buggy as of Sep-2016
+   	warn(msg, file: shortFile, line: line)
+   else
+   	message(msg, file: shortFile, line: line)
+   end
+end

data/tracks/typescript/Makefile

@@ -0,0 +1,57 @@
+# assignments
+ASSIGNMENT ?= ""
+IGNOREDIRS := "^(\.git|bin|node_modules|docs|.idea|build)$$"
+ASSIGNMENTS = $(shell find ./exercises -maxdepth 1 -mindepth 1 -type d | cut -d'/' -f3 | sort | grep -Ev $(IGNOREDIRS))
+
+#intermediate directories
+TMPDIR ?= "/tmp"
+INTDIR := $(shell mktemp -d "$(TMPDIR)/$(ASSIGNMENT).XXXXXXXXXX")
+
+# language specific config (tweakable per language)
+FILEEXT := "ts"
+EXAMPLE := "$(ASSIGNMENT).example.$(FILEEXT)"
+TSTFILE := "$(ASSIGNMENT).test.$(FILEEXT)"
+
+all: test
+
+test-assignment:
+	@printf "\e[4mRunning tests for $(ASSIGNMENT) assignment\e[0m\n"
+	@cp -a common/. $(INTDIR)
+	@sed 's/xit/it/g; s/xdescribe/describe/g' exercises/$(ASSIGNMENT)/$(TSTFILE) > $(INTDIR)/$(TSTFILE)
+	@cp exercises/$(ASSIGNMENT)/$(EXAMPLE) $(INTDIR)/$(ASSIGNMENT).$(FILEEXT)
+	@cd $(INTDIR) && yarn install && yarn lint && yarn test
+
+test:
+	@npm install tslint typescript -g
+	@tslint './**/*.ts?(x)' -c "./common/tslint.json" --format "json" >> lintreport.json ; exit 0
+	@for assignment in $(ASSIGNMENTS); do ASSIGNMENT=$$assignment $(MAKE) test-assignment || exit 1; done
+	
+
+all: moveAllIntoCommonDir
+all: moveCommonIntoSubDir
+
+moveAssigmentToSub:
+	@mv ./common/$(ASSIGNMENT).$(FILEEXT) exercises/$(ASSIGNMENT)/$(EXAMPLE)
+	@mv ./common/$(TSTFILE) exercises/$(ASSIGNMENT)/$(TSTFILE)
+
+moveAssigmentToCommon:
+	@mv ./exercises/$(ASSIGNMENT)/$(EXAMPLE) common/$(ASSIGNMENT).$(FILEEXT)
+	@mv ./exercises/$(ASSIGNMENT)/$(TSTFILE) common/$(TSTFILE)
+
+moveAllIntoCommonDir:
+	@for assignment in $(ASSIGNMENTS); do ASSIGNMENT=$$assignment $(MAKE) moveAssigmentToCommon || exit 1; done
+
+moveCommonIntoSubDir:
+	@for assignment in $(ASSIGNMENTS); do ASSIGNMENT=$$assignment $(MAKE) moveAssigmentToSub || exit 1; done
+	
+all: replacePackageFileFromCommonToSubFolders
+
+copyPackageFilesToSubFolder:
+	@cp ./common/package.json exercises/$(ASSIGNMENT)/package.json
+	@cp ./common/tsconfig.json exercises/$(ASSIGNMENT)/tsconfig.json
+	@cp ./common/tslint.json exercises/$(ASSIGNMENT)/tslint.json
+	@cp ./common/yarn.lock exercises/$(ASSIGNMENT)/yarn.lock
+
+replacePackageFileFromCommonToSubFolders:
+	@for assignment in $(ASSIGNMENTS); do ASSIGNMENT=$$assignment $(MAKE) copyPackageFilesToSubFolder || exit 1; done
+