trackler 2.2.1.95 → 2.2.1.96

data/tracks/go/exercises/grep/example.go

@@ -0,0 +1,102 @@
+package grep
+
+import (
+	"bufio"
+	"os"
+	"strconv"
+	"strings"
+)
+
+type options struct {
+	printLineNumbers     bool
+	printFilenamesOnly   bool
+	caseInsensitiveMatch bool
+	invertPatternMatch   bool
+	matchEntireLine      bool
+	prefixFilenames      bool
+}
+
+// Search looks for pattern in the files given, using optional flags.
+func Search(pattern string, flags, files []string) []string {
+	output := []string{}
+	options := getOptions(flags, len(files))
+	for _, file := range files {
+		output = append(output, searchFile(pattern, file, options)...)
+	}
+	return output
+}
+
+// searchFile performs a search for pattern in the given file
+// and returns the output according to the options.
+func searchFile(pattern string, file string, options *options) (output []string) {
+	f, err := os.Open(file)
+	if err != nil {
+		return nil
+	}
+	defer f.Close()
+	var filePrefix string
+	if options.prefixFilenames {
+		filePrefix = file + ":"
+	}
+	scanner := bufio.NewScanner(f)
+	for lineNum := 1; scanner.Scan(); lineNum++ {
+		var match bool
+		line := scanner.Text()
+		if options.matchEntireLine {
+			if options.caseInsensitiveMatch {
+				match = strings.EqualFold(line, pattern)
+			} else {
+				match = line == pattern
+			}
+		} else {
+			if options.caseInsensitiveMatch {
+				match = strings.Contains(strings.ToLower(line), strings.ToLower(pattern))
+			} else {
+				match = strings.Contains(line, pattern)
+			}
+		}
+		if match && !options.invertPatternMatch {
+			if options.printFilenamesOnly {
+				output = append(output, file)
+				break
+			} else if options.printLineNumbers {
+				output = append(output, filePrefix+strconv.Itoa(lineNum)+":"+line)
+			} else {
+				output = append(output, filePrefix+line)
+			}
+		} else if !match && options.invertPatternMatch {
+			if options.printFilenamesOnly {
+				output = append(output, file)
+				break
+			} else if options.printLineNumbers {
+				output = append(output, filePrefix+strconv.Itoa(lineNum)+":"+line)
+			} else {
+				output = append(output, filePrefix+line)
+			}
+		}
+	}
+	return output
+}
+
+// getOptions examines flags and nfiles, outputing options.
+func getOptions(flags []string, nfiles int) (opt *options) {
+	opt = &options{}
+	for _, option := range flags {
+		switch option {
+		case "-n":
+			opt.printLineNumbers = true
+		case "-l":
+			opt.printFilenamesOnly = true
+		case "-i":
+			opt.caseInsensitiveMatch = true
+		case "-v":
+			opt.invertPatternMatch = true
+		case "-x":
+			opt.matchEntireLine = true
+		}
+	}
+	if nfiles > 1 {
+		opt.prefixFilenames = true
+	}
+	return opt
+}

data/tracks/go/exercises/grep/grep_test.go

