米国国防省の標準高等言語エイダ（Ａｄａ）を語れ！

■ このスレッドは過去ログ倉庫に格納されています
1名無しさんは伊達じゃない
垢版 |
NGNG
どうよ？
NGNG
一応書いとくか。
LovelaceのSmallってサンプル（ﾀﾞｳｿしたやつ）は、俺の環境RH7.3+gnat3.13pでは
makeできなかった。
ちょっとがっかりしたけど、深追いするのはやめときますた。

今、ライブラリとか調査中。
NGNG
>>157
mingw+gnat(バージョンはどこで見るの？)でもビルドできない…と思いきや、
zipに格納されているファイル名が8文字で切れてしまっている様子。
(directions.ads が directio.ads になっている等)
ファイル名を正してやればビルドできました。

しかし…二部屋しかないのか？このゲーム(w
NGNG
win32adaというものを拾ってきて、WindowsAPIを呼ぶ実験をしてます。
一部書き換えが必要になったものの(gnatのバージョン違いが原因と思われる)、
なんとか成功…はしたのですが、
毎回、リンカにlibuser32.a等を渡してやらないとリンクできない面倒な状態になってしまってます。
リンカ(gnatlink)に渡すデフォルトオプションを書いておける、環境変数とか設定ファイルとかありませんか？

それと、win32*.aliを、ADA_OBJECTS_PATHにコピーしても、見てくれず、
毎回ソース(ADA_INCLUDE_PATHに配置。こっちは見てくれる)からコンパイルされるのは何故だろう…。
NGNG
>>159
いまソケットライブラリやってるんだけど、こっちではこんな風にmakeできる。

１．gnatmakeに渡すオプションをなんかのファイル(例えばfoo)に書く。
-I/usr/lib/ada/adasockets -L/usr/lib/ada/sockets -largs -L/usr/lib/ada/adasockets -ladasockets
　（-largs以降がリンカオプションらしい）

２．そんで、gnatmake hogehoge `cat foo`

窓、出ましたか？
NGNG
``というのはUNIXのコンソールの機能ですか？cmd.exeにそんな機能あったかな…。
無駄と思いつつ`type foo`なんて書いて何も起きない事を確認。

とりあえずソースコードに直接pragmaを埋めこむ事で、一応対処はできました。

pragma Linker_Options("-s -mwindows");
pragma Linker_Options("C:\progra~1\mingw\lib\gcc-lib\mingw32\3.2\adalib\win32ada.a");
pragma Linker_Options("C:\progra~1\mingw\lib\libgdi32.a");

で、窓、出ました。
( ソースコードにパスを埋めこむのは気持ち悪いのですが… )

-s をリンカに渡すと、スマートリンクらしいです。だいぶ.exeが小さくなります。
162160
垢版 |
NGNG
>>161
ｽﾏｿ。なんとなくCygwinユーザかと思ってた。

＞で、窓、出ました。

いいなあ。。。
漏れもGｔｋでやって見ようかな。

それにしても情報が少ない。まさに「ソースがドキュメント」状態・・・
163　
垢版 |
NGNG
メモっとこ。
主要ドキュメント。

『Language Reference Manual 』
言語自体のリファレンスだけど、BNFばかりでとっつきにくい。
http://www.ocsystems.com/user_guide/powerada/html/ada_lrm/lrm-TOC.html

『Ada 95 Quality and Style Guide 』
スタイルガイドだけど、要所要所コードの断片が載ってちょっと分かりやすい。
http://www.grammatech.com/style_guide/contents.html
NGNG
巫女の予言とかいうやつ?
NGNG
海で泳いでいるのは
NGNG
興味本位でいじってみてるんだが、最初思ってた程悪くは無いわな。
日本語のサイトで「巨大なゴミ」とか書いてるところもあったけど、
別にそうは思わないなあ。

流行らなかったのは、だいぶ前のレス>>62にあったように開発ツール
とかの問題だと思うんだが。言語仕様じゃなくて。
NGNG
総称が使えるという事は、STLみたいなものもある筈…
というか初期STLはAda由来というのをどこかで見た…

どなたか、御存じ無いですか？
NGNG
>>167
sglってのがあるみたいですね。
逆にC++STLをもとに作ったらしいですが。

ftp://ftp.cs.rpi.edu/pub/stl/SGL.tar.gz

IEからはﾀﾞｳｿできなかったんですが、anonymousでftpに入ったら
持ってこられました。中身のバージョンは2.0a3でした。
まだ使ってませんが。
NGNG
>>168
テスト程度に使ってみました…で、印象としては、ファイルを細分化させ過ぎているせいで、
withの数や特殊化の数が増えて、C++/STLほど気軽に使えない感じ。
Controlled型がprocedure内でローカルに作れない(特殊化含む)というのも、初めて知りました。痛い制限ですね…。
NGNG
ラプターはエイダで動いてるらしいな。
171　
垢版 |
NGNG
>>169
おれのとこだと、通らないテストがいくつかあった。
自分で修正しようとしたけど、漏れのスキルじゃまだまだ無理っぽかった。

＞痛い制限ですね…。
やはり突っ込みどころは多々ある。かなりある。
あまり気にしませんが。

ライブラリといえばBoochコンポーネントとかいうのにもコレクションとか
あったと思う。どうなんだろ？
NGNG
ところで、Adaは言語仕様でGCが想定されていますが(同時にGC無しモードも想定されてるけど)
GNATのGCは、exe終了時にしか働かない気がします。
forで回してnewしまくったら、あっさりヒープが足りないとエラー出して終了、
でも、それまでに割り当てたオブジェクト(Controlled型にしてました)に関しては、
きちんとFinalizeが呼ばれて解放された事が確認できます。

マトモに作ろうと思えば、GCは気休め程度に考えて、
やはりUnchecked_Deallocation使ってFreeするしか無いのでしょうかね。
それとも知らないだけで、明示的にGC起こすような関数があるのでしょうか？
173169
垢版 |
NGNG
>>171
>おれのとこだと、通らないテストがいくつかあった。

あら、ほんと。(昼間は全部試して無かった)
そのままじゃ使えない色が強くなってきました…→SGL
NGNG
Booch試してみました。
STLとは異なる作りですが、こっちの方がいい感じ。テストも通ったみたい。
しばらくこれで遊べるかも。

直接関係ないのですが、BoochのCase-Studyを見る限り、
Adaは関数内関数をgeneric引数に使えるらしいです。
スコープとかどうなるのかよくわかって無いのですが、なんか強力そうな感じは受けます。
175デフォルトの名無しさん
垢版 |
NGNG
日本語の情報が少ないage
C++とも勝負できる仕様と思うんだけどなあ…
176_
垢版 |
NGNG
>>175
仕様の巨大さで?
いや、好きだけどね。
NGNG
C++の場合、構文のいい加減さを繕うために無駄に仕様がでかい気がするが、
Adaの場合、使いもしない機能を詰め込んで無駄に仕様がでかい気がする。
NGNG
日本政府の被差別言語エタ（穢多）を語れ！
NGNG
うちの大学の授業では Ada は必須ですが、好きじゃないです。
180デフォルトの名無しさん
垢版 |
NGNG
pragma CPP_xxx って、具体的にはどう使うのだろう。
上手く使えば、例えば、IUnknownを定義できたら、COMなども使えると思うのですけど。

GNATCOMというのを見てみたら、pragma CPP_xxxは使わずに、VTableを自前で作ってる…。
181名無しさん＠Ｅｍａｃｓ
垢版 |
NGNG
今日、gnatgccで日本語、
Put_Line("こんにちは");
を含んだソースをコンパイルしようとしたら
``control character not allowed in string''
と出て失敗します。
環境はEmacs21/Linux2.4ですが`file'コマンドの結果が``ASCII text, with escape sequences''
となるものだけエラーが出るようです (viやcatで作った``ISO-8859 text''なら問題なしです)
オプションの -gnatiw -gnatWe 等も試しましたがうまく行きません、
どなたか御知恵をおかしください m(_ _)m

NGNG
manon?
183デフォルトの名無しさん
垢版 |
NGNG
当方Windows/Mingwですけど、SHIFT-JISはオプション無しでも何等問題ないみたいです。
Wide_Stringにしても通ったという事は、ロケールを認識してくれてるのかな？
エスケープシーケンスって事は、恐らくEUCでは無くJISコードで保存されていて、
JISコードに必要な言語切り替えコードが引っかかるのではないでしょうか。
NGNG
test
185デフォルトの名無しさん
垢版 |
NGNG
何故、gccのVMTは、未使用4バイト、型情報4バイトが先頭に入るのでしょう。
pragma CPP_Virtualをいじってて、仮想関数が2つずれるので気がついた…。
これではCOMのインターフェースが使えないじゃないですか。
(丁寧に、VMT中の位置指定に負数を書くと、エラーになるし…)

g++でも同様にずれるのか気になるところ。
186デフォルトの名無しさん
垢版 |
NGNG
raise Ageeeeeeee;
187デフォルトの名無しさん
垢版 |
NGNG
age ru yo.
188デフォルトの名無しさん
垢版 |
NGNG
メソッ
189デフォルトの名無しさん
垢版 |
NGNG
目指せ存続1年
NGNG
テロ画像ぺたり
ttp://akira.dcp.ne.jp/~netbbs/cgi/test2/img/196.jpg
NGNG
一周年記念sage
NGNG
＞＞５４９さん
お兄ちゃん…酷いょ…
NGNG
>>40
初めてひろゆきにレス貰った。
NGNG
http://www.miyadai.com/message/?msg_date=20020713

これが本当なら、ひろゆきは今より、裁判所以外に対しては強気に出れる事になると思うんだが、
どうなんだろう？
NGNG
>>50
タイプミス
ｽﾏｿ
196デフォルトの名無しさん
垢版 |
NGNG
最高裁への上告は認められなくなったから、これで事実上判決確定だよ。
逆転も何もないって。　　　　　　　　　　
勢いで上告なんかしても一発で上告却下(門前払い)だよ。
　　　
二審も一審を支持。これに対して上告しようにも、
刑事訴訟と同様、自由に上告できるってもんでもないのです。
民事訴訟法312条 （上告の理由） 1項
「上告は、判決に憲法の解釈の誤りがあること
その他憲法の違反があることを理由とするときに、することができる。」
http://www.m-net.ne.jp/~doba/goto/hon.htm
　　
ようするに上告しても今の制度では100％無駄。 これで完全終了ってことか。
NGNG
======2==C==H======================================================

　　　　　　　　　２ちゃんねるのお勧めな話題と
　　　　　ネットでの面白い出来事を配送したいと思ってます。。。

===============================読者数： 138720人　発行日：2003/1/9

年末年始ボケがそろそろ収まり始めた今日このごろのひろゆきです。

そんなわけで、年末に予告したIP記録ですが実験を開始しています。

「２ちゃんねる20030107」
こんな感じで各掲示板の最下部に日付が入ってるんですが、
20030107以降になってるところはログ記録実験中ですー。

んじゃ！

────────────────────────Age2ch─
■この書き込みは、Age2chを使って配信されています。
────────────────────────────
Keep your thread alive !
http://pc3.2ch.net/test/read.cgi/software/1041952901/l50
────────────────────────────
NGNG
>>751 まともじゃないから2ちゃんねるという図式は考えないのか？(苦笑)

2ch=アングラとは決して思ってないしそう言う意味じゃないけど
NGNG
関係ない人からばっかりかかってくるよ！
NGNG
ワン切りしてみた！！
NGNG
> 書き込まず、閲覧するだけでもIP記録するの？
>そしてそのログをIPごとに集計して利用者の閲覧行動を把握するとかする

一般的な話、apacheなら
analogとかwebalizerとかそれ用のログ解析ツールがある。
ふつうに"セキュリティー"に気をつかっているところであれば
どこでもaccess_logぐらいとってる。

そうしない自鯖がクラックされてもクラックされた事実すらわからない。
NGNG
【シャア大佐には】わたし、ララァだよ【秘密だよ】
http://comic.2ch.net/test/read.cgi/shar/1042119493/

↑このスレで神降臨ｷﾀ━━━━━━(ﾟ∀ﾟ)━━━━━━ !!
自らララァとなのるガノタの女子高生がコスプレ＆脱ぎまくりのうｐ祭り
NGNG

正解！

あなたがミリオネア（ｗ
NGNG

ｎ
NGNG
しょぼーん
NGNG
のだと下四桁みたいだけどね。
3桁?＆まだある、そのサイト?
NGNG
downloadもnetwatchも前からIPは取ってるよ
知らないで書いてた人も多かったんだろうけど
NGNG
======2==C==H======================================================

　　　　　　　　　２ちゃんねるのお勧めな話題と
　　　　　ネットでの面白い出来事を配送したいと思ってます。。。

===============================読者数： 139038人　発行日：2003/1/10

なにやら、連日メルマガだしてるひろゆきです。

そんなわけで、ログ記録実験ですが、いちいちサーバ指定するのが面倒なので、
全部のサーバに入れてみました。

重くなって落ちたりしてもご愛嬌ってことで。。。

んじゃ！

────────────────────────Age2ch─
■この書き込みは、Age2chを使って配信されています。
────────────────────────────
Keep your thread alive !
http://pc3.2ch.net/test/read.cgi/software/1041952901/l50
────────────────────────────
NGNG
単なる個人的な感想なんだから良いんじゃない？
まあ某国なら何にでも噛みつきそうだけど。
NGNG
いままで賢いレスしてる香具師らはＩＰとられるのも前提だからさ。

それほど影響はないと思うよ。
NGNG
このスレ、なんか盗聴法施行前夜みたいな雰囲気だな。
懐かしいぞｗ
NGNG
432 名前：これもIP取られて帝京がカネで雇った暴力団に私は殺されるのか？ 投稿日：03/01/07 23:13 ID:Wrw5Mlxx
　　　　　　 ／:::::::::::::::::::::::::::::帝京女::::::::::||::::::::::::ヽ
　　　　　／:::::::::::::::::::::::::::男のタン壷:::::::::||:::::::::::::::ゝ
　　　　 /::::::::::::::::::::::／:::::::::::::::::::::::::／::::／丶::::::::::::::ヽ
　　　　/::::::::::::::::::／:::::::::::::::::::::::::／:::::／　　ヽ:::::::::::::::ヽ
　　　 /::::::::::::::::／::::::::::::::::::::::::／:::::／　　　　ゞ;;;;;:::::::::::|
　　　 |ゞノノノ:::::::::::::::::::::::::::／::::／　　　　　　　　ヾ:::::::|
　　　 |::::::ミヾ//ﾉﾉ;;;ﾉ;;;;;／;;;／　　　　　　　　　　　|::::::|
　　　 |::::ミ　　　　　ー- _ ＿ﾉノ　　 ヾ＿ _ -─　　 |::::|
　　　 |ゝﾐ 　　　　 ,,_ _ ＿ 　　　　　　　＿＿　　 　 |::/
　　　. |-‖　　　 -ゝ_◎＿ヽ　　　　 丿◎ __ゞ　　 |ﾉ
　　　 丶 |　　　　　　　＝　／　　　＼　三　　　　 |
　　　　 し |　　　　　　　　　　　　　　　　　　　　　/
　　　　ﾉ;;;;;;|　　　　　　　　　丿　丶　　　　　　　/:|　　∧ ∧∧ ∧∧ ∧∧ ∧∧ ∧∧ ∧∧
　　　　ﾉ::::::::|　　　　　　／（ _　　　 ）　　　　　 /:::|　＜アタシは協調性のある優等人種だ。＞
　　　　ﾉ::::::::::i　　　　　　　　　− ´　　　　　　/::::::|　＜オマエのような劣等人種は死に＞
　　　 /:::::::::::::ゝ　　　　　　/-─-┐　　　　　/:::::::|　＜たくなければ感謝して金を出せ！＞
　　　丿::::::::|:::::::ヽ　　　　 (--──,　　　　 /::::::::::ゝ　　∨ ∨ ∨ ∨ ∨ ∨ ∨ ∨ ∨ ∨∨
　　　/::::::::::||:::::::::::＼　　　|| ￣￣　　　　／:::::::::::::::ヽ
　　 /::::::::::::|::::::::::::ﾐ　 ＼　U　　　　　／|:/::::::::::::::::::::ヽ
　　/:::::::::::::::|:::::::::::ﾐ　　 　＼＿＿／　　//:::::
不良や教授は帝京女たちに対して人格へ敬意を払って付き合っているのではなく、
損得による人間関係を組み立てているだけなので帝京女が金儲けをしようとしても誰も協力しない。
ことによると帝京女を出し抜いて自分たちだけ得をしようとする。
NGNG
あなたの脳内ではひろゆきはあなたの親友なんですね
でも現実派、ひろゆきにとってはあなたは単なるユーザーの一人
NGNG
10人殺したら、超えてるような
NGNG
■ライブアライブの巻■

======2==C==H======================================================

　　　　　　　　　２ちゃんねるのお勧めな話題と
　　　　　ネットでの面白い出来事を配送したいと思ってます。。。

===============================読者数： 139038人　発行日：2003/1/10

なにやら、連日メルマガだしてるひろゆきです。

そんなわけで、ログ記録実験ですが、いちいちサーバ指定するのが面倒なので、
全部のサーバに入れてみました。

重くなって落ちたりしてもご愛嬌ってことで。。。

さておき、1/11ですが、2002/10/30にリリースされた『黒イジワルケイ』に参加したアーティストと、
２ちゃんねるで募集したバンドというよくわからない対バンのイベントがありますです。

http://marmalade.skippy.co.jp/event/live.html
＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊＊
高田馬場AREA 午後6時入場受付開始
当日券のみ開場にて！3,000円 （別途ドリンクチャージ500円）
NGNG
わくわく。
NGNG
http://www.sponichi.co.jp/society/kiji/2003/01/11/05.html

もう予告は止めた方が良いだろうね。
NGNG
矢印厨がウザイのでアク禁お願いしますってか?
NGNG
そういえば托ｲ発祥のスレだったな
他板でもはやってんの？
NGNG
「4nd」ってなんだよ。
中学生以下だな
NGNG
fusianasan
NGNG
そんなに法律に頼りたいならインターネットアクセス自体を免許制にすれば？
NGNG
そうなんすか。どうもです。
224山崎渉
垢版 |
NGNG
（＾＾）
NGNG
ループコピペ厨は年越しは一人ぼっちの筆記
226山崎渉
垢版 |
NGNG
（＾＾）
227デフォルトの名無しさん
垢版 |
NGNG
たまには救済age
228山崎渉
垢版 |
NGNG
（＾＾）
229デフォルトの名無しさん
垢版 |
NGNG
Eiffelに負けるなage …

ところで、GNATのgcってプログラム終了時にしか起こらないようですけど、
途中で起こす方法有ります？
(無いなら、すぐ終了するアプリでも無い限りgc当てにできないって事に…)
NGNG
gnat for win32,gtkada,adasocketsで2chブラウザなんか作ってみたいと思う今日この頃。
NGNG
それは興味深い挑戦かも。僕でできることがあれば協力しますよ。
と言ってもgtkもsocketsも知らない未熟者ですが。

ところで、誰も >>185 とか >>229 とかわからないのかな。。。
NGNG
with 2ch.Program;
procedure Hoshu is
　Thread: access 2ch.Thread;
begin
　Thread := 2ch.Program.Get_Thread("米国国防総省…");
　2ch.Write(Thread, text => "保守", mail => "sage");
end;
233
垢版 |
NGNG
gcc-3.2.2に付属しているadaをコンパイルしようとしているのですが、うまく
逝きません。configureがadaを引っ張ってくれない感じです。
環境はSolaris9+gcc-2.95.3です。
% mkdir gccobj
% cd gccobj
% ../gcc-3.2.2/configure --enable-languages=c,c++,ada
languages指定をしないで全部作ろうとしてもダメ。objcやjavaなどは作って
くれるのですが…。adaだけが出来ません。
コンパイル方法をご存知の方。教えてくださいませんか。
NGNG
http://gcc.gnu.org/install/build.html#TOC3
NGNG
エイダってどれくらい流行っておりますか?

前に大学のソフトウェア設計法の授業でC++と一緒にやらされたけど
初心の漏れにはきつかった。
今ではその授業はJavaに切り替えてしまったらしい。

今では漏れもJava慣れしてAdaには手をつけなくなってしまった。
NGNG
>>235
死にそうだね。
Javaに切り替えて正解。

プログラマのレベルがばらばらな
大規模プロジェクトにはあってるとおもうんだけど、
イメージが悪いのか採用されない。

NGNG
プロトタイプ宣言とか演算子のオーバーライドなんて
結構好きだったが。今では当たり前だのクラッカーだね。
238
垢版 |
NGNG
>>234
この通りやったつもりなのですが。うーん…。
NGNG
>>237
Adaにあわせて駄洒落まで古くするこたないヨ
NGNG
...
241デフォルトの名無しさん
垢版 |
NGNG
たまにはageてみる
242デフォルトの名無しさん
垢版 |
NGNG
ｱﾀﾞｰｰ
NGNG
つまみエイダ豆

爆笑間違い無しなのでage
NGNG
>>243
もうかれこれ10時間以上笑い続けてます。
245デフォルトの名無しさん
垢版 |
NGNG
>>243
もうかれこれ二週間以上笑い続けてます。

…で、たまにはage
246デフォルトの名無しさん
垢版 |
NGNG
うんだ、Ada はええだ。
恩を Ada で返すだ。
247デフォルトの名無しさん
垢版 |
NGNG
ええ、２秒くらいは笑えましたよ
NGNG
プログラミングの為の数学と算数
http://pc2.2ch.net/test/r.i/tech/997150743/607
＞[607]デフォルトの名無しさん04/02 11:12
＞Ｎ＋Ｎ＝ＮＮ

[607]の意図はよくわからないんだが
1+1=11
2+2=22
みたいなものがあるか、という問題と解釈し
10進数以外ならあるやも、と作ったプログラム。
2進、3進、4進．．．16進までやってみたけどないね。

with Ada.Text_IO, Ada.Integer_Text_IO;
use Ada.Text_IO, Ada.Integer_Text_IO;

procedure nn is
begin
for i in 2..16 loop
　　for j in 1..i-1 loop
　　　put(j, 6, i); -- jをi進数で表記
　　　put(" + ");
　　　put(j, 6, i);
　　　put(" = ");
　　　put(j + j, 6 ,i); -- j+jをi進数で表記
　　　new_line;
　　end loop;
end loop;
end nn;
249山崎渉
垢版 |
NGNG
（＾＾）
NGNG
251山崎渉
垢版 |
NGNG
　　 ∧＿∧
　　（　　＾＾ ）＜ ぬるぽ（＾＾）
NGNG
めざせ深層水
NGNG
残り12スレッド、潜れ潜れ
NGNG
あと10
NGNG
あと6
NGNG
PC8001版持ってる人は？
■ このスレッドは過去ログ倉庫に格納されています
5ちゃんねるの広告が気に入らない場合は、こちらをクリックしてください。