https://github.com/krdlab/trial-hrr-mysql

Trial project for Haskell Relational Record (HRR) and MySQL
https://github.com/krdlab/trial-hrr-mysql

Last synced: 9 days ago
JSON representation

Trial project for Haskell Relational Record (HRR) and MySQL

• Host: GitHub
• URL: https://github.com/krdlab/trial-hrr-mysql
• Owner: krdlab
• Created: 2015-05-05T16:47:32.000Z (over 9 years ago)
• Default Branch: master
• Last Pushed: 2015-05-05T16:55:21.000Z (over 9 years ago)
• Last Synced: 2024-04-11T03:43:24.919Z (7 months ago)
• Language: Haskell
• Size: 102 KB
• Stars: 1
• Watchers: 3
• Forks: 0
• Open Issues: 0
• Metadata Files:
  • Readme: README.md

Awesome Lists containing this project

README

        
# Trial Project for Haskell Relational Record (HRR) and MySQL

## はじめに

HRR と MySQL の組み合わせで色々と実験するためのプロジェクト．

* 実行環境

    * GHC >=7.8.3

    * cabal-install >=1.20.0.4

    * vagrant >=1.7.2

        * 以下のプラグインをインストール済み

            * [vagrant-vbguest](https://github.com/dotless-de/vagrant-vbguest)

            * [vagrant-hostsupdater](https://github.com/cogitatio/vagrant-hostsupdater)

    * virtualbox >=4.3.26

* VM 環境

    * CentOS 6.6

    * MySQL >=5.6.24

## VM 起動 -> ビルド -> examples 実行

```sh

## VM の起動

$ cd mysql-server && vagrant up

...

[sudo] password for :         # required by vagrant-hostsupdater

...

$ cd -

$ git clone https://github.com/khibino/haskell-relational-record.git hrr

$ git clone https://github.com/bos/hdbc-mysql.git

$ cd examples

$ cabal sandbox init

$ cabal sandbox add-source \

    ../hrr/HDBC-session \

    ../hrr/names-th \

    ../hrr/persistable-record \

    ../hrr/relational-query \

    ../hrr/relational-query-HDBC \

    ../hrr/relational-schemas \

    ../hrr/sql-words \

    ../hdbc-mysql

$ cabal install

$ .cabal-sandbox/bin/hrr-examples

```

## MySQL 固有の事項

確認した範囲に限れば，スキーマ/テーブル名の normalize を抑制すれば良いだけになってた．

```haskell

import Database.Relational.Query (Config (..), defaultConfig)

config :: Config

config =  defaultConfig { normalizedTableName = False }

```

あとはこの `config` を `defineTableFromDB'` といった `Config` を受け取る関数に渡せばよい．

## 参考情報

* 

* 

*