@@ -0,0 +1,84 @@
+package grep
+
+import (
+	"os"
+	"reflect"
+	"strings"
+	"testing"
+)
+
+func createFiles(content []string) (filenames []string) {
+	// Parse fileContentData, making the list of filenames
+	// with their content.
+	var filename string
+	var f *os.File
+	for _, d := range content {
+		t := strings.TrimSpace(d)
+		if len(t) == 0 {
+			if len(filename) == 0 {
+				continue
+			}
+			// Close file
+			f.Close()
+			filenames = append(filenames, filename)
+			filename = ""
+			f = nil
+			continue
+		}
+		if strings.Contains(t, ".txt") {
+			filename = t
+			// Open file
+			var err error
+			f, err = os.Create(filename)
+			if err != nil {
+				panic(err)
+			}
+			continue
+		}
+		fields := strings.Split(t, "|")
+		if len(fields) == 3 {
+			// Write string into file with newline.
+			_, err := f.WriteString(strings.TrimRight(fields[1], " ") + "\n")
+			if err != nil {
+				panic(err)
+			}
+		}
+	}
+	if f != nil {
+		f.Close()
+		filenames = append(filenames, filename)
+	}
+	return
+}
+
+func deleteFiles(filenames []string) {
+	for _, file := range filenames {
+		os.Remove(file)
+	}
+}
+
+func TestSearch(t *testing.T) {
+	files := createFiles(fileContentData)
+	defer deleteFiles(files)
+
+	for _, tc := range testCases {
+		actual := Search(tc.pattern, tc.flags, tc.files)
+		if !reflect.DeepEqual(actual, tc.expected) {
+			t.Fatalf("FAIL: %s\nSearch for pattern %q\nexpected %v\nactual %v.",
+				tc.description, tc.pattern, tc.expected, actual)
+		}
+		t.Logf("PASS: %s", tc.description)
+	}
+}
+
+func BenchmarkSearch(b *testing.B) {
+	files := createFiles(fileContentData)
+	defer deleteFiles(files)
+
+	b.ResetTimer()
+	for i := 0; i < b.N; i++ {
+		for _, tc := range testCases {
+			Search(tc.pattern, tc.flags, tc.files)
+		}
+	}
+}

data/tracks/java/exercises/anagram/.meta/version

@@ -1 +1 @@
-1.1.0
+1.2.0

data/tracks/java/exercises/anagram/src/test/java/AnagramTest.java

@@ -17,22 +17,6 @@ public class AnagramTest {
         assertTrue(detector.match(Arrays.asList("hello", "world", "zombies", "pants")).isEmpty());
     }
 
