mirror of
https://github.com/tensorflow/haskell.git
synced 2024-11-23 11:29:43 +01:00
Consolidate some packages. (#111)
- Merge tensorflow-nn and tensorflow-queue into tensorflow-ops. They don't add extra dependencies and each contain a single module, so I don't think it's worth separating them at the package level. - Remove google-shim in favor of direct use of test-framework.
This commit is contained in:
parent
0fa719b701
commit
64971c876a
30 changed files with 130 additions and 875 deletions
|
@ -1,203 +0,0 @@
|
||||||
Copyright 2016 The TensorFlow Authors. All rights reserved.
|
|
||||||
|
|
||||||
Apache License
|
|
||||||
Version 2.0, January 2004
|
|
||||||
http://www.apache.org/licenses/
|
|
||||||
|
|
||||||
TERMS AND CONDITIONS FOR USE, REPRODUCTION, AND DISTRIBUTION
|
|
||||||
|
|
||||||
1. Definitions.
|
|
||||||
|
|
||||||
"License" shall mean the terms and conditions for use, reproduction,
|
|
||||||
and distribution as defined by Sections 1 through 9 of this document.
|
|
||||||
|
|
||||||
"Licensor" shall mean the copyright owner or entity authorized by
|
|
||||||
the copyright owner that is granting the License.
|
|
||||||
|
|
||||||
"Legal Entity" shall mean the union of the acting entity and all
|
|
||||||
other entities that control, are controlled by, or are under common
|
|
||||||
control with that entity. For the purposes of this definition,
|
|
||||||
"control" means (i) the power, direct or indirect, to cause the
|
|
||||||
direction or management of such entity, whether by contract or
|
|
||||||
otherwise, or (ii) ownership of fifty percent (50%) or more of the
|
|
||||||
outstanding shares, or (iii) beneficial ownership of such entity.
|
|
||||||
|
|
||||||
"You" (or "Your") shall mean an individual or Legal Entity
|
|
||||||
exercising permissions granted by this License.
|
|
||||||
|
|
||||||
"Source" form shall mean the preferred form for making modifications,
|
|
||||||
including but not limited to software source code, documentation
|
|
||||||
source, and configuration files.
|
|
||||||
|
|
||||||
"Object" form shall mean any form resulting from mechanical
|
|
||||||
transformation or translation of a Source form, including but
|
|
||||||
not limited to compiled object code, generated documentation,
|
|
||||||
and conversions to other media types.
|
|
||||||
|
|
||||||
"Work" shall mean the work of authorship, whether in Source or
|
|
||||||
Object form, made available under the License, as indicated by a
|
|
||||||
copyright notice that is included in or attached to the work
|
|
||||||
(an example is provided in the Appendix below).
|
|
||||||
|
|
||||||
"Derivative Works" shall mean any work, whether in Source or Object
|
|
||||||
form, that is based on (or derived from) the Work and for which the
|
|
||||||
editorial revisions, annotations, elaborations, or other modifications
|
|
||||||
represent, as a whole, an original work of authorship. For the purposes
|
|
||||||
of this License, Derivative Works shall not include works that remain
|
|
||||||
separable from, or merely link (or bind by name) to the interfaces of,
|
|
||||||
the Work and Derivative Works thereof.
|
|
||||||
|
|
||||||
"Contribution" shall mean any work of authorship, including
|
|
||||||
the original version of the Work and any modifications or additions
|
|
||||||
to that Work or Derivative Works thereof, that is intentionally
|
|
||||||
submitted to Licensor for inclusion in the Work by the copyright owner
|
|
||||||
or by an individual or Legal Entity authorized to submit on behalf of
|
|
||||||
the copyright owner. For the purposes of this definition, "submitted"
|
|
||||||
means any form of electronic, verbal, or written communication sent
|
|
||||||
to the Licensor or its representatives, including but not limited to
|
|
||||||
communication on electronic mailing lists, source code control systems,
|
|
||||||
and issue tracking systems that are managed by, or on behalf of, the
|
|
||||||
Licensor for the purpose of discussing and improving the Work, but
|
|
||||||
excluding communication that is conspicuously marked or otherwise
|
|
||||||
designated in writing by the copyright owner as "Not a Contribution."
|
|
||||||
|
|
||||||
"Contributor" shall mean Licensor and any individual or Legal Entity
|
|
||||||
on behalf of whom a Contribution has been received by Licensor and
|
|
||||||
subsequently incorporated within the Work.
|
|
||||||
|
|
||||||
2. Grant of Copyright License. Subject to the terms and conditions of
|
|
||||||
this License, each Contributor hereby grants to You a perpetual,
|
|
||||||
worldwide, non-exclusive, no-charge, royalty-free, irrevocable
|
|
||||||
copyright license to reproduce, prepare Derivative Works of,
|
|
||||||
publicly display, publicly perform, sublicense, and distribute the
|
|
||||||
Work and such Derivative Works in Source or Object form.
|
|
||||||
|
|
||||||
3. Grant of Patent License. Subject to the terms and conditions of
|
|
||||||
this License, each Contributor hereby grants to You a perpetual,
|
|
||||||
worldwide, non-exclusive, no-charge, royalty-free, irrevocable
|
|
||||||
(except as stated in this section) patent license to make, have made,
|
|
||||||
use, offer to sell, sell, import, and otherwise transfer the Work,
|
|
||||||
where such license applies only to those patent claims licensable
|
|
||||||
by such Contributor that are necessarily infringed by their
|
|
||||||
Contribution(s) alone or by combination of their Contribution(s)
|
|
||||||
with the Work to which such Contribution(s) was submitted. If You
|
|
||||||
institute patent litigation against any entity (including a
|
|
||||||
cross-claim or counterclaim in a lawsuit) alleging that the Work
|
|
||||||
or a Contribution incorporated within the Work constitutes direct
|
|
||||||
or contributory patent infringement, then any patent licenses
|
|
||||||
granted to You under this License for that Work shall terminate
|
|
||||||
as of the date such litigation is filed.
|
|
||||||
|
|
||||||
4. Redistribution. You may reproduce and distribute copies of the
|
|
||||||
Work or Derivative Works thereof in any medium, with or without
|
|
||||||
modifications, and in Source or Object form, provided that You
|
|
||||||
meet the following conditions:
|
|
||||||
|
|
||||||
(a) You must give any other recipients of the Work or
|
|
||||||
Derivative Works a copy of this License; and
|
|
||||||
|
|
||||||
(b) You must cause any modified files to carry prominent notices
|
|
||||||
stating that You changed the files; and
|
|
||||||
|
|
||||||
(c) You must retain, in the Source form of any Derivative Works
|
|
||||||
that You distribute, all copyright, patent, trademark, and
|
|
||||||
attribution notices from the Source form of the Work,
|
|
||||||
excluding those notices that do not pertain to any part of
|
|
||||||
the Derivative Works; and
|
|
||||||
|
|
||||||
(d) If the Work includes a "NOTICE" text file as part of its
|
|
||||||
distribution, then any Derivative Works that You distribute must
|
|
||||||
include a readable copy of the attribution notices contained
|
|
||||||
within such NOTICE file, excluding those notices that do not
|
|
||||||
pertain to any part of the Derivative Works, in at least one
|
|
||||||
of the following places: within a NOTICE text file distributed
|
|
||||||
as part of the Derivative Works; within the Source form or
|
|
||||||
documentation, if provided along with the Derivative Works; or,
|
|
||||||
within a display generated by the Derivative Works, if and
|
|
||||||
wherever such third-party notices normally appear. The contents
|
|
||||||
of the NOTICE file are for informational purposes only and
|
|
||||||
do not modify the License. You may add Your own attribution
|
|
||||||
notices within Derivative Works that You distribute, alongside
|
|
||||||
or as an addendum to the NOTICE text from the Work, provided
|
|
||||||
that such additional attribution notices cannot be construed
|
|
||||||
as modifying the License.
|
|
||||||
|
|
||||||
You may add Your own copyright statement to Your modifications and
|
|
||||||
may provide additional or different license terms and conditions
|
|
||||||
for use, reproduction, or distribution of Your modifications, or
|
|
||||||
for any such Derivative Works as a whole, provided Your use,
|
|
||||||
reproduction, and distribution of the Work otherwise complies with
|
|
||||||
the conditions stated in this License.
|
|
||||||
|
|
||||||
5. Submission of Contributions. Unless You explicitly state otherwise,
|
|
||||||
any Contribution intentionally submitted for inclusion in the Work
|
|
||||||
by You to the Licensor shall be under the terms and conditions of
|
|
||||||
this License, without any additional terms or conditions.
|
|
||||||
Notwithstanding the above, nothing herein shall supersede or modify
|
|
||||||
the terms of any separate license agreement you may have executed
|
|
||||||
with Licensor regarding such Contributions.
|
|
||||||
|
|
||||||
6. Trademarks. This License does not grant permission to use the trade
|
|
||||||
names, trademarks, service marks, or product names of the Licensor,
|
|
||||||
except as required for reasonable and customary use in describing the
|
|
||||||
origin of the Work and reproducing the content of the NOTICE file.
|
|
||||||
|
|
||||||
7. Disclaimer of Warranty. Unless required by applicable law or
|
|
||||||
agreed to in writing, Licensor provides the Work (and each
|
|
||||||
Contributor provides its Contributions) on an "AS IS" BASIS,
|
|
||||||
WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
|
|
||||||
implied, including, without limitation, any warranties or conditions
|
|
||||||
of TITLE, NON-INFRINGEMENT, MERCHANTABILITY, or FITNESS FOR A
|
|
||||||
PARTICULAR PURPOSE. You are solely responsible for determining the
|
|
||||||
appropriateness of using or redistributing the Work and assume any
|
|
||||||
risks associated with Your exercise of permissions under this License.
|
|
||||||
|
|
||||||
8. Limitation of Liability. In no event and under no legal theory,
|
|
||||||
whether in tort (including negligence), contract, or otherwise,
|
|
||||||
unless required by applicable law (such as deliberate and grossly
|
|
||||||
negligent acts) or agreed to in writing, shall any Contributor be
|
|
||||||
liable to You for damages, including any direct, indirect, special,
|
|
||||||
incidental, or consequential damages of any character arising as a
|
|
||||||
result of this License or out of the use or inability to use the
|
|
||||||
Work (including but not limited to damages for loss of goodwill,
|
|
||||||
work stoppage, computer failure or malfunction, or any and all
|
|
||||||
other commercial damages or losses), even if such Contributor
|
|
||||||
has been advised of the possibility of such damages.
|
|
||||||
|
|
||||||
9. Accepting Warranty or Additional Liability. While redistributing
|
|
||||||
the Work or Derivative Works thereof, You may choose to offer,
|
|
||||||
and charge a fee for, acceptance of support, warranty, indemnity,
|
|
||||||
or other liability obligations and/or rights consistent with this
|
|
||||||
License. However, in accepting such obligations, You may act only
|
|
||||||
on Your own behalf and on Your sole responsibility, not on behalf
|
|
||||||
of any other Contributor, and only if You agree to indemnify,
|
|
||||||
defend, and hold each Contributor harmless for any liability
|
|
||||||
incurred by, or claims asserted against, such Contributor by reason
|
|
||||||
of your accepting any such warranty or additional liability.
|
|
||||||
|
|
||||||
END OF TERMS AND CONDITIONS
|
|
||||||
|
|
||||||
APPENDIX: How to apply the Apache License to your work.
|
|
||||||
|
|
||||||
To apply the Apache License to your work, attach the following
|
|
||||||
boilerplate notice, with the fields enclosed by brackets "[]"
|
|
||||||
replaced with your own identifying information. (Don't include
|
|
||||||
the brackets!) The text should be enclosed in the appropriate
|
|
||||||
comment syntax for the file format. We also recommend that a
|
|
||||||
file or class name and description of purpose be included on the
|
|
||||||
same "printed page" as the copyright notice for easier
|
|
||||||
identification within third-party archives.
|
|
||||||
|
|
||||||
Copyright 2016, The TensorFlow Authors.
|
|
||||||
|
|
||||||
Licensed under the Apache License, Version 2.0 (the "License");
|
|
||||||
you may not use this file except in compliance with the License.
|
|
||||||
You may obtain a copy of the License at
|
|
||||||
|
|
||||||
http://www.apache.org/licenses/LICENSE-2.0
|
|
||||||
|
|
||||||
Unless required by applicable law or agreed to in writing, software
|
|
||||||
distributed under the License is distributed on an "AS IS" BASIS,
|
|
||||||
WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
|
|
||||||
See the License for the specific language governing permissions and
|
|
||||||
limitations under the License.
|
|
|
@ -1,3 +0,0 @@
|
||||||
import Distribution.Simple
|
|
||||||
|
|
||||||
main = defaultMain
|
|
|
@ -1,24 +0,0 @@
|
||||||
name: google-shim
|
|
||||||
version: 0.1.0.0
|
|
||||||
synopsis: Adapters to externalize TensorFlow code.
|
|
||||||
description: Please see README.md
|
|
||||||
homepage: https://github.com/tensorflow/haskell#readme
|
|
||||||
license: Apache
|
|
||||||
license-file: LICENSE
|
|
||||||
author: TensorFlow authors
|
|
||||||
maintainer: tensorflow-haskell@googlegroups.com
|
|
||||||
copyright: Google Inc.
|
|
||||||
category: Machine Learning
|
|
||||||
build-type: Simple
|
|
||||||
cabal-version: >=1.22
|
|
||||||
|
|
||||||
library
|
|
||||||
hs-source-dirs: src
|
|
||||||
exposed-modules: Google.Test
|
|
||||||
build-depends: base >= 4.7 && < 5
|
|
||||||
, test-framework
|
|
||||||
default-language: Haskell2010
|
|
||||||
|
|
||||||
source-repository head
|
|
||||||
type: git
|
|
||||||
location: https://github.com/tensorflow/haskell
|
|
|
@ -1,22 +0,0 @@
|
||||||
-- Copyright 2016 TensorFlow authors.
|
|
||||||
--
|
|
||||||
-- Licensed under the Apache License, Version 2.0 (the "License");
|
|
||||||
-- you may not use this file except in compliance with the License.
|
|
||||||
-- You may obtain a copy of the License at
|
|
||||||
--
|
|
||||||
-- http://www.apache.org/licenses/LICENSE-2.0
|
|
||||||
--
|
|
||||||
-- Unless required by applicable law or agreed to in writing, software
|
|
||||||
-- distributed under the License is distributed on an "AS IS" BASIS,
|
|
||||||
-- WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
|
|
||||||
-- See the License for the specific language governing permissions and
|
|
||||||
-- limitations under the License.
|
|
||||||
|
|
||||||
-- | Alternative implementations to make dependent code work without
|
|
||||||
-- changes.
|
|
||||||
module Google.Test where
|
|
||||||
|
|
||||||
import Test.Framework (Test, defaultMain)
|
|
||||||
|
|
||||||
googleTest :: [Test] -> IO ()
|
|
||||||
googleTest = defaultMain
|
|
|
@ -1,7 +1,6 @@
|
||||||
resolver: lts-8.13
|
resolver: lts-8.13
|
||||||
|
|
||||||
packages:
|
packages:
|
||||||
- google-shim
|
|
||||||
- tensorflow
|
- tensorflow
|
||||||
- tensorflow-core-ops
|
- tensorflow-core-ops
|
||||||
- tensorflow-logging
|
- tensorflow-logging
|
||||||
|
@ -10,8 +9,6 @@ packages:
|
||||||
- tensorflow-proto
|
- tensorflow-proto
|
||||||
- tensorflow-mnist
|
- tensorflow-mnist
|
||||||
- tensorflow-mnist-input-data
|
- tensorflow-mnist-input-data
|
||||||
- tensorflow-queue
|
|
||||||
- tensorflow-nn
|
|
||||||
- tensorflow-records
|
- tensorflow-records
|
||||||
- tensorflow-records-conduit
|
- tensorflow-records-conduit
|
||||||
- tensorflow-test
|
- tensorflow-test
|
||||||
|
|
|
@ -64,7 +64,6 @@ Test-Suite ParseTest
|
||||||
, bytestring
|
, bytestring
|
||||||
, proto-lens
|
, proto-lens
|
||||||
, lens-family
|
, lens-family
|
||||||
, google-shim
|
|
||||||
, tensorflow
|
, tensorflow
|
||||||
, tensorflow-mnist
|
, tensorflow-mnist
|
||||||
, tensorflow-mnist-input-data
|
, tensorflow-mnist-input-data
|
||||||
|
|
|
@ -51,10 +51,9 @@ import TensorFlow.Ops
|
||||||
import TensorFlow.Session
|
import TensorFlow.Session
|
||||||
(runSession, run, run_, runWithFeeds, build)
|
(runSession, run, run_, runWithFeeds, build)
|
||||||
import TensorFlow.Types (TensorDataType(..), Shape(..), unScalar)
|
import TensorFlow.Types (TensorDataType(..), Shape(..), unScalar)
|
||||||
import Test.Framework (Test)
|
import Test.Framework (defaultMain, Test)
|
||||||
import Test.Framework.Providers.HUnit (testCase)
|
import Test.Framework.Providers.HUnit (testCase)
|
||||||
import Test.HUnit ((@=?), Assertion)
|
import Test.HUnit ((@=?), Assertion)
|
||||||
import Google.Test
|
|
||||||
import qualified Data.Vector as V
|
import qualified Data.Vector as V
|
||||||
|
|
||||||
-- | Test that a file can be read and the GraphDef proto correctly parsed.
|
-- | Test that a file can be read and the GraphDef proto correctly parsed.
|
||||||
|
@ -168,8 +167,9 @@ testMNISTExec = testCase "testMNISTExec" $ do
|
||||||
liftIO $ (fromInteger . toInteger $ label :: Int64) @=? unScalar x
|
liftIO $ (fromInteger . toInteger $ label :: Int64) @=? unScalar x
|
||||||
|
|
||||||
main :: IO ()
|
main :: IO ()
|
||||||
main = googleTest [ testReadMessageFromFileOrDie
|
main = defaultMain
|
||||||
|
[ testReadMessageFromFileOrDie
|
||||||
, testReadMNIST
|
, testReadMNIST
|
||||||
, testGraphDefGen
|
, testGraphDefGen
|
||||||
, testGraphDefExec
|
, testGraphDefExec
|
||||||
, testMNISTExec]
|
, testMNISTExec ]
|
||||||
|
|
|
@ -1,203 +0,0 @@
|
||||||
Copyright 2016 The TensorFlow Authors. All rights reserved.
|
|
||||||
|
|
||||||
Apache License
|
|
||||||
Version 2.0, January 2004
|
|
||||||
http://www.apache.org/licenses/
|
|
||||||
|
|
||||||
TERMS AND CONDITIONS FOR USE, REPRODUCTION, AND DISTRIBUTION
|
|
||||||
|
|
||||||
1. Definitions.
|
|
||||||
|
|
||||||
"License" shall mean the terms and conditions for use, reproduction,
|
|
||||||
and distribution as defined by Sections 1 through 9 of this document.
|
|
||||||
|
|
||||||
"Licensor" shall mean the copyright owner or entity authorized by
|
|
||||||
the copyright owner that is granting the License.
|
|
||||||
|
|
||||||
"Legal Entity" shall mean the union of the acting entity and all
|
|
||||||
other entities that control, are controlled by, or are under common
|
|
||||||
control with that entity. For the purposes of this definition,
|
|
||||||
"control" means (i) the power, direct or indirect, to cause the
|
|
||||||
direction or management of such entity, whether by contract or
|
|
||||||
otherwise, or (ii) ownership of fifty percent (50%) or more of the
|
|
||||||
outstanding shares, or (iii) beneficial ownership of such entity.
|
|
||||||
|
|
||||||
"You" (or "Your") shall mean an individual or Legal Entity
|
|
||||||
exercising permissions granted by this License.
|
|
||||||
|
|
||||||
"Source" form shall mean the preferred form for making modifications,
|
|
||||||
including but not limited to software source code, documentation
|
|
||||||
source, and configuration files.
|
|
||||||
|
|
||||||
"Object" form shall mean any form resulting from mechanical
|
|
||||||
transformation or translation of a Source form, including but
|
|
||||||
not limited to compiled object code, generated documentation,
|
|
||||||
and conversions to other media types.
|
|
||||||
|
|
||||||
"Work" shall mean the work of authorship, whether in Source or
|
|
||||||
Object form, made available under the License, as indicated by a
|
|
||||||
copyright notice that is included in or attached to the work
|
|
||||||
(an example is provided in the Appendix below).
|
|
||||||
|
|
||||||
"Derivative Works" shall mean any work, whether in Source or Object
|
|
||||||
form, that is based on (or derived from) the Work and for which the
|
|
||||||
editorial revisions, annotations, elaborations, or other modifications
|
|
||||||
represent, as a whole, an original work of authorship. For the purposes
|
|
||||||
of this License, Derivative Works shall not include works that remain
|
|
||||||
separable from, or merely link (or bind by name) to the interfaces of,
|
|
||||||
the Work and Derivative Works thereof.
|
|
||||||
|
|
||||||
"Contribution" shall mean any work of authorship, including
|
|
||||||
the original version of the Work and any modifications or additions
|
|
||||||
to that Work or Derivative Works thereof, that is intentionally
|
|
||||||
submitted to Licensor for inclusion in the Work by the copyright owner
|
|
||||||
or by an individual or Legal Entity authorized to submit on behalf of
|
|
||||||
the copyright owner. For the purposes of this definition, "submitted"
|
|
||||||
means any form of electronic, verbal, or written communication sent
|
|
||||||
to the Licensor or its representatives, including but not limited to
|
|
||||||
communication on electronic mailing lists, source code control systems,
|
|
||||||
and issue tracking systems that are managed by, or on behalf of, the
|
|
||||||
Licensor for the purpose of discussing and improving the Work, but
|
|
||||||
excluding communication that is conspicuously marked or otherwise
|
|
||||||
designated in writing by the copyright owner as "Not a Contribution."
|
|
||||||
|
|
||||||
"Contributor" shall mean Licensor and any individual or Legal Entity
|
|
||||||
on behalf of whom a Contribution has been received by Licensor and
|
|
||||||
subsequently incorporated within the Work.
|
|
||||||
|
|
||||||
2. Grant of Copyright License. Subject to the terms and conditions of
|
|
||||||
this License, each Contributor hereby grants to You a perpetual,
|
|
||||||
worldwide, non-exclusive, no-charge, royalty-free, irrevocable
|
|
||||||
copyright license to reproduce, prepare Derivative Works of,
|
|
||||||
publicly display, publicly perform, sublicense, and distribute the
|
|
||||||
Work and such Derivative Works in Source or Object form.
|
|
||||||
|
|
||||||
3. Grant of Patent License. Subject to the terms and conditions of
|
|
||||||
this License, each Contributor hereby grants to You a perpetual,
|
|
||||||
worldwide, non-exclusive, no-charge, royalty-free, irrevocable
|
|
||||||
(except as stated in this section) patent license to make, have made,
|
|
||||||
use, offer to sell, sell, import, and otherwise transfer the Work,
|
|
||||||
where such license applies only to those patent claims licensable
|
|
||||||
by such Contributor that are necessarily infringed by their
|
|
||||||
Contribution(s) alone or by combination of their Contribution(s)
|
|
||||||
with the Work to which such Contribution(s) was submitted. If You
|
|
||||||
institute patent litigation against any entity (including a
|
|
||||||
cross-claim or counterclaim in a lawsuit) alleging that the Work
|
|
||||||
or a Contribution incorporated within the Work constitutes direct
|
|
||||||
or contributory patent infringement, then any patent licenses
|
|
||||||
granted to You under this License for that Work shall terminate
|
|
||||||
as of the date such litigation is filed.
|
|
||||||
|
|
||||||
4. Redistribution. You may reproduce and distribute copies of the
|
|
||||||
Work or Derivative Works thereof in any medium, with or without
|
|
||||||
modifications, and in Source or Object form, provided that You
|
|
||||||
meet the following conditions:
|
|
||||||
|
|
||||||
(a) You must give any other recipients of the Work or
|
|
||||||
Derivative Works a copy of this License; and
|
|
||||||
|
|
||||||
(b) You must cause any modified files to carry prominent notices
|
|
||||||
stating that You changed the files; and
|
|
||||||
|
|
||||||
(c) You must retain, in the Source form of any Derivative Works
|
|
||||||
that You distribute, all copyright, patent, trademark, and
|
|
||||||
attribution notices from the Source form of the Work,
|
|
||||||
excluding those notices that do not pertain to any part of
|
|
||||||
the Derivative Works; and
|
|
||||||
|
|
||||||
(d) If the Work includes a "NOTICE" text file as part of its
|
|
||||||
distribution, then any Derivative Works that You distribute must
|
|
||||||
include a readable copy of the attribution notices contained
|
|
||||||
within such NOTICE file, excluding those notices that do not
|
|
||||||
pertain to any part of the Derivative Works, in at least one
|
|
||||||
of the following places: within a NOTICE text file distributed
|
|
||||||
as part of the Derivative Works; within the Source form or
|
|
||||||
documentation, if provided along with the Derivative Works; or,
|
|
||||||
within a display generated by the Derivative Works, if and
|
|
||||||
wherever such third-party notices normally appear. The contents
|
|
||||||
of the NOTICE file are for informational purposes only and
|
|
||||||
do not modify the License. You may add Your own attribution
|
|
||||||
notices within Derivative Works that You distribute, alongside
|
|
||||||
or as an addendum to the NOTICE text from the Work, provided
|
|
||||||
that such additional attribution notices cannot be construed
|
|
||||||
as modifying the License.
|
|
||||||
|
|
||||||
You may add Your own copyright statement to Your modifications and
|
|
||||||
may provide additional or different license terms and conditions
|
|
||||||
for use, reproduction, or distribution of Your modifications, or
|
|
||||||
for any such Derivative Works as a whole, provided Your use,
|
|
||||||
reproduction, and distribution of the Work otherwise complies with
|
|
||||||
the conditions stated in this License.
|
|
||||||
|
|
||||||
5. Submission of Contributions. Unless You explicitly state otherwise,
|
|
||||||
any Contribution intentionally submitted for inclusion in the Work
|
|
||||||
by You to the Licensor shall be under the terms and conditions of
|
|
||||||
this License, without any additional terms or conditions.
|
|
||||||
Notwithstanding the above, nothing herein shall supersede or modify
|
|
||||||
the terms of any separate license agreement you may have executed
|
|
||||||
with Licensor regarding such Contributions.
|
|
||||||
|
|
||||||
6. Trademarks. This License does not grant permission to use the trade
|
|
||||||
names, trademarks, service marks, or product names of the Licensor,
|
|
||||||
except as required for reasonable and customary use in describing the
|
|
||||||
origin of the Work and reproducing the content of the NOTICE file.
|
|
||||||
|
|
||||||
7. Disclaimer of Warranty. Unless required by applicable law or
|
|
||||||
agreed to in writing, Licensor provides the Work (and each
|
|
||||||
Contributor provides its Contributions) on an "AS IS" BASIS,
|
|
||||||
WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
|
|
||||||
implied, including, without limitation, any warranties or conditions
|
|
||||||
of TITLE, NON-INFRINGEMENT, MERCHANTABILITY, or FITNESS FOR A
|
|
||||||
PARTICULAR PURPOSE. You are solely responsible for determining the
|
|
||||||
appropriateness of using or redistributing the Work and assume any
|
|
||||||
risks associated with Your exercise of permissions under this License.
|
|
||||||
|
|
||||||
8. Limitation of Liability. In no event and under no legal theory,
|
|
||||||
whether in tort (including negligence), contract, or otherwise,
|
|
||||||
unless required by applicable law (such as deliberate and grossly
|
|
||||||
negligent acts) or agreed to in writing, shall any Contributor be
|
|
||||||
liable to You for damages, including any direct, indirect, special,
|
|
||||||
incidental, or consequential damages of any character arising as a
|
|
||||||
result of this License or out of the use or inability to use the
|
|
||||||
Work (including but not limited to damages for loss of goodwill,
|
|
||||||
work stoppage, computer failure or malfunction, or any and all
|
|
||||||
other commercial damages or losses), even if such Contributor
|
|
||||||
has been advised of the possibility of such damages.
|
|
||||||
|
|
||||||
9. Accepting Warranty or Additional Liability. While redistributing
|
|
||||||
the Work or Derivative Works thereof, You may choose to offer,
|
|
||||||
and charge a fee for, acceptance of support, warranty, indemnity,
|
|
||||||
or other liability obligations and/or rights consistent with this
|
|
||||||
License. However, in accepting such obligations, You may act only
|
|
||||||
on Your own behalf and on Your sole responsibility, not on behalf
|
|
||||||
of any other Contributor, and only if You agree to indemnify,
|
|
||||||
defend, and hold each Contributor harmless for any liability
|
|
||||||
incurred by, or claims asserted against, such Contributor by reason
|
|
||||||
of your accepting any such warranty or additional liability.
|
|
||||||
|
|
||||||
END OF TERMS AND CONDITIONS
|
|
||||||
|
|
||||||
APPENDIX: How to apply the Apache License to your work.
|
|
||||||
|
|
||||||
To apply the Apache License to your work, attach the following
|
|
||||||
boilerplate notice, with the fields enclosed by brackets "[]"
|
|
||||||
replaced with your own identifying information. (Don't include
|
|
||||||
the brackets!) The text should be enclosed in the appropriate
|
|
||||||
comment syntax for the file format. We also recommend that a
|
|
||||||
file or class name and description of purpose be included on the
|
|
||||||
same "printed page" as the copyright notice for easier
|
|
||||||
identification within third-party archives.
|
|
||||||
|
|
||||||
Copyright 2016, The TensorFlow Authors.
|
|
||||||
|
|
||||||
Licensed under the Apache License, Version 2.0 (the "License");
|
|
||||||
you may not use this file except in compliance with the License.
|
|
||||||
You may obtain a copy of the License at
|
|
||||||
|
|
||||||
http://www.apache.org/licenses/LICENSE-2.0
|
|
||||||
|
|
||||||
Unless required by applicable law or agreed to in writing, software
|
|
||||||
distributed under the License is distributed on an "AS IS" BASIS,
|
|
||||||
WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
|
|
||||||
See the License for the specific language governing permissions and
|
|
||||||
limitations under the License.
|
|
|
@ -1,3 +0,0 @@
|
||||||
import Distribution.Simple
|
|
||||||
|
|
||||||
main = defaultMain
|
|
|
@ -1,46 +0,0 @@
|
||||||
name: tensorflow-nn
|
|
||||||
version: 0.1.0.0
|
|
||||||
synopsis: Friendly layer around TensorFlow bindings.
|
|
||||||
description: Please see README.md
|
|
||||||
homepage: https://github.com/tensorflow/haskell#readme
|
|
||||||
license: Apache
|
|
||||||
license-file: LICENSE
|
|
||||||
author: TensorFlow authors
|
|
||||||
maintainer: tensorflow-haskell@googlegroups.com
|
|
||||||
copyright: Google Inc.
|
|
||||||
category: Machine Learning
|
|
||||||
build-type: Simple
|
|
||||||
cabal-version: >=1.22
|
|
||||||
|
|
||||||
library
|
|
||||||
hs-source-dirs: src
|
|
||||||
exposed-modules: TensorFlow.NN
|
|
||||||
build-depends: base >= 4.7 && < 5
|
|
||||||
, tensorflow-core-ops == 0.1.*
|
|
||||||
, tensorflow == 0.1.*
|
|
||||||
, tensorflow-ops == 0.1.*
|
|
||||||
default-language: Haskell2010
|
|
||||||
|
|
||||||
|
|
||||||
Test-Suite NNTest
|
|
||||||
default-language: Haskell2010
|
|
||||||
type: exitcode-stdio-1.0
|
|
||||||
main-is: NNTest.hs
|
|
||||||
hs-source-dirs: tests
|
|
||||||
build-depends: HUnit
|
|
||||||
, QuickCheck
|
|
||||||
, base
|
|
||||||
, tensorflow
|
|
||||||
, tensorflow-test
|
|
||||||
, tensorflow-ops
|
|
||||||
, tensorflow-nn
|
|
||||||
, google-shim
|
|
||||||
, test-framework
|
|
||||||
, test-framework-hunit
|
|
||||||
, test-framework-quickcheck2
|
|
||||||
, vector
|
|
||||||
|
|
||||||
|
|
||||||
source-repository head
|
|
||||||
type: git
|
|
||||||
location: https://github.com/tensorflow/haskell
|
|
|
@ -17,6 +17,8 @@ library
|
||||||
exposed-modules: TensorFlow.Gradient
|
exposed-modules: TensorFlow.Gradient
|
||||||
, TensorFlow.Ops
|
, TensorFlow.Ops
|
||||||
, TensorFlow.EmbeddingOps
|
, TensorFlow.EmbeddingOps
|
||||||
|
, TensorFlow.NN
|
||||||
|
, TensorFlow.Queue
|
||||||
, TensorFlow.Variable
|
, TensorFlow.Variable
|
||||||
build-depends: proto-lens == 0.2.*
|
build-depends: proto-lens == 0.2.*
|
||||||
, base >= 4.7 && < 5
|
, base >= 4.7 && < 5
|
||||||
|
@ -54,7 +56,6 @@ Test-Suite MatrixTest
|
||||||
build-depends: base
|
build-depends: base
|
||||||
, HUnit
|
, HUnit
|
||||||
, random
|
, random
|
||||||
, google-shim
|
|
||||||
, tensorflow
|
, tensorflow
|
||||||
, tensorflow-core-ops
|
, tensorflow-core-ops
|
||||||
, tensorflow-ops
|
, tensorflow-ops
|
||||||
|
@ -73,7 +74,6 @@ Test-Suite BuildTest
|
||||||
, base
|
, base
|
||||||
, proto-lens
|
, proto-lens
|
||||||
, lens-family
|
, lens-family
|
||||||
, google-shim
|
|
||||||
, tensorflow
|
, tensorflow
|
||||||
, tensorflow-ops
|
, tensorflow-ops
|
||||||
, tensorflow-proto
|
, tensorflow-proto
|
||||||
|
@ -92,7 +92,6 @@ Test-Suite EmbeddingOpsTest
|
||||||
, base
|
, base
|
||||||
, proto-lens
|
, proto-lens
|
||||||
, lens-family
|
, lens-family
|
||||||
, google-shim
|
|
||||||
, tensorflow
|
, tensorflow
|
||||||
, tensorflow-test
|
, tensorflow-test
|
||||||
, tensorflow-core-ops
|
, tensorflow-core-ops
|
||||||
|
@ -114,7 +113,6 @@ Test-Suite ArrayOpsTest
|
||||||
, base
|
, base
|
||||||
, proto-lens
|
, proto-lens
|
||||||
, lens-family
|
, lens-family
|
||||||
, google-shim
|
|
||||||
, tensorflow
|
, tensorflow
|
||||||
, tensorflow-core-ops
|
, tensorflow-core-ops
|
||||||
, tensorflow-ops
|
, tensorflow-ops
|
||||||
|
@ -136,7 +134,6 @@ Test-Suite OpsTest
|
||||||
, bytestring
|
, bytestring
|
||||||
, proto-lens
|
, proto-lens
|
||||||
, lens-family
|
, lens-family
|
||||||
, google-shim
|
|
||||||
, temporary
|
, temporary
|
||||||
, tensorflow
|
, tensorflow
|
||||||
, tensorflow-core-ops
|
, tensorflow-core-ops
|
||||||
|
@ -155,7 +152,6 @@ Test-Suite VariableTest
|
||||||
hs-source-dirs: tests
|
hs-source-dirs: tests
|
||||||
build-depends: HUnit
|
build-depends: HUnit
|
||||||
, base
|
, base
|
||||||
, google-shim
|
|
||||||
, tensorflow
|
, tensorflow
|
||||||
, tensorflow-core-ops
|
, tensorflow-core-ops
|
||||||
, tensorflow-ops
|
, tensorflow-ops
|
||||||
|
@ -175,7 +171,6 @@ Test-Suite DataFlowOpsTest
|
||||||
, base
|
, base
|
||||||
, proto-lens
|
, proto-lens
|
||||||
, lens-family
|
, lens-family
|
||||||
, google-shim
|
|
||||||
, tensorflow
|
, tensorflow
|
||||||
, tensorflow-core-ops
|
, tensorflow-core-ops
|
||||||
, tensorflow-ops
|
, tensorflow-ops
|
||||||
|
@ -194,7 +189,6 @@ Test-Suite GradientTest
|
||||||
, base
|
, base
|
||||||
, proto-lens
|
, proto-lens
|
||||||
, lens-family
|
, lens-family
|
||||||
, google-shim
|
|
||||||
, tensorflow
|
, tensorflow
|
||||||
, tensorflow-core-ops
|
, tensorflow-core-ops
|
||||||
, tensorflow-ops
|
, tensorflow-ops
|
||||||
|
@ -213,7 +207,6 @@ Test-Suite MiscTest
|
||||||
, base
|
, base
|
||||||
, bytestring
|
, bytestring
|
||||||
, vector
|
, vector
|
||||||
, google-shim
|
|
||||||
, transformers
|
, transformers
|
||||||
, tensorflow
|
, tensorflow
|
||||||
, tensorflow-core-ops
|
, tensorflow-core-ops
|
||||||
|
@ -222,6 +215,42 @@ Test-Suite MiscTest
|
||||||
, test-framework
|
, test-framework
|
||||||
, test-framework-hunit
|
, test-framework-hunit
|
||||||
|
|
||||||
|
Test-Suite NNTest
|
||||||
|
default-language: Haskell2010
|
||||||
|
type: exitcode-stdio-1.0
|
||||||
|
main-is: NNTest.hs
|
||||||
|
hs-source-dirs: tests
|
||||||
|
build-depends: HUnit
|
||||||
|
, QuickCheck
|
||||||
|
, base
|
||||||
|
, tensorflow
|
||||||
|
, tensorflow-test
|
||||||
|
, tensorflow-ops
|
||||||
|
, test-framework
|
||||||
|
, test-framework-hunit
|
||||||
|
, test-framework-quickcheck2
|
||||||
|
, vector
|
||||||
|
|
||||||
|
Test-Suite QueueTest
|
||||||
|
default-language: Haskell2010
|
||||||
|
type: exitcode-stdio-1.0
|
||||||
|
main-is: QueueTest.hs
|
||||||
|
hs-source-dirs: tests
|
||||||
|
-- Uses multiple threads and blocks without this option.
|
||||||
|
ghc-options: -threaded
|
||||||
|
build-depends: HUnit
|
||||||
|
, base
|
||||||
|
, bytestring
|
||||||
|
, proto-lens
|
||||||
|
, lens-family
|
||||||
|
, tensorflow
|
||||||
|
, tensorflow-core-ops
|
||||||
|
, tensorflow-ops
|
||||||
|
, test-framework
|
||||||
|
, test-framework-hunit
|
||||||
|
, transformers
|
||||||
|
, vector
|
||||||
|
|
||||||
Test-Suite TracingTest
|
Test-Suite TracingTest
|
||||||
default-language: Haskell2010
|
default-language: Haskell2010
|
||||||
type: exitcode-stdio-1.0
|
type: exitcode-stdio-1.0
|
||||||
|
@ -248,7 +277,6 @@ Test-Suite TypesTest
|
||||||
, bytestring
|
, bytestring
|
||||||
, proto-lens
|
, proto-lens
|
||||||
, lens-family
|
, lens-family
|
||||||
, google-shim
|
|
||||||
, tensorflow
|
, tensorflow
|
||||||
, tensorflow-core-ops
|
, tensorflow-core-ops
|
||||||
, tensorflow-ops
|
, tensorflow-ops
|
||||||
|
|
|
@ -17,8 +17,7 @@ module Main where
|
||||||
|
|
||||||
import Control.Monad.IO.Class (liftIO)
|
import Control.Monad.IO.Class (liftIO)
|
||||||
import Data.Int (Int64)
|
import Data.Int (Int64)
|
||||||
import Google.Test (googleTest)
|
import Test.Framework (defaultMain, Test)
|
||||||
import Test.Framework (Test)
|
|
||||||
import Test.Framework.Providers.HUnit (testCase)
|
import Test.Framework.Providers.HUnit (testCase)
|
||||||
import Test.HUnit ((@=?))
|
import Test.HUnit ((@=?))
|
||||||
import qualified Data.Vector as V
|
import qualified Data.Vector as V
|
||||||
|
@ -47,6 +46,6 @@ testShapeN = testCase "testShapeN" $ TF.runSession $ do
|
||||||
liftIO $ [V.fromList [1], V.fromList [2,3]] @=? (result :: [V.Vector Int64])
|
liftIO $ [V.fromList [1], V.fromList [2,3]] @=? (result :: [V.Vector Int64])
|
||||||
|
|
||||||
main :: IO ()
|
main :: IO ()
|
||||||
main = googleTest [ testSplit
|
main = defaultMain [ testSplit
|
||||||
, testShapeN
|
, testShapeN
|
||||||
]
|
]
|
||||||
|
|
|
@ -60,10 +60,9 @@ import TensorFlow.Session
|
||||||
, runSession
|
, runSession
|
||||||
, run_
|
, run_
|
||||||
)
|
)
|
||||||
import Test.Framework (Test)
|
import Test.Framework (defaultMain, Test)
|
||||||
import Test.Framework.Providers.HUnit (testCase)
|
import Test.Framework.Providers.HUnit (testCase)
|
||||||
import Test.HUnit ((@=?))
|
import Test.HUnit ((@=?))
|
||||||
import Google.Test (googleTest)
|
|
||||||
import qualified Data.Vector as V
|
import qualified Data.Vector as V
|
||||||
|
|
||||||
-- | Test 'opName' behavior.
|
-- | Test 'opName' behavior.
|
||||||
|
@ -165,7 +164,8 @@ testDeviceColocation = testCase "testDeviceColocation" $ evalBuildT $ do
|
||||||
return ()
|
return ()
|
||||||
|
|
||||||
main :: IO ()
|
main :: IO ()
|
||||||
main = googleTest [ testInitializedVariable
|
main = defaultMain
|
||||||
|
[ testInitializedVariable
|
||||||
, testInitializedVariableShape
|
, testInitializedVariableShape
|
||||||
, testDeviceColocation
|
, testDeviceColocation
|
||||||
, testOpName
|
, testOpName
|
||||||
|
|
|
@ -17,7 +17,7 @@
|
||||||
|
|
||||||
import Data.Int (Int32, Int64)
|
import Data.Int (Int32, Int64)
|
||||||
import Data.List (genericLength)
|
import Data.List (genericLength)
|
||||||
import Google.Test (googleTest)
|
import Test.Framework (defaultMain)
|
||||||
import Test.Framework.Providers.QuickCheck2 (testProperty)
|
import Test.Framework.Providers.QuickCheck2 (testProperty)
|
||||||
import Test.HUnit ((@=?))
|
import Test.HUnit ((@=?))
|
||||||
import Test.QuickCheck (Arbitrary(..), Property, choose, vectorOf)
|
import Test.QuickCheck (Arbitrary(..), Property, choose, vectorOf)
|
||||||
|
@ -59,7 +59,7 @@ instance Arbitrary a => Arbitrary (StitchExample a) where
|
||||||
return $ StitchExample numParts values partitions
|
return $ StitchExample numParts values partitions
|
||||||
|
|
||||||
main :: IO ()
|
main :: IO ()
|
||||||
main = googleTest
|
main = defaultMain
|
||||||
[ testProperty "DynamicPartitionStitchInverse"
|
[ testProperty "DynamicPartitionStitchInverse"
|
||||||
(testDynamicPartitionStitchInverse :: StitchExample Int64 -> Property)
|
(testDynamicPartitionStitchInverse :: StitchExample Int64 -> Property)
|
||||||
]
|
]
|
||||||
|
|
|
@ -22,9 +22,8 @@ module Main where
|
||||||
import Control.Monad.IO.Class (liftIO)
|
import Control.Monad.IO.Class (liftIO)
|
||||||
import Data.Int (Int32, Int64)
|
import Data.Int (Int32, Int64)
|
||||||
import Data.List (genericLength)
|
import Data.List (genericLength)
|
||||||
import Google.Test (googleTest)
|
|
||||||
import TensorFlow.EmbeddingOps (embeddingLookup)
|
import TensorFlow.EmbeddingOps (embeddingLookup)
|
||||||
import Test.Framework (Test)
|
import Test.Framework (defaultMain, Test)
|
||||||
import Test.Framework.Providers.QuickCheck2 (testProperty)
|
import Test.Framework.Providers.QuickCheck2 (testProperty)
|
||||||
import Test.HUnit ((@=?))
|
import Test.HUnit ((@=?))
|
||||||
import Test.Framework.Providers.HUnit (testCase)
|
import Test.Framework.Providers.HUnit (testCase)
|
||||||
|
@ -169,7 +168,7 @@ instance Arbitrary a => Arbitrary (LookupExample a) where
|
||||||
return $ LookupExample numParts (TF.Shape shape) values indices
|
return $ LookupExample numParts (TF.Shape shape) values indices
|
||||||
|
|
||||||
main :: IO ()
|
main :: IO ()
|
||||||
main = googleTest
|
main = defaultMain
|
||||||
[ testProperty "EmbeddingLookupUndoesSplit"
|
[ testProperty "EmbeddingLookupUndoesSplit"
|
||||||
(testEmbeddingLookupUndoesSplit :: LookupExample Double -> Property)
|
(testEmbeddingLookupUndoesSplit :: LookupExample Double -> Property)
|
||||||
, testEmbeddingLookupHasRightShape
|
, testEmbeddingLookupHasRightShape
|
||||||
|
|
|
@ -20,10 +20,9 @@
|
||||||
import Data.Int (Int32, Int64)
|
import Data.Int (Int32, Int64)
|
||||||
import Data.List (sort)
|
import Data.List (sort)
|
||||||
import Data.ProtoLens.TextFormat (showMessage)
|
import Data.ProtoLens.TextFormat (showMessage)
|
||||||
import Google.Test (googleTest)
|
import Test.Framework (defaultMain, Test)
|
||||||
import Lens.Family2 ((^..), (.~))
|
import Lens.Family2 ((^..), (.~))
|
||||||
|
|
||||||
import Test.Framework (Test)
|
|
||||||
import Test.Framework.Providers.HUnit (testCase)
|
import Test.Framework.Providers.HUnit (testCase)
|
||||||
import Test.HUnit ((@=?), assertEqual)
|
import Test.HUnit ((@=?), assertEqual)
|
||||||
import qualified Data.Vector as V
|
import qualified Data.Vector as V
|
||||||
|
@ -292,7 +291,8 @@ transAttrs a b =
|
||||||
(TF.opAttr "transpose_a" .~ a) . (TF.opAttr "transpose_b" .~ b)
|
(TF.opAttr "transpose_a" .~ a) . (TF.opAttr "transpose_b" .~ b)
|
||||||
|
|
||||||
main :: IO ()
|
main :: IO ()
|
||||||
main = googleTest [ testGradientSimple
|
main = defaultMain
|
||||||
|
[ testGradientSimple
|
||||||
, testGradientDisconnected
|
, testGradientDisconnected
|
||||||
, testCreateGraphStateful
|
, testCreateGraphStateful
|
||||||
, testCreateGraphNameScopes
|
, testCreateGraphNameScopes
|
||||||
|
|
|
@ -10,10 +10,9 @@ import qualified TensorFlow.Gradient as TF
|
||||||
import qualified TensorFlow.Ops as TF
|
import qualified TensorFlow.Ops as TF
|
||||||
import qualified Data.Vector as V
|
import qualified Data.Vector as V
|
||||||
|
|
||||||
import Test.Framework (Test)
|
import Test.Framework (defaultMain, Test)
|
||||||
import Test.Framework.Providers.HUnit (testCase)
|
import Test.Framework.Providers.HUnit (testCase)
|
||||||
import TensorFlow.Test (assertAllClose)
|
import TensorFlow.Test (assertAllClose)
|
||||||
import Google.Test (googleTest)
|
|
||||||
|
|
||||||
randomParam :: TF.Shape -> TF.Session (TF.Tensor TF.Value Float)
|
randomParam :: TF.Shape -> TF.Session (TF.Tensor TF.Value Float)
|
||||||
randomParam (TF.Shape shape) = TF.truncatedNormal (TF.vector shape)
|
randomParam (TF.Shape shape) = TF.truncatedNormal (TF.vector shape)
|
||||||
|
@ -45,4 +44,4 @@ gradientDescent alpha loss params = do
|
||||||
TF.group =<< zipWithM applyGrad params =<< TF.gradients loss params
|
TF.group =<< zipWithM applyGrad params =<< TF.gradients loss params
|
||||||
|
|
||||||
main :: IO ()
|
main :: IO ()
|
||||||
main = googleTest [ fitMatrix ]
|
main = defaultMain [ fitMatrix ]
|
||||||
|
|
|
@ -19,10 +19,9 @@ module Main where
|
||||||
|
|
||||||
import Control.Monad.IO.Class (liftIO)
|
import Control.Monad.IO.Class (liftIO)
|
||||||
import Data.Int (Int32)
|
import Data.Int (Int32)
|
||||||
import Test.Framework (Test)
|
import Test.Framework (defaultMain, Test)
|
||||||
import Test.Framework.Providers.HUnit (testCase)
|
import Test.Framework.Providers.HUnit (testCase)
|
||||||
import Test.HUnit ((@=?))
|
import Test.HUnit ((@=?))
|
||||||
import Google.Test
|
|
||||||
import qualified Data.Vector as V
|
import qualified Data.Vector as V
|
||||||
import qualified TensorFlow.GenOps.Core as CoreOps
|
import qualified TensorFlow.GenOps.Core as CoreOps
|
||||||
|
|
||||||
|
@ -46,6 +45,6 @@ testVarargs = testCase "testVarargs" $
|
||||||
liftIO $ [1..8] @=? V.toList (xs :: V.Vector Float)
|
liftIO $ [1..8] @=? V.toList (xs :: V.Vector Float)
|
||||||
|
|
||||||
main :: IO ()
|
main :: IO ()
|
||||||
main = googleTest [ testMultipleOutputs
|
main = defaultMain [ testMultipleOutputs
|
||||||
, testVarargs
|
, testVarargs
|
||||||
]
|
]
|
||||||
|
|
|
@ -17,9 +17,8 @@
|
||||||
|
|
||||||
module Main where
|
module Main where
|
||||||
|
|
||||||
import Google.Test (googleTest)
|
|
||||||
import TensorFlow.Test (assertAllClose)
|
import TensorFlow.Test (assertAllClose)
|
||||||
import Test.Framework (Test)
|
import Test.Framework (defaultMain, Test)
|
||||||
import Test.Framework.Providers.HUnit (testCase)
|
import Test.Framework.Providers.HUnit (testCase)
|
||||||
import qualified Data.Vector as V
|
import qualified Data.Vector as V
|
||||||
import qualified TensorFlow.Gradient as TF
|
import qualified TensorFlow.Gradient as TF
|
||||||
|
@ -97,7 +96,8 @@ run :: TF.Fetchable t a => TF.Session t -> IO a
|
||||||
run = TF.runSession . (>>= TF.run)
|
run = TF.runSession . (>>= TF.run)
|
||||||
|
|
||||||
main :: IO ()
|
main :: IO ()
|
||||||
main = googleTest [ testGradientAtZero
|
main = defaultMain
|
||||||
|
[ testGradientAtZero
|
||||||
, testLogisticOutput
|
, testLogisticOutput
|
||||||
, testLogisticOutputMultipleDim
|
, testLogisticOutputMultipleDim
|
||||||
]
|
]
|
|
@ -19,10 +19,9 @@ module Main where
|
||||||
|
|
||||||
import Control.Monad.IO.Class (liftIO)
|
import Control.Monad.IO.Class (liftIO)
|
||||||
import Data.Int (Int32, Int64)
|
import Data.Int (Int32, Int64)
|
||||||
import Google.Test (googleTest)
|
import Test.Framework (defaultMain, Test)
|
||||||
import Lens.Family2 ((.~))
|
import Lens.Family2 ((.~))
|
||||||
import System.IO.Temp (withSystemTempDirectory)
|
import System.IO.Temp (withSystemTempDirectory)
|
||||||
import Test.Framework (Test)
|
|
||||||
import Test.Framework.Providers.HUnit (testCase)
|
import Test.Framework.Providers.HUnit (testCase)
|
||||||
import Test.HUnit ((@=?))
|
import Test.HUnit ((@=?))
|
||||||
import qualified Data.ByteString.Char8 as B8
|
import qualified Data.ByteString.Char8 as B8
|
||||||
|
@ -106,7 +105,8 @@ testRereadRef = testCase "testReRunAssign" $ TF.runSession $ do
|
||||||
liftIO $ (0.0, 0.1) @=? (TF.unScalar f0, TF.unScalar f1)
|
liftIO $ (0.0, 0.1) @=? (TF.unScalar f0, TF.unScalar f1)
|
||||||
|
|
||||||
main :: IO ()
|
main :: IO ()
|
||||||
main = googleTest [ testSaveRestore
|
main = defaultMain
|
||||||
|
[ testSaveRestore
|
||||||
, testSize
|
, testSize
|
||||||
, testReducedShape
|
, testReducedShape
|
||||||
, testPlaceholderCse
|
, testPlaceholderCse
|
||||||
|
|
|
@ -20,7 +20,7 @@ module Main where
|
||||||
|
|
||||||
import Control.Monad.IO.Class (liftIO)
|
import Control.Monad.IO.Class (liftIO)
|
||||||
import Data.Int (Int64)
|
import Data.Int (Int64)
|
||||||
import Google.Test (googleTest)
|
import Test.Framework (defaultMain, Test)
|
||||||
import TensorFlow.Types (ListOf(..), Scalar(..), (/:/))
|
import TensorFlow.Types (ListOf(..), Scalar(..), (/:/))
|
||||||
import TensorFlow.Ops (scalar)
|
import TensorFlow.Ops (scalar)
|
||||||
import TensorFlow.Queue
|
import TensorFlow.Queue
|
||||||
|
@ -31,7 +31,6 @@ import TensorFlow.Session
|
||||||
, runSession
|
, runSession
|
||||||
, run_
|
, run_
|
||||||
)
|
)
|
||||||
import Test.Framework (Test)
|
|
||||||
import Test.Framework.Providers.HUnit (testCase)
|
import Test.Framework.Providers.HUnit (testCase)
|
||||||
import Test.HUnit ((@=?))
|
import Test.HUnit ((@=?))
|
||||||
import qualified Data.ByteString as BS
|
import qualified Data.ByteString as BS
|
||||||
|
@ -85,7 +84,8 @@ testAsync = testCase "testAsync" $ runSession $ do
|
||||||
run deq >>= liftIO . (expected @=?)
|
run deq >>= liftIO . (expected @=?)
|
||||||
|
|
||||||
main :: IO ()
|
main :: IO ()
|
||||||
main = googleTest [ testBasic
|
main = defaultMain
|
||||||
|
[ testBasic
|
||||||
, testPump
|
, testPump
|
||||||
, testAsync
|
, testAsync
|
||||||
]
|
]
|
|
@ -26,8 +26,7 @@
|
||||||
import Control.Monad (replicateM)
|
import Control.Monad (replicateM)
|
||||||
import Control.Monad.IO.Class (liftIO)
|
import Control.Monad.IO.Class (liftIO)
|
||||||
import Data.Int (Int64)
|
import Data.Int (Int64)
|
||||||
import Google.Test (googleTest)
|
import Test.Framework (defaultMain, Test)
|
||||||
import Test.Framework (Test)
|
|
||||||
import Test.Framework.Providers.HUnit (testCase)
|
import Test.Framework.Providers.HUnit (testCase)
|
||||||
import Test.Framework.Providers.QuickCheck2 (testProperty)
|
import Test.Framework.Providers.QuickCheck2 (testProperty)
|
||||||
import Test.HUnit ((@=?))
|
import Test.HUnit ((@=?))
|
||||||
|
@ -126,7 +125,8 @@ typeConstraintTests = testCase "type constraints" $ do
|
||||||
|
|
||||||
|
|
||||||
main :: IO ()
|
main :: IO ()
|
||||||
main = googleTest [ testFFIRoundTrip
|
main = defaultMain
|
||||||
|
[ testFFIRoundTrip
|
||||||
, testEncodeDecodeQcFloat
|
, testEncodeDecodeQcFloat
|
||||||
, testEncodeDecodeQcInt64
|
, testEncodeDecodeQcInt64
|
||||||
, testEncodeDecodeQcString
|
, testEncodeDecodeQcString
|
||||||
|
|
|
@ -3,7 +3,6 @@ module Main (main) where
|
||||||
|
|
||||||
import Control.Monad.IO.Class (liftIO)
|
import Control.Monad.IO.Class (liftIO)
|
||||||
import qualified Data.Vector.Storable as V
|
import qualified Data.Vector.Storable as V
|
||||||
import Google.Test (googleTest)
|
|
||||||
import TensorFlow.Core
|
import TensorFlow.Core
|
||||||
( unScalar
|
( unScalar
|
||||||
, render
|
, render
|
||||||
|
@ -19,12 +18,13 @@ import TensorFlow.Variable
|
||||||
, assignAdd
|
, assignAdd
|
||||||
, variable
|
, variable
|
||||||
)
|
)
|
||||||
import Test.Framework (Test)
|
import Test.Framework (defaultMain, Test)
|
||||||
import Test.Framework.Providers.HUnit (testCase)
|
import Test.Framework.Providers.HUnit (testCase)
|
||||||
import Test.HUnit ((@=?))
|
import Test.HUnit ((@=?))
|
||||||
|
|
||||||
main :: IO ()
|
main :: IO ()
|
||||||
main = googleTest [ testInitializedVariable
|
main = defaultMain
|
||||||
|
[ testInitializedVariable
|
||||||
, testInitializedVariableShape
|
, testInitializedVariableShape
|
||||||
, testDependency
|
, testDependency
|
||||||
, testRereadRef
|
, testRereadRef
|
||||||
|
|
|
@ -1,203 +0,0 @@
|
||||||
Copyright 2016 The TensorFlow Authors. All rights reserved.
|
|
||||||
|
|
||||||
Apache License
|
|
||||||
Version 2.0, January 2004
|
|
||||||
http://www.apache.org/licenses/
|
|
||||||
|
|
||||||
TERMS AND CONDITIONS FOR USE, REPRODUCTION, AND DISTRIBUTION
|
|
||||||
|
|
||||||
1. Definitions.
|
|
||||||
|
|
||||||
"License" shall mean the terms and conditions for use, reproduction,
|
|
||||||
and distribution as defined by Sections 1 through 9 of this document.
|
|
||||||
|
|
||||||
"Licensor" shall mean the copyright owner or entity authorized by
|
|
||||||
the copyright owner that is granting the License.
|
|
||||||
|
|
||||||
"Legal Entity" shall mean the union of the acting entity and all
|
|
||||||
other entities that control, are controlled by, or are under common
|
|
||||||
control with that entity. For the purposes of this definition,
|
|
||||||
"control" means (i) the power, direct or indirect, to cause the
|
|
||||||
direction or management of such entity, whether by contract or
|
|
||||||
otherwise, or (ii) ownership of fifty percent (50%) or more of the
|
|
||||||
outstanding shares, or (iii) beneficial ownership of such entity.
|
|
||||||
|
|
||||||
"You" (or "Your") shall mean an individual or Legal Entity
|
|
||||||
exercising permissions granted by this License.
|
|
||||||
|
|
||||||
"Source" form shall mean the preferred form for making modifications,
|
|
||||||
including but not limited to software source code, documentation
|
|
||||||
source, and configuration files.
|
|
||||||
|
|
||||||
"Object" form shall mean any form resulting from mechanical
|
|
||||||
transformation or translation of a Source form, including but
|
|
||||||
not limited to compiled object code, generated documentation,
|
|
||||||
and conversions to other media types.
|
|
||||||
|
|
||||||
"Work" shall mean the work of authorship, whether in Source or
|
|
||||||
Object form, made available under the License, as indicated by a
|
|
||||||
copyright notice that is included in or attached to the work
|
|
||||||
(an example is provided in the Appendix below).
|
|
||||||
|
|
||||||
"Derivative Works" shall mean any work, whether in Source or Object
|
|
||||||
form, that is based on (or derived from) the Work and for which the
|
|
||||||
editorial revisions, annotations, elaborations, or other modifications
|
|
||||||
represent, as a whole, an original work of authorship. For the purposes
|
|
||||||
of this License, Derivative Works shall not include works that remain
|
|
||||||
separable from, or merely link (or bind by name) to the interfaces of,
|
|
||||||
the Work and Derivative Works thereof.
|
|
||||||
|
|
||||||
"Contribution" shall mean any work of authorship, including
|
|
||||||
the original version of the Work and any modifications or additions
|
|
||||||
to that Work or Derivative Works thereof, that is intentionally
|
|
||||||
submitted to Licensor for inclusion in the Work by the copyright owner
|
|
||||||
or by an individual or Legal Entity authorized to submit on behalf of
|
|
||||||
the copyright owner. For the purposes of this definition, "submitted"
|
|
||||||
means any form of electronic, verbal, or written communication sent
|
|
||||||
to the Licensor or its representatives, including but not limited to
|
|
||||||
communication on electronic mailing lists, source code control systems,
|
|
||||||
and issue tracking systems that are managed by, or on behalf of, the
|
|
||||||
Licensor for the purpose of discussing and improving the Work, but
|
|
||||||
excluding communication that is conspicuously marked or otherwise
|
|
||||||
designated in writing by the copyright owner as "Not a Contribution."
|
|
||||||
|
|
||||||
"Contributor" shall mean Licensor and any individual or Legal Entity
|
|
||||||
on behalf of whom a Contribution has been received by Licensor and
|
|
||||||
subsequently incorporated within the Work.
|
|
||||||
|
|
||||||
2. Grant of Copyright License. Subject to the terms and conditions of
|
|
||||||
this License, each Contributor hereby grants to You a perpetual,
|
|
||||||
worldwide, non-exclusive, no-charge, royalty-free, irrevocable
|
|
||||||
copyright license to reproduce, prepare Derivative Works of,
|
|
||||||
publicly display, publicly perform, sublicense, and distribute the
|
|
||||||
Work and such Derivative Works in Source or Object form.
|
|
||||||
|
|
||||||
3. Grant of Patent License. Subject to the terms and conditions of
|
|
||||||
this License, each Contributor hereby grants to You a perpetual,
|
|
||||||
worldwide, non-exclusive, no-charge, royalty-free, irrevocable
|
|
||||||
(except as stated in this section) patent license to make, have made,
|
|
||||||
use, offer to sell, sell, import, and otherwise transfer the Work,
|
|
||||||
where such license applies only to those patent claims licensable
|
|
||||||
by such Contributor that are necessarily infringed by their
|
|
||||||
Contribution(s) alone or by combination of their Contribution(s)
|
|
||||||
with the Work to which such Contribution(s) was submitted. If You
|
|
||||||
institute patent litigation against any entity (including a
|
|
||||||
cross-claim or counterclaim in a lawsuit) alleging that the Work
|
|
||||||
or a Contribution incorporated within the Work constitutes direct
|
|
||||||
or contributory patent infringement, then any patent licenses
|
|
||||||
granted to You under this License for that Work shall terminate
|
|
||||||
as of the date such litigation is filed.
|
|
||||||
|
|
||||||
4. Redistribution. You may reproduce and distribute copies of the
|
|
||||||
Work or Derivative Works thereof in any medium, with or without
|
|
||||||
modifications, and in Source or Object form, provided that You
|
|
||||||
meet the following conditions:
|
|
||||||
|
|
||||||
(a) You must give any other recipients of the Work or
|
|
||||||
Derivative Works a copy of this License; and
|
|
||||||
|
|
||||||
(b) You must cause any modified files to carry prominent notices
|
|
||||||
stating that You changed the files; and
|
|
||||||
|
|
||||||
(c) You must retain, in the Source form of any Derivative Works
|
|
||||||
that You distribute, all copyright, patent, trademark, and
|
|
||||||
attribution notices from the Source form of the Work,
|
|
||||||
excluding those notices that do not pertain to any part of
|
|
||||||
the Derivative Works; and
|
|
||||||
|
|
||||||
(d) If the Work includes a "NOTICE" text file as part of its
|
|
||||||
distribution, then any Derivative Works that You distribute must
|
|
||||||
include a readable copy of the attribution notices contained
|
|
||||||
within such NOTICE file, excluding those notices that do not
|
|
||||||
pertain to any part of the Derivative Works, in at least one
|
|
||||||
of the following places: within a NOTICE text file distributed
|
|
||||||
as part of the Derivative Works; within the Source form or
|
|
||||||
documentation, if provided along with the Derivative Works; or,
|
|
||||||
within a display generated by the Derivative Works, if and
|
|
||||||
wherever such third-party notices normally appear. The contents
|
|
||||||
of the NOTICE file are for informational purposes only and
|
|
||||||
do not modify the License. You may add Your own attribution
|
|
||||||
notices within Derivative Works that You distribute, alongside
|
|
||||||
or as an addendum to the NOTICE text from the Work, provided
|
|
||||||
that such additional attribution notices cannot be construed
|
|
||||||
as modifying the License.
|
|
||||||
|
|
||||||
You may add Your own copyright statement to Your modifications and
|
|
||||||
may provide additional or different license terms and conditions
|
|
||||||
for use, reproduction, or distribution of Your modifications, or
|
|
||||||
for any such Derivative Works as a whole, provided Your use,
|
|
||||||
reproduction, and distribution of the Work otherwise complies with
|
|
||||||
the conditions stated in this License.
|
|
||||||
|
|
||||||
5. Submission of Contributions. Unless You explicitly state otherwise,
|
|
||||||
any Contribution intentionally submitted for inclusion in the Work
|
|
||||||
by You to the Licensor shall be under the terms and conditions of
|
|
||||||
this License, without any additional terms or conditions.
|
|
||||||
Notwithstanding the above, nothing herein shall supersede or modify
|
|
||||||
the terms of any separate license agreement you may have executed
|
|
||||||
with Licensor regarding such Contributions.
|
|
||||||
|
|
||||||
6. Trademarks. This License does not grant permission to use the trade
|
|
||||||
names, trademarks, service marks, or product names of the Licensor,
|
|
||||||
except as required for reasonable and customary use in describing the
|
|
||||||
origin of the Work and reproducing the content of the NOTICE file.
|
|
||||||
|
|
||||||
7. Disclaimer of Warranty. Unless required by applicable law or
|
|
||||||
agreed to in writing, Licensor provides the Work (and each
|
|
||||||
Contributor provides its Contributions) on an "AS IS" BASIS,
|
|
||||||
WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
|
|
||||||
implied, including, without limitation, any warranties or conditions
|
|
||||||
of TITLE, NON-INFRINGEMENT, MERCHANTABILITY, or FITNESS FOR A
|
|
||||||
PARTICULAR PURPOSE. You are solely responsible for determining the
|
|
||||||
appropriateness of using or redistributing the Work and assume any
|
|
||||||
risks associated with Your exercise of permissions under this License.
|
|
||||||
|
|
||||||
8. Limitation of Liability. In no event and under no legal theory,
|
|
||||||
whether in tort (including negligence), contract, or otherwise,
|
|
||||||
unless required by applicable law (such as deliberate and grossly
|
|
||||||
negligent acts) or agreed to in writing, shall any Contributor be
|
|
||||||
liable to You for damages, including any direct, indirect, special,
|
|
||||||
incidental, or consequential damages of any character arising as a
|
|
||||||
result of this License or out of the use or inability to use the
|
|
||||||
Work (including but not limited to damages for loss of goodwill,
|
|
||||||
work stoppage, computer failure or malfunction, or any and all
|
|
||||||
other commercial damages or losses), even if such Contributor
|
|
||||||
has been advised of the possibility of such damages.
|
|
||||||
|
|
||||||
9. Accepting Warranty or Additional Liability. While redistributing
|
|
||||||
the Work or Derivative Works thereof, You may choose to offer,
|
|
||||||
and charge a fee for, acceptance of support, warranty, indemnity,
|
|
||||||
or other liability obligations and/or rights consistent with this
|
|
||||||
License. However, in accepting such obligations, You may act only
|
|
||||||
on Your own behalf and on Your sole responsibility, not on behalf
|
|
||||||
of any other Contributor, and only if You agree to indemnify,
|
|
||||||
defend, and hold each Contributor harmless for any liability
|
|
||||||
incurred by, or claims asserted against, such Contributor by reason
|
|
||||||
of your accepting any such warranty or additional liability.
|
|
||||||
|
|
||||||
END OF TERMS AND CONDITIONS
|
|
||||||
|
|
||||||
APPENDIX: How to apply the Apache License to your work.
|
|
||||||
|
|
||||||
To apply the Apache License to your work, attach the following
|
|
||||||
boilerplate notice, with the fields enclosed by brackets "[]"
|
|
||||||
replaced with your own identifying information. (Don't include
|
|
||||||
the brackets!) The text should be enclosed in the appropriate
|
|
||||||
comment syntax for the file format. We also recommend that a
|
|
||||||
file or class name and description of purpose be included on the
|
|
||||||
same "printed page" as the copyright notice for easier
|
|
||||||
identification within third-party archives.
|
|
||||||
|
|
||||||
Copyright 2016, The TensorFlow Authors.
|
|
||||||
|
|
||||||
Licensed under the Apache License, Version 2.0 (the "License");
|
|
||||||
you may not use this file except in compliance with the License.
|
|
||||||
You may obtain a copy of the License at
|
|
||||||
|
|
||||||
http://www.apache.org/licenses/LICENSE-2.0
|
|
||||||
|
|
||||||
Unless required by applicable law or agreed to in writing, software
|
|
||||||
distributed under the License is distributed on an "AS IS" BASIS,
|
|
||||||
WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
|
|
||||||
See the License for the specific language governing permissions and
|
|
||||||
limitations under the License.
|
|
|
@ -1,3 +0,0 @@
|
||||||
import Distribution.Simple
|
|
||||||
|
|
||||||
main = defaultMain
|
|
|
@ -1,53 +0,0 @@
|
||||||
name: tensorflow-queue
|
|
||||||
version: 0.1.0.0
|
|
||||||
synopsis: Basic access to TensorFlow queues.
|
|
||||||
description: Please see README.md
|
|
||||||
homepage: https://github.com/tensorflow/haskell#readme
|
|
||||||
license: Apache
|
|
||||||
license-file: LICENSE
|
|
||||||
author: TensorFlow authors
|
|
||||||
maintainer: tensorflow-haskell@googlegroups.com
|
|
||||||
copyright: Google Inc.
|
|
||||||
category: Machine Learning
|
|
||||||
build-type: Simple
|
|
||||||
cabal-version: >=1.22
|
|
||||||
|
|
||||||
library
|
|
||||||
hs-source-dirs: src
|
|
||||||
exposed-modules: TensorFlow.Queue
|
|
||||||
build-depends: proto-lens == 0.2.*
|
|
||||||
, base >= 4.7 && < 5
|
|
||||||
, bytestring
|
|
||||||
, lens-family
|
|
||||||
, containers
|
|
||||||
, tensorflow-proto == 0.1.*
|
|
||||||
, tensorflow-core-ops == 0.1.*
|
|
||||||
, tensorflow
|
|
||||||
, text
|
|
||||||
default-language: Haskell2010
|
|
||||||
|
|
||||||
Test-Suite QueueTest
|
|
||||||
default-language: Haskell2010
|
|
||||||
type: exitcode-stdio-1.0
|
|
||||||
main-is: QueueTest.hs
|
|
||||||
hs-source-dirs: tests
|
|
||||||
-- Uses multiple threads and blocks without this option.
|
|
||||||
ghc-options: -threaded
|
|
||||||
build-depends: HUnit
|
|
||||||
, base
|
|
||||||
, bytestring
|
|
||||||
, proto-lens
|
|
||||||
, lens-family
|
|
||||||
, google-shim
|
|
||||||
, tensorflow
|
|
||||||
, tensorflow-core-ops
|
|
||||||
, tensorflow-ops
|
|
||||||
, tensorflow-queue
|
|
||||||
, test-framework
|
|
||||||
, test-framework-hunit
|
|
||||||
, transformers
|
|
||||||
, vector
|
|
||||||
|
|
||||||
source-repository head
|
|
||||||
type: git
|
|
||||||
location: https://github.com/tensorflow/haskell
|
|
|
@ -85,7 +85,6 @@ Test-Suite VarIntTest
|
||||||
build-depends: base
|
build-depends: base
|
||||||
, attoparsec
|
, attoparsec
|
||||||
, bytestring
|
, bytestring
|
||||||
, google-shim
|
|
||||||
, tensorflow
|
, tensorflow
|
||||||
, test-framework
|
, test-framework
|
||||||
, test-framework-quickcheck2
|
, test-framework-quickcheck2
|
||||||
|
|
|
@ -15,8 +15,7 @@
|
||||||
module Main where
|
module Main where
|
||||||
|
|
||||||
import Data.ByteString.Builder (toLazyByteString)
|
import Data.ByteString.Builder (toLazyByteString)
|
||||||
import Google.Test (googleTest)
|
import Test.Framework (defaultMain, Test)
|
||||||
import Test.Framework (Test)
|
|
||||||
import Test.Framework.Providers.QuickCheck2 (testProperty)
|
import Test.Framework.Providers.QuickCheck2 (testProperty)
|
||||||
import qualified Data.Attoparsec.ByteString.Lazy as Atto
|
import qualified Data.Attoparsec.ByteString.Lazy as Atto
|
||||||
|
|
||||||
|
@ -30,5 +29,5 @@ testEncodeDecode = testProperty "testEncodeDecode" $ \x ->
|
||||||
Right y -> x == y
|
Right y -> x == y
|
||||||
|
|
||||||
main :: IO ()
|
main :: IO ()
|
||||||
main = googleTest [ testEncodeDecode
|
main = defaultMain [ testEncodeDecode
|
||||||
]
|
]
|
||||||
|
|
Loading…
Reference in a new issue