Permalink
Browse files

merging with haskell-package

  • Loading branch information...
2 parents ca6e9a2 + 0522b17 commit acc521437252ea3ba2768b7b67e71ad2b9707816 @tonymorris committed Nov 30, 2011
Showing with 118 additions and 12 deletions.
  1. +1 −1 .ghci
  2. +11 −11 .gitignore
  3. 0 { → src}/Course.hs
  4. 0 { → src}/L01/Optional.hs
  5. 0 { → src}/L01/Validation.hs
  6. 0 { → src}/L02/List.hs
  7. 0 { → src}/L03/Parser.hs
  8. 0 { → src}/L03/Person.hs
  9. 0 { → src}/L04/Fluffy.hs
  10. 0 { → src}/L04/Misty.hs
  11. 0 { → src}/L04/Tests.hs
  12. 0 { → src}/L05/Testing.hs
  13. 0 { → src}/L06/JsonParser.hs
  14. 0 { → src}/L06/JsonValue.hs
  15. 0 { → src}/L06/MoreParser.hs
  16. 0 { → src}/L07/Anagrams.hs
  17. 0 { → src}/L08/FastAnagrams.hs
  18. 0 { → src}/L09/BKTree.hs
  19. 0 { → src}/L09/EditDistance.hs
  20. 0 { → src}/L09/MetricSpace.hs
  21. 0 { → src}/L10/Compose.hs
  22. +9 −0 src/M.hs
  23. 0 { → src}/TicTacToe/TicTacToe.md
  24. 0 { → src}/TicTacToe/agda/TicTacToe.agda
  25. 0 { → src}/TicTacToe/haskell/.ghci
  26. 0 { → src}/TicTacToe/haskell/Data/TicTacToe.hs
  27. 0 { → src}/TicTacToe/haskell/Data/TicTacToe/Board.hs
  28. 0 { → src}/TicTacToe/haskell/Data/TicTacToe/GameResult.hs
  29. 0 { → src}/TicTacToe/haskell/Data/TicTacToe/Interact.hs
  30. 0 { → src}/TicTacToe/haskell/Data/TicTacToe/Player.hs
  31. 0 { → src}/TicTacToe/haskell/Data/TicTacToe/Position.hs
  32. 0 { → src}/TicTacToe/haskell/LICENSE
  33. 0 { → src}/TicTacToe/haskell/Setup.hs
  34. 0 { → src}/TicTacToe/haskell/Test/Data/TicTacToe.hs
  35. 0 { → src}/TicTacToe/haskell/Test/Data/TicTacToe/Board.hs
  36. 0 { → src}/TicTacToe/haskell/Test/Data/TicTacToe/GameResult.hs
  37. 0 { → src}/TicTacToe/haskell/Test/Data/TicTacToe/Player.hs
  38. 0 { → src}/TicTacToe/haskell/Test/Data/TicTacToe/Position.hs
  39. 0 { → src}/TicTacToe/haskell/TicTacToe
  40. 0 { → src}/TicTacToe/haskell/TicTacToe.cabal
  41. 0 { → src}/TicTacToe/haskell/TicTacToe.lkshw
  42. 0 { → src}/TicTacToe/java/.idea/.name
  43. 0 { → src}/TicTacToe/java/.idea/ant.xml
  44. 0 { → src}/TicTacToe/java/.idea/compiler.xml
  45. 0 { → src}/TicTacToe/java/.idea/copyright/profiles_settings.xml
  46. 0 { → src}/TicTacToe/java/.idea/encodings.xml
  47. 0 { → src}/TicTacToe/java/.idea/libraries/functionaljava.xml
  48. 0 { → src}/TicTacToe/java/.idea/misc.xml
  49. 0 { → src}/TicTacToe/java/.idea/modules.xml
  50. 0 { → src}/TicTacToe/java/.idea/uiDesigner.xml
  51. 0 { → src}/TicTacToe/java/.idea/vcs.xml
  52. 0 { → src}/TicTacToe/java/.idea/workspace.xml
  53. BIN { → src}/TicTacToe/java/lib/functionaljava-3.1-SNAPSHOT-docs.jar
  54. BIN { → src}/TicTacToe/java/lib/functionaljava-3.1-SNAPSHOT-sources.jar
  55. BIN { → src}/TicTacToe/java/lib/functionaljava-3.1-SNAPSHOT.jar
  56. 0 { → src}/TicTacToe/java/src/tictactoe/Board.java
  57. 0 { → src}/TicTacToe/java/src/tictactoe/BoardLike.java
  58. 0 { → src}/TicTacToe/java/src/tictactoe/GameResult.java
  59. 0 { → src}/TicTacToe/java/src/tictactoe/Main.java
  60. 0 { → src}/TicTacToe/java/src/tictactoe/MoveResult.java
  61. 0 { → src}/TicTacToe/java/src/tictactoe/Player.java
  62. 0 { → src}/TicTacToe/java/src/tictactoe/Position.java
  63. 0 { → src}/TicTacToe/java/src/tictactoe/TakenBack.java
  64. 0 { → src}/TicTacToe/java/tictactoe.iml
  65. 0 { → src}/TicTacToe/scala/TicTacToe.scala
  66. +6 −0 test/.ghci
  67. +3 −0 test/.gitignore
  68. +39 −0 test/Package-Test.cabal
  69. +29 −0 test/src/M/Tests.hs
  70. +20 −0 test/src/Main.hs