-    @Ignore("Remove to run test")
-    @Test
-    public void testDetectSimpleAnagram() {
-        Anagram detector = new Anagram("ant");
-        List<String> anagram = detector.match(Arrays.asList("tan", "stand", "at"));
-        assertThat(anagram, hasItem("tan"));
-        assertThat(anagram.size(), is(1));
-    }
-
-    @Ignore("Remove to run test")
-    @Test
-    public void testDoesNotConfuseDifferentDuplicates() {
-        Anagram detector = new Anagram("galea");
-        assertTrue(detector.match(Collections.singletonList("eagle")).isEmpty());
-    }
-
     @Ignore("Remove to run test")
     @Test
     public void testDetectMultipleAnagrams() {
@@ -64,15 +48,6 @@ public class AnagramTest {
         assertThat(anagrams, allOf(hasItem("gallery"), hasItem("regally"), hasItem("largely")));
     }
 
-    @Ignore("Remove to run test")
-    @Test
-    public void testIdenticalWordIsNotAnagram() {
-        Anagram detector = new Anagram("corn");
-        List<String> anagrams = detector.match(Arrays.asList("corn", "dark", "Corn", "rank", "CORN", "cron", "park"));
-        assertThat(anagrams, hasItem("cron"));
-        assertThat(anagrams.size(), is(1));
-    }
-
     @Ignore("Remove to run test")
     @Test
     public void testEliminateAnagramsWithSameChecksum() {
@@ -104,13 +79,6 @@ public class AnagramTest {
         assertThat(anagrams, hasItem("Carthorse"));
     }
 
-    @Ignore("Remove to run test")
-    @Test
-    public void testWordIsNotItsOwnAnagram() {
-        Anagram detector = new Anagram("banana");
-        assertTrue(detector.match(Collections.singletonList("Banana")).isEmpty());
-    }
-
     @Ignore("Remove to run test")
     @Test
     public void testIdenticalWordRepeatedIsNotAnagram() {

data/tracks/java/exercises/space-age/.meta/src/reference/java/SpaceAge.java

@@ -32,10 +32,6 @@ class SpaceAge {
         this.seconds = seconds;
     }
 
-    double getSeconds() {
-        return seconds;
-    }
-
     double onEarth() {
         return calculateAge(Planet.EARTH);
     }

data/tracks/java/exercises/space-age/.meta/version

@@ -0,0 +1 @@
+1.1.0

data/tracks/java/exercises/space-age/src/test/java/SpaceAgeTest.java

@@ -7,15 +7,6 @@ public class SpaceAgeTest {
 
     private static final double MAXIMUM_DELTA = 1E-02;
 
-
-    @Test
-    public void ageInSeconds() {
-        SpaceAge age = new SpaceAge(1000000);
-
-        assertEquals(1000000, age.getSeconds(), MAXIMUM_DELTA);
-    }
-
-    @Ignore("Remove to run test")
     @Test
     public void ageOnEarth() {
         SpaceAge age = new SpaceAge(1000000000);
@@ -28,7 +19,6 @@ public class SpaceAgeTest {
     public void ageOnMercury() {
         SpaceAge age = new SpaceAge(2134835688);
 
-        assertEquals(67.65, age.onEarth(), MAXIMUM_DELTA);
         assertEquals(280.88, age.onMercury(), MAXIMUM_DELTA);
     }
 
@@ -37,7 +27,6 @@ public class SpaceAgeTest {
     public void ageOnVenus() {
         SpaceAge age = new SpaceAge(189839836);
 
-        assertEquals(6.02, age.onEarth(), MAXIMUM_DELTA);
         assertEquals(9.78, age.onVenus(), MAXIMUM_DELTA);
     }
 
@@ -46,7 +35,6 @@ public class SpaceAgeTest {
     public void ageOnMars() {
         SpaceAge age = new SpaceAge(2329871239L);
 
-        assertEquals(73.83, age.onEarth(), MAXIMUM_DELTA);
         assertEquals(39.25, age.onMars(), MAXIMUM_DELTA);
     }
 
@@ -55,7 +43,6 @@ public class SpaceAgeTest {
     public void ageOnJupiter() {
         SpaceAge age = new SpaceAge(901876382);
 
-        assertEquals(28.58, age.onEarth(), MAXIMUM_DELTA);
         assertEquals(2.41, age.onJupiter(), MAXIMUM_DELTA);
     }
 
@@ -64,7 +51,6 @@ public class SpaceAgeTest {
     public void ageOnSaturn() {
         SpaceAge age = new SpaceAge(3000000000L);
 
-        assertEquals(95.06, age.onEarth(), MAXIMUM_DELTA);
         assertEquals(3.23, age.onSaturn(), MAXIMUM_DELTA);
     }
 
@@ -73,7 +59,6 @@ public class SpaceAgeTest {
     public void ageOnUranus() {
         SpaceAge age = new SpaceAge(3210123456L);
 
-        assertEquals(101.72, age.onEarth(), MAXIMUM_DELTA);
         assertEquals(1.21, age.onUranus(), MAXIMUM_DELTA);
     }
 
@@ -82,7 +67,6 @@ public class SpaceAgeTest {
     public void ageOnNeptune() {
         SpaceAge age = new SpaceAge(8210123456L);
 
-        assertEquals(260.16, age.onEarth(), MAXIMUM_DELTA);
         assertEquals(1.58, age.onNeptune(), MAXIMUM_DELTA);
     }
 }

data/tracks/julia/.gitignore

@@ -2,3 +2,4 @@
 .DS_Store
 bin/configlet
 bin/configlet.exe
+tmp/

data/tracks/julia/runtests.jl

@@ -13,32 +13,31 @@ macro test_broken(ex)
     @test eval(current_module(), ex)
 end
 
-for (root, dirs, files) in walkdir("exercises")
-    for exercise in dirs
-        # Allow only testing specified execises
-        if !isempty(ARGS) && !(exercise in ARGS)
-            continue
-        end
+for exercise in readdir("exercises")
+    # Allow only testing specified execises
+    if !isempty(ARGS) && !(exercise in ARGS)
+        continue
+    end
+
+    exercise_path = joinpath("exercises", exercise)
+    isdir(exercise_path) || continue
+
+    # Create temporary directory
+    temp_path = mktempdir(".")
+
+    # Copy tests & example to the temporary directory
+    cp(joinpath(exercise_path, "example.jl"), joinpath(temp_path, "$exercise.jl"))
+    cp(joinpath(exercise_path, "runtests.jl"), joinpath(temp_path, "runtests.jl"))
 
-        exercise_path = joinpath("exercises", exercise)
-
-        # Create temporary directory
-        temp_path = mktempdir(root)
-
-        # Copy tests & example to the temporary directory
-        cp(joinpath(exercise_path, "example.jl"), joinpath(temp_path, "$exercise.jl"))
-        cp(joinpath(exercise_path, "runtests.jl"), joinpath(temp_path, "runtests.jl"))
-
-        try
-            # Run the tests
-            @testset "$exercise example" begin
-                # Run the tests within an anonymous module to prevent definitions from
-                # one exercise leaking into another.
-                eval(Module(), :(include(joinpath($temp_path, "runtests.jl"))))
-            end
-        finally
-            # Delete the temporary directory
-            rm(temp_path, recursive=true)
+    try
+        # Run the tests
+        @testset "$exercise example" begin
+            # Run the tests within an anonymous module to prevent definitions from
+            # one exercise leaking into another.
+            eval(Module(), :(include(joinpath($temp_path, "runtests.jl"))))
         end
+    finally
+        # Delete the temporary directory
+        rm(temp_path, recursive=true)
     end
 end

data/tracks/perl6/.travis.yml

@@ -3,13 +3,17 @@ sudo: false
 before_script:
   - git clone https://github.com/exercism/problem-specifications.git
   - bin/fetch-configlet
-  - docker pull rakudo-star:latest
+  - docker build -t exercism-rakudo-star .
+  - docker run
+    --volume $PWD:/exercism
+    exercism-rakudo-star perl6 -e
+    '.add(‘Example.pm6’).copy(.dir.first({.extension eq ‘pm6’ && .basename ne ‘Example.pm6’}))
+    for $*CWD.add(‘exercism/exercises’).dir' # replace stub files with complete solutions from Example.pm6
 script:
   - bin/configlet lint .
   - docker run
-    --env EXERCISM=1
     --volume $PWD:/exercism
-    rakudo-star prove /exercism
+    exercism-rakudo-star prove /exercism
     --exec perl6
     --recurse
     --jobs 2

data/tracks/perl6/Dockerfile

@@ -0,0 +1,4 @@
+FROM rakudo-star:latest
+RUN apt-get update && \
+    apt-get install -y make gcc libyaml-dev && \
+    zef install YAML::Parser::LibYAML

data/tracks/perl6/exercises/accumulate/Accumulate.pm6

@@ -1 +1 @@
-unit module Accumulate:ver<1>;
+unit module Accumulate:ver<2>;

data/tracks/perl6/exercises/accumulate/Example.pm6

@@ -1,4 +1,4 @@
-unit module Accumulate:ver<1>;
+unit module Accumulate:ver<2>;
 
 sub accumulate (@list, $function) is export {
   my @accumulated;

data/tracks/perl6/exercises/accumulate/accumulate.t

@@ -2,24 +2,17 @@
 use v6;
 use Test;
 use lib $?FILE.IO.dirname;
+use Accumulate;
+plan 6;
 
-my Str:D $exercise := 'Accumulate';
-my Version:D $version = v1;
-my Str $module //= $exercise;
-plan 7;
+my Version:D $version = v2;
 
-use-ok $module or bail-out;
-require ::($module);
-
-if ::($exercise).^ver !~~ $version {
+if Accumulate.^ver !~~ $version {
   warn "\nExercise version mismatch. Further tests may fail!"
-    ~ "\n$exercise is $(::($exercise).^ver.gist). "
-    ~ "Test is $($version.gist).\n";
-  bail-out 'Example version must match test version.' if %*ENV<EXERCISM>;
+    ~ "\nAccumulate is {Accumulate.^ver.gist}. "
+    ~ "Test is {$version.gist}.\n";
 }
 
-require ::($module) <&accumulate>;
-
 is-deeply accumulate([ ], sub {}),
           [ ],
           'test empty';
@@ -38,5 +31,3 @@ is-deeply accumulate(['a', 'b', 'c' ], sub ($inp) { [ accumulate( [1, 2, 3], sub
 is-deeply accumulate(['the', 'quick', 'brown', 'fox'], sub { @_[0].flip }),
           ['eht', 'kciuq', 'nworb', 'xof'],
           'reverse strings';
-
-INIT { $module = 'Example' if %*ENV<EXERCISM> }