Add tests for units.jl (#62)

Author: Sov-trotter

test/runtests.jl

@@ -15,6 +15,7 @@ include("support/util.jl")
               "SampleBuf.jl",
               "SampleStream.jl",
               "SinSource.jl",
+	      "units.jl"
               # "WAVDisplay.jl"
               ])
 end

test/units.jl

@@ -8,6 +8,8 @@
         @test inseconds(1.0s,44100Hz) == 1.0
         @test inseconds(10ms,44100Hz) == 1//100
         @test inseconds(1.0,44100Hz) == 1.0
+        @test inseconds(1.0,44100Hz) == inseconds(1.0)
+        @test_throws ErrorException inseconds(441frames)
     end
 
     @testset "converting to frames" begin
@@ -17,13 +19,20 @@
         @test inframes(10.5frames,44100Hz) == 10.5
         @test inframes(10frames) == 10
         @test inframes(10) == 10
+        @test inframes(1s, 44100) == inframes(1000ms,44100Hz)
+        @test inframes(10Hz, 0.1) == 1
+        @test inframes(Int, 1) == inframes(1)
         @test_throws ErrorException inframes(1s)
+        @test_throws ErrorException inframes(Int, 1s)
     end
 
     @testset "converting to Hz" begin
         @test inHz(100Hz) == inHz(0.1kHz)
         @test inHz(100Hz) == 100
         @test inHz(1kHz) == 1000
         @test inHz(100) == 100
+        @test inHz(441frames, 1000) == 0.441
+        @test inHz(1.0, 441000) == inHz(1.0)
+        @test_throws ErrorException inHz(441frames)
     end
 end