/var/log/messages

Nov 10, 2013 - 1 minute read - Comments - EoPL Scheme

EoPL の Exercise 2.15

考えかたてきには

  • stack は手続きオブジェクト
  • push で extend すれば良い
    • extend は stack を戻すはずなので戻るのは手続きオブジェクト
    • 引数に ‘pop あるいは ‘push なシンボルをもらうのかな

Nov 10, 2013 - 1 minute read - Comments - android

Hello World な Espresso の試験を書いてみる (3)

その後、再度実行してみると以下な例外を吐いて終了することを確認。

java.lang.RuntimeException: Waited for the root of the view hierarchy to have window focus and not be requesting layout for over 10 seconds. If you specified a non default root matcher, it may be picking a root that never takes focus. Otherwise, something is seriously wrong.

うーん、とりあえず MBA で云々するのはあきらめ。以下のエントリによればリモホで gradle も対応は完了していないらしい。

こちら確認の方向にて。

Nov 9, 2013 - 1 minute read - Comments - android

Hello World な Espresso の試験を書いてみる (2)

昼前に再度試験を実行してみました。マシンリソース貧弱でハロワのくせに時間がかかる。 そして時間がかかった挙句に昨日見たナニが出力。

java.lang.RuntimeException: No activities found. Did you forget to launch the activity by calling getActivity() or start ActivitySync or similar?

合間を見つつ確認の方向。あと Linux な仮想ホストで動かす方法とかも確認してみたい。

Nov 9, 2013 - 1 minute read - Comments - misc

bigshot 到着

早くも配送。とは言え、おそらく組み立ては子供都合で来週な方向ス。 開封の儀、なナニを以下にいくつか。

Nov 9, 2013 - 1 minute read - Comments - misc

週末炊事

今朝の朝メシは昨晩こさえておいたピーマン丼の具を使ってアレ。

ピーマン丼

さきほど野菜を仕入れに行って同居人を送ってきた次第。今日も答練だそうな。不在とのことでスデに焼きそばが作成されております。

Nov 8, 2013 - 1 minute read - Comments - EoPL Scheme

EoPL の Exercise 2.14 (2)

なんか昨晩書いた試験が微妙、って思ったら pop は状態を変えるだけで値を取り出す手続きは別で存在してたんすね。いやはや。とりあえず微妙なのは以下の部分だった模様。

(test* "get top of stack"
       1
       (pop (push 1 (empty-stack))))

pop は値を戻すのではなくて stack を戻さないと。

(test* "get top of stack"
       empty-stack
       (pop (push 1 (empty-stack))))

ということで実装書く。つうか書いてみたら試験も色々駄目でした。

Nov 8, 2013 - 1 minute read - Comments - octopress

Octopress の TODO

ええと、以下に列挙。 tweet が出力されてない categories amazon リンク つうかこの際なので SEO な実験してみようかな。assense はそれなりに正確な数値が取れているみ

Nov 7, 2013 - 1 minute read - Comments - EoPL Scheme

EoPL の Exercise 2.13

試験スルーで軽く、ということで勘弁してもらう方向。 unparse が以下なのかどうか。

(define unparse-expression
  (lambda (exp)
    (cases term exp
      (var-term (id) id)
      (constant-term (datum) datum)
  (app-term (terms)
        (let app-term-unparse ((terms terms) (ret '()))
          (if (null? terms)
              (reverse ret)
              (app-term-unparse (cdr terms) (cons (unparse-expression (car terms)) ret))))))))