2017年 – The T World

DeclVisitorが呼んでくれる関数のリスト

it 2017年12月23日 2017年12月23日C++, clang, プログラム, 字句解析 0

clangのDeclVisitorが呼んでくれる関数のリストがお手軽にほしかったので調べてみました。以下のコマンドで出力することができます。　# DeclVisitor.hのマクロを参考にいたしました。 [crayo …

gitとPrivateRipository(bitbucket)を作る

it 2017年12月14日 2017年12月14日git, プログラム 0

bitbucketでprivate ripositoryを作成しておく作業ディレクトリでcloneする

$git clone https://bbbae@bitbucket.org/bbbae/private_repository_name
$cd private_repository_name
$git remote -v
origin	https://bbbae@bitbucket.org/bbbae/private_repository_name (fetch)
origin	https://bbbae@bitbucket.org/bbbae/private_repository_name (push)

$git clone https://bbbae@bitbucket.org/bbbae/private_repository_name

$cd private_repository_name

$git remote -v

origin https://bbbae@bitbucket.org/bbbae/private_repository_name (fetch)

origin https://bbbae@bitbucket.org/bbbae/private_repository_name (push)

作業状態を確認 [crayon-67f7a8fc …

Idea using Cloud and Machine learning

it 2017年11月27日 2017年12月23日IT, 情報, 未分類 0

Cloud mail systems and communication tools need to change to be management tool for a refresh of company&#8217 …

Private Ripository

it 2017年10月9日 2017年10月9日COOL!!SITE!, プログラム 0

bitbucketのプライベートリポジトリ bitbucketには個人のプライベートリポジトリを作成することができる。技術的な動作確認等でサンプルでソースコードを書くこともあり、少しずつだけれど増えていって結構な量とな …

[Haskell]4つのWord8からWord32に変更する

it 2017年5月14日 2017年5月14日haskell, プログラム 0

入力で受け取ったByteStringを32bitの数値で扱いたい。いろいろ方法がありそうだけど、自前で作成してみた。Cならばunionで4バイト領域にへunsigned charとunsigned longとしてアクセ …

重要なのは「分かっている」ということ

it 2017年5月10日 2017年5月10日haskell, プログラム, 思うこと, 本, 開発プロセス 0

もうずいぶん前から、１０年近くはなるんじゃないだろうか。いまに至るまでもずうっと考えていて、文章にはしていなかったこと。「関数プログラミング実践入門」という本にそのまま書いてあった。 …ここでの「分かっている …

10年

it 2017年4月22日 2017年4月22日出先での風景, 反省, 雑記 0

10年あれば新しい街ができる。10年なにをしてきたか。これからの10年でどう良くしてけるか。いつでも先の姿を描いて動いていかなければ、何も変わらず、何も良くはならない。先の姿を描く。思い知らされた日だ。

[haskell]リストの扱い参考サイト

it 2017年3月5日 2017年3月5日COOL!!SITE!, haskell, プログラム 0

とても参考になりました。ありがとう！ Haskellのリスト操作関数リストアップ(一覧)

[haskell]Data.IniをつかってINIファイルを読み書き

it 2017年2月5日 2017年5月13日haskell, iniファイル, プログラム 0

Data.Iniを使ってINIファイルを読み書きできるようになりました。ただ、ちょっと不味かろう、使い勝手悪かろうというという後味。 Data.IniをつかってINIファイルを読み書き

[haskell]iniファイルとexception

it 2017年1月29日 2017年1月29日haskell, iniファイル, プログラム 0

ini形式のデータをパースして値を取得できるようにします。また、ファイルが無いときの例外キャッチをできるようにします。

{-# LANGUAGE ScopedTypeVariables #-}
module Main where
import qualified Data.HashMap as HM
import qualified Data.Ini as Ini
import qualified Data.Text as Tx
import Control.Exception.Safe

main::IO ()
main = do
    fi < - Ini.readIniFile "test.ini"
     `catch` (\(e::SomeException) -> do
       putStrLn $ displayException e
       return $ Ini.parseIni (Tx.pack "")
     )
    case fi of
     Left fil -> putStrLn ""
     Right fir -> do
      putStrLn $ get (Tx.pack "あ") (Tx.pack "sessionId") fir
      putStrLn $ get (Tx.pack "い") (Tx.pack "sessionId") fir
    putStrLn $ getFromStr (Tx.pack "あ")
    return ()

    where
     get::Tx.Text -> Tx.Text -> Ini.Ini -> String
     get section key ini =
      case Ini.lookupValue section key ini of
       Left l -> l
       Right r -> Tx.unpack r

     getFromStr::Tx.Text -> String
     getFromStr section =
      case Ini.parseIni (Tx.pack "[あ]\nhost=localhost\nport=6666\nsessionId=ない") of
       Left il -> il
       Right ir -> get section (Tx.pack "sessionId") ir

{-# LANGUAGE ScopedTypeVariables #-}

module Main where

import qualified Data.HashMap as HM

import qualified Data.Ini as Ini

import qualified Data.Text as Tx

import Control.Exception.Safe

main::IO ()

main = do

fi < - Ini.readIniFile "test.ini"

`catch` (\(e::SomeException) -> do

putStrLn $ displayException e

return $ Ini.parseIni (Tx.pack "")

)

case fi of

Left fil -> putStrLn ""

Right fir -> do

putStrLn $ get (Tx.pack "あ") (Tx.pack "sessionId") fir

putStrLn $ get (Tx.pack "い") (Tx.pack "sessionId") fir

putStrLn $ getFromStr (Tx.pack "あ")

return ()

where

get::Tx.Text -> Tx.Text -> Ini.Ini -> String

get section key ini =

case Ini.lookupValue section key ini of

Left l -> l

Right r -> Tx.unpack r

getFromStr::Tx.Text -> String

getFromStr section =

case Ini.parseIni (Tx.pack "[あ]\nhost=localhost\nport=6666\nsessionId=ない") of

Left il -> il

Right ir -> get section (Tx.pack "sessionId") ir

[crayon-67f7a8fcc …

2017年1月

月火水木金土日

1

2 3 4 5 6 7 8

9 10 11 12 13 14 15

16 17 18 19 20 21 22

23 24 25 26 27 28 29

30 31

« 11月 2月 »
Tweets by twbae

2017年1月
月	火	水	木	金	土	日
						1
2	3	4	5	6	7	8
9	10	11	12	13	14	15
16	17	18	19	20	21	22
23	24	25	26	27	28	29
30	31