[SIMILAR] WITH 1 qdbm WITH 1 1 WITH 1 . WITH 1 8 WITH 1 25 の検索結果 103 件中 51 - 60 件目 (0.106003462 秒)
例えば、階乗を求めるために、 @Defun('Fact', @If(@Equal($1, 0), 0, @Add($1, @Fact(@Subtract($1, 1))))) のように再帰呼び出しをすることができますが、再帰された関数の中で@Setを使って変数を設定すると正しく動かなくなります。 これは、変数のスタックがないので、同じ名前の変数はどこで設定しても一番 ...
@Defunのドキュメントを書くためにサンプルを書いてみたらメモリを食いつぶしてエラーになってしまったので調べてみたところ、再帰する関数を書くと引数が正しく渡っていませんでした。ちなみに試したのはすごいいい加減なこんな関数です。 @Defun('Multiply', @If(@Equal($1, 0), 0, @Equal($1, 1), $2, @Add( ...
# (スコア:0)
Invalid Text今の@RegexMatchはマッチしたかどうかしかわからないので、マッチさせたときにキャプチャした文字列も取り出したいという話（）。方法としては、 固定名の変数を使って自動的にそこに代入される（たとえば、$$1から$$nまでとか） 変数を使うけれども変数名は公開せず、@RegexGet(1)とかでアクセスで ...
# (スコア:0)
FETCH 1 BODY.PEEK[] みたいなコマンドを送ってやればいいだけなのだけれど、テキストのみの場合、 FETCH 1 BODY FETCH 1 (BODY.PEEK[HEADER] BODY.PEEK[1] BODY.PEEK[1.MIME]) みたいにして、FETCH BODYしてパートの入れ子情報を取ってから中身を取得しなくちゃいけないので遅い。しかも、前者だったら複数のメ ...
# (スコア:0)
久しぶりにEmacs Lispを書いたら、基本的なところではまったのでちょっとメモ。 lambdaで匿名関数を作ったときに、 ((lambda (x y) (+ x y)) 1 2) と呼べるのに、 (setq f (lambda (x y) (+ x y))) (f 1 2) で呼べずにはまります。呼び出すには、 (funcall f 1 2) とする必要があります。変数と関数の名前空間に ...
# (スコア:0)
12時過ぎからいい風が入ってくるようになり、出た機体も上がりそうな雰囲気になってきたのでテイクオフ。テイクオフの右側で弱めのサーマルを構っていると、徐々に立ち上がってきて、途中から+4m/s以上で上がりだしました。何度か切り返しながら上げて1,500m。 前回の練習を生かして?、70km/hくらいでグライドし ...
# (スコア:0)
Invalid TextOutlookのドキュメントを見て最初に思いついたのはこれです。 var app = new ActiveXObject("Outlook.Application"); var ns = app.GetNameSpace("MAPI"); var entries = ns.AddressLists.Item(1).AddressEntries; for (n = 1; n <= entries.Count; ++n) { var entry = entries.Item(n); WScript.S ...
# (スコア:0)
おー. いい感じですね. 私的には全く OK です. 確認ですが,その場合,ドメイン名は部分一致もアリ,でいいんでしょうか. その際の書き方は,regex ですか? そこまで凝らなくても,単純に存在する部分だけでチェック,でもいいですし,その方が分かりやすいとは思いますが. 例えば, @domain.co.jp ・・・ フルに指定し ...
# (スコア:0)
T2Cを借りて飛びました。13.4m2あるので少し大きめ。 晴れ、南風。11時頃テイクオフに上がったら、既に500mくらいまで上がって飛んでいる機体があり、しばらくしたら1,100mくらいまで上がっていきました。 機体を組んでみると少し雰囲気が悪くなっていたので、しばらく待って、12時頃、前の機体が上がるのを見な ...
# (スコア:0)
HSQL-1.7を使ってMySQL 5.0.24に接続してみるテスト。 module Main where import IO import qualified Database.HSQL as DB import qualified Database.HSQL.MySQL as MySQL host = "localhost" db = "test" user = "root" password = "password" main :: IO () main = process `DB.catchSql` print where proc ...
# (スコア:0)
# (スコア:0)