View
@@ -1,5 +1,5 @@
+:set -isrc
:m + Test.QuickCheck
-:l Course.hs
:m + Course
:set prompt ">> "
:set -Wall
View
@@ -1,11 +1,11 @@
-syntax: glob
-*.swp
-*.*~
-*.o
-*.orig
-*.hi
-*.lkshs
-*/.idea/ant.xml
-*/.idea/workspace.xml
-dist
-out
+syntax: glob
+*.swp
+*.*~
+*.o
+*.orig
+*.hi
+*.lkshs
+*/.idea/ant.xml
+*/.idea/workspace.xml
+dist
+out
File renamed without changes.
File renamed without changes.
File renamed without changes.
File renamed without changes.
File renamed without changes.
File renamed without changes.
File renamed without changes.
File renamed without changes.
File renamed without changes.
File renamed without changes.
File renamed without changes.
File renamed without changes.
File renamed without changes.
File renamed without changes.
File renamed without changes.
File renamed without changes.
File renamed without changes.
File renamed without changes.
File renamed without changes.
View
@@ -0,0 +1,9 @@
+module M where
+
+add ::
+ Int
+ -> Int
+ -> Int
+add =
+ (+)
+
File renamed without changes.
File renamed without changes.
File renamed without changes.
File renamed without changes.
File renamed without changes.
File renamed without changes.
View
@@ -0,0 +1,6 @@
+:set -i../src -isrc
+:m + Test.QuickCheck
+:l Main
+:set prompt "test>> "
+:set -Wall
+
View
@@ -0,0 +1,3 @@
+dist
+*.tix
+.hpc
@@ -0,0 +1,39 @@
+Name: Haskell-Package-Test
+Version: 0.0.1
+Author: Tony Morris <ʇǝu˙sıɹɹoɯʇ@ןןǝʞsɐɥ>
+Maintainer: Tony Morris
+Copyright: Tony Morris
+Synopsis: A skeleton for testing haskell packages
+Category: Development
+Description: A skeleton for testing haskell packages
+Homepage: https://github.com/tonymorris/haskell-package
+Cabal-Version: >= 1.6
+Build-Type: Simple
+
+Source-Repository head
+ Type: git
+ Location: git@github.com:tonymorris/haskell-package.git
+
+Flag small_base
+ Description: Choose the new, split-up base package.
+
+Executable package-test
+ Hs-Source-Dirs:
+ ../src src
+
+ Main-Is:
+ Main.hs
+
+ Ghc-Options:
+ -O2
+ -Wall
+ -fhpc
+ -fwarn-tabs
+
+ Build-Depends:
+ base < 5 && >= 3
+ , QuickCheck
+ , test-framework
+ , test-framework-quickcheck2
+ , test-framework-hunit
+
View
@@ -0,0 +1,29 @@
+module M.Tests
+ (
+ main
+ , test
+ ) where
+
+import Test.Framework
+import Test.Framework.Providers.QuickCheck2 (testProperty)
+import M
+
+main ::
+ IO ()
+main =
+ defaultMain [test]
+
+test ::
+ Test
+test =
+ testGroup "M"
+ [
+ testProperty "Right Identity" prop_right_identity
+ ]
+
+prop_right_identity ::
+ Int
+ -> Bool
+prop_right_identity n =
+ n `add` 0 == n
+
View
@@ -0,0 +1,20 @@
+module Main where
+
+import qualified M.Tests
+import Test.Framework
+
+main ::
+ IO ()
+main =
+ defaultMain tests
+
+tests ::
+ [Test]
+tests =
+ [
+ testGroup "Tests"
+ [
+ M.Tests.test
+ ]
+ ]
+

0 comments on commit acc5214

Please sign in to comment.