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

[1 名無しさんは伊達じゃない NG NG]

どうよ？

[36 デフォルトの名無しさん NG NG]

C++ > Ada > PL/I だと思う。

[37 デフォルトの名無しさん NG NG]

Adajima heihachi

[38 デフォルトの名無しさん NG NG]

18世紀に初めてプログラミングした人？

[39 デフォルトの名無しさん NG NG]

>>25
スレッドじゃなくてタスクだよ。ランデブーで同期/通信するマルチタスク。

[40 デフォルトの名無しさん NG NG]

おお、AdaスレだAdaスレだ♪

ところでAda.NETってどうなったんだろう…数ある.NET対応言語の一覧で、一度だけ見かけた気がする(曖昧)のだが、真実や如何に？

[41 デフォルトの名無しさん NG NG]

Perl.netは？

[42 ｔ NG NG]

こりゃあエーダ。

[43 デフォルトの名無しさん NG NG]

>>40
ｶﾅｰﾘ眉唾だねぇ。Eiffel.NET とかも (話だけは) でてたけど。

[44 40 NG NG]

ひさしぶりにあがっていると思ったらレスが…

>>43
やっぱ眉唾ですよねえ…期待してたんですが

Eiffel.NETのほうは、Microsoftの記事からリンクが貼られてましたから
こっちは実在するのではないかと

[45 デフォルトの名無しさん NG NG]

http://www.microsoft.com/japan/developer/net/multilang/pdc_eiffel.asp
Eiffel.NET↑
Ａｄａも昔の記事を見るとリストに入ってるんだけど。

[46 デフォルトの名無しさん NG NG]

PL/SQLはAda互換だよ〜

[47 デフォルトの名無しさん NG NG]

>>46
まじ？

[48 デフォルトの名無しさん NG NG]

多重継承も総称もない Eiffel.NET は嫌だ〜

[49 デフォルトの名無しさん NG NG]

AdaってF-22戦闘機にも採用されてるんですよね？

どんな記述なんですか？、２〜３行見てみたい気もするのですが
もし関連書籍とかあればうれしいかなと、、

[50 デフォルトの名無しさん NG NG]

Algol系。同期通信方式がCSP由来で、
以後SR(シリアライゼイションリソース)系言語一派をなした。

http://www.scism.sbu.ac.uk/law/Section1/chap2/s1c2p1.html
http://www.adahome.com/
http://www.gnuada.org/
http://www.gnat.com/

[51 デフォルトの名無しさん NG NG]

さいきんのアフガン派兵で兵士の装備がWin2000搭載だと言ってますが、
Adaで書かなくてもペンタゴンに納入できるんですか？

[52 デフォルトの名無しさん NG NG]

ていうかどんな言語なのよ。
ためしにHello, World!のサンプルコードでも書いておくれよ。

[53 デフォルトの名無しさん NG NG]

with Ada.Text_IO;
procedure Hello is
begin
　Ada.Text_IO.Put_line("Hello World !");
end Hello;

GCあるがネイティブ(他のスレで話題になっているD言語と同じような組み合わせ)、
Win32APIなんかも直接呼べる。何ならサンプル貼るけど、
Cとかと違い厳格な分白紙窓出すだけで膨大になるぞ〜(w

[54 デフォルトの名無しさん NG NG]

次のgccでAda使えるYO!

[55 47 NG NG]

今日 PL/SQL の本を買ってみたら確かに Ada に近いと書いてあった。
何でそういう事になったのか詳しい人いませんか？

[56 デフォルトの名無しさん NG NG]

俺にAdaについて語らせれば、右にでるものはいないぜ！

　　「Adaはエ〜ダ」

[57 48 NG NG]

Ada.NET はあったとしても、たぶん総称がないと思う。

[58 デフォルトの名無しさん NG NG]

Ada.NETはともかく、.NETに総称を付け加える研究をMSRでやってるよ。

[59 デフォルトの名無しさん NG NG]

>>56
どうでもええだ。

[60 デフォルトの名無しさん NG NG]

>>59
そりゃねぇ〜だ。

[61 デフォルトの名無しさん NG NG]

結局、なんで流行らなかったんですか？

[62 名無しタン NG NG]

身近な実装があればなあ。
TurboAdaとかVisualAdaが出てればオレもやったかも。

[63 デフォルトの名無しさん NG NG]

>>51
.govと.milでは基準が違うのかも。

[64 デフォルトの名無しさん NG NG]

CマガジンにSRのこと載ってたね。
(SR=AdaなどのCSP系の通信機構をまとめて出来た言語)

[65 デフォルトの名無しさん NG NG]

>>61
２〜１６進表現全部フォローしなきゃならないとか（３とか１５とかも）
Ａｄａと名乗る為に審査パスしなきゃいけないとか
サブセットは認めないとかで
面倒だったのかな。（単なる憶測）

[66 デフォルトの名無しさん NG NG]

>>62
>TurboAdaとかVisualAda
いくら仕様が厳格でも、上記の処理系じゃ、
軍にソフトを納入できないような気がする。

[67 デフォルトの名無しさん NG NG]

枝スレはたまにあがるが盛り上がらんな

[68 デフォルトの名無しさん NG NG]

米軍は Ada+InterBase なのだろうか

[69 デフォルトの名無しさん NG NG]

>>68 InterBaseってボーランドのですか？

>>50 素人なんですが、CSP系という事であれば、
　　　NGSCMのセンセのページに昔載ってた、
　　　SR(Syncronized Resource)とは違うのですか？

>>64 いつの号でしょうか？
　　　３月号なら、音楽信号処理が載ってたんで、買ったけど読んでない(鬱

[70 デフォルトの名無しさん NG NG]

あげ

[71 デフォルトの名無しさん NG NG]

OracleのPL/SQLがAda似なのは米軍へ売り込むためだったのかな

[72 デフォルトの名無しさん NG NG]

米軍はHSP使ってます。先日国防省を訪ねたときにみました。

[73 NG NG]

>72
そりゃねぇ〜だ。Again

[74 デフォルトの名無しさん NG NG]

例え総称がCLRに無くても、その言語内だけで使うぶんには勝手に展開してしまえばいいような気も…と言ってみる
総称も多重継承も無いEiffel#…メイヤー先生が直々にMSにプレゼンしてこの結果…

[75 デフォルトの名無しさん NG NG]

エイダ・ウォン

[76 デフォルトの名無しさん NG NG]

>>74
> 例え総称がCLRに無くても、その言語内だけで使うぶんには勝手に展開して
> しまえばいいような気も…と言ってみる
> 総称も多重継承も無いEiffel#…メイヤー先生が直々にMSにプレゼンしてこの結果…

おいおい言語非依存にするっていう制約があるぞ。

それにメイヤーが何言っても聞くような奴じゃないぞ、あいつは。
つい最近までPascalやっていたような偏屈だからな。

[77 デフォルトの名無しさん NG NG]

raise Age;

[78 デフォルトの名無しさん NG NG]

密かに>>75がつまらないギャグを言うスレはここですか。

gamecubeﾉBAIOﾔﾘﾀｲｷﾌﾞﾝ

[79 50 NG NG]

>>69
> 　　　SR(Syncronized Resource)とは違うのですか？

スマン間違えた。Serialize-じゃなくてSynchronizedだ。

[80 デフォルトの名無しさん NG NG]

純国産OSのEOTAに標準でAdaがインストールされているのは
米軍へ売り込むためなのかな。

[81 デフォルトの名無しさん NG NG]

Ada, 楽々受かるからだ。

[82 デフォルトの名無しさん NG NG]

Ada, rakurakuukarukarada

[83 デフォルトの名無しさん NG NG]

82が気が付いてくれて、81も浮かばれただろ

もっとも82＝81ならその限りではないが

[84 デフォルトの名無しさん NG NG]

>>83
たぶん、>>82=>>81と思われ。

そんなの気づく奴は、本人以外なかなかいない。

よくできてるとは思うけどね。

[85 デフォルトの名無しさん NG NG]

Adaから派生したDIANAって知ってる？
80年代、Adaを勉強しようとして、まちがえてDIANAの本買って鬱になった。
Ada構文⇔DIANA木に変換できるらしい。NTT通研がやっていたと思う。

[86 デフォルトの名無しさん NG NG]

>>84
81って、大昔の ASCII かなんかの雑誌にのっていた覚えがあるよ。

[87 デフォルトの名無しさん NG NG]

Ada って Pascal から生まれたんでしょ？
だからいまだにアメリカではPascalを教えてるんだね。
あとでCにもAdaにもいけるからね。

[88 デフォルトの名無しさん NG NG]

Algol系の言語が好まれるということだな。
PL/1, JOVIAL, modula-2/3などなど

PascalからCという流れは？だが。

[89 デフォルトの名無しさん NG NG]

raise Sage; --(意味不明)

[90 デフォルトの名無しさん NG NG]

>>89
そういやコメントが--なんだよね。

[91 デフォルトの名無しさん NG NG]

if 書き込む then
　存続;
else
　dat落ち;
end if;

-- ぶらさがりelse問題の無い理想的なif文です

[92 デフォルトの名無しさん NG NG]

loop
　存続;
　exit when dat落ち;
end loop;

-- 無限ループ専用の構文があるのも珍しいかも

[93 デフォルトの名無しさん NG NG]

A: loop
　loop
　　exit A;
　end loop;
end loop;

loop
　loop
　　goto B;
　end loop;
end loop;
<<B>>

[94 デフォルトの名無しさん NG NG]

declare
　type S is array(Character) of Boolean;
　Age: S := ('A' | 'G' | 'E' => True, others => False):
　Sage: S := ('S' | 'A' | 'G' | 'E' => True, others => False):
　R: S;
begin
　R := Age and Sage; -- Booleanの配列はPascalみたく集合演算できる
end;

[95 デフォルトの名無しさん NG NG]

Thread.Write(Text => "仮引数明示呼びだし", Mail => sage);

[96 デフォルトの名無しさん NG NG]

with System; use System;
with Interfaces.C; use Interfaces.C;
with Interfaces.C.Strings; use Interfaces.C.Strings;
with Win32; use Win32;
with Win32.WinUser; use Win32.WinUser;
procedure WinHello is
　pragma Linker_Options("-Wl,-subsystem,windows");
　function To_CStr(C_Str: CHAR_Array) return LPCSTR is
　　function UC is new Ada.Unchecked_Conversion(Address, LPCSTR);
　begin
　　return UC(C_Str(C_Str'First)'Address);
　end;
　Dummy: Win32.INT;
　Text: constant CHAR_Array := "Text" & Win32.Nul;
begin
　Dummy := MessageBox(Null_Address, To_CStr(Text), To_CStr("Caption" & Win32.Nul), MB_YESNO);
end WinHello;

[97 デフォルトの名無しさん NG NG]

ADA95どうよ？

[98 デフォルトの名無しさん NG NG]

Ada95で、クラスワイド型じゃないと多態しないというのはまあいいのですけど、
多態で飛んでいった先の各ルーチンに渡されるオブジェクトはクラスワイド型じゃない方ですよね？
多態先からまた多態したい時はそのつどクラスワイド型にキャストし直すしか無いのでしょうか？

[99 デフォルトの名無しさん NG NG]

>>92
> -- 無限ループ専用の構文があるのも珍しいかも

CSPの影響でしょうね。

[100 デフォルトの名無しさん NG NG]

>>87
Concurrent Cは、Adaから影響を受けたね。

[101 デフォルトの名無しさん NG NG]

委員会が作った言語に優れたものは１つもない。

[102 C++好き NG NG]

>>101
最近のC++には耳の痛いお言葉で…

[103 デフォルトの名無しさん NG NG]

Ｃ＋＋は、委員会が決めたのか？

[104 デフォルトの名無しさん NG NG]

C++に贈る言葉
「船頭多くして、船、山に登る」

[105 C++好き NG NG]

>>103
最近は http://anubis.dkuug.dk/jtc1/sc22/wg21/ こういうところがメインですよ。
もうBjarne Stroustrup個人の言語じゃないです。

[106 デフォルトの名無しさん NG NG]

しかしAda(やCommonLisp)はそもそも委員会が設計した言語だからな。
もっとひどい。

[107 C++好き NG NG]

CommonLispは、mailing-listの議論をGuy Steeleの独断でまとめた。
だから委員会じゃないが、確かにすっきりしない言語だな。

[108 デフォルトの名無しさん NG NG]

対照的なのはOberonとかSchemeとか。
好き嫌いはともかく、すっきりしてる。

[109 デフォルトの名無しさん NG NG]

うんだ、Ada はええだ。
恩を Ada で返すだ。

[110 デフォルトの名無しさん NG NG]

>>109
ﾜﾗﾀ

[111 デフォルトの名無しさん NG NG]

Adaに無限ループ専用の構文なんてないぞ。
loop文の繰り返し規則がオプションになってるだけ。

for ch in CHAR'RANGE loop ... end loop;
while ch in CHAR'RANGE loop ... end loop;
loop ... end loop;

[112 デフォルトの名無しさん NG NG]

平社員: 係長、何か泳いでいますね〜
係長: エイだ。

[113 ＡＤＡ NG NG]

ＡＤＡ

[114 デフォルトの名無しさん NG NG]

保守

[115 デフォルトの名無しさん NG NG]

AADDAA

[116 デフォルトの名無しさん NG NG]

人類初のプログラマーは女性
http://www-6.ibm.com/jp/lead/010115_a.html

[117 デフォルトの名無しさん NG NG]

raise…してもネタも無し。保守

[118 デフォルトの名無しさん NG NG]

国防省というと、Multicsがついこないだまで現役で動いていた
そうですが、それってPL/IをAdaに焼き直して動かしていた
とかいう話はあるんでしょうか？

[119 デフォルトの名無しさん NG NG]

保守sage

[120 デフォルトの名無しさん NG NG]

age

[121 _ NG NG]

作られた時代を考えたらAdaって凄く先進的な言語ですね。。。

[122 デフォルトの名無しさん NG NG]

作られたときは先進的だけど今はどうってことないじゃん。なんて国防総省が
いまだにエーダなんてつかってるかわからないよーん。ボケ。

[123 デフォルトの名無しさん NG NG]

F-22しか使われてるの知らないけど、他にはどんな軍用兵器の開発に
使われてるの？

[124 デフォルトの名無しさん NG NG]

スティンガー

[125 デフォルトの名無しさん NG NG]

エイダちゃん
ｷﾀ━━━(ﾟ∀ﾟ)━━━!!


でも年輩ハッカーしか知らないに(　つД｀)1デリゲート

[126 C++好き NG NG]

>>122
違うよ。そういう後ろ向きの理由じゃなくて、Multicsはバリバリの現役だったよ。
B2 security通っていたからね。
http://williamstallings.com/Extras/Security-Notes/lectures/trusted.html

「コンピュータセキュリティの基礎」D. Russell, G.T. Gangemi Sr.
山口英監訳 アスキー出版、が日本語書籍では詳しい。絶版なのかな?
http://www.amazon.co.jp/exec/obidos/ASIN/4756102999/qid%3D1028710845/250-8907122-0857047

>>123
>>50から辿ってね〜。

[127 デフォルトの名無しさん NG NG]

国内でも航空管制で使われてない？

[128 デフォルトの名無しさん NG NG]

保守

[129 デフォルトの名無しさん NG NG]

Text_IO.Put_Line("下へ参ります");

[130 デフォルトの名無しさん NG NG]

GCC に Ada が入ったみたいだが、なぜ？

[131 デフォルトの名無しさん NG NG]

Ada.Coda.IUNA

[132 デフォルトの名無しさん NG NG]

Ada.Coda.You.Know

[133 デフォルトの名無しさん NG NG]

ttp://www.adahome.com/Pictures/ladyada.gif結構美人じゃない？？

[134 NG NG]

いまgnat-3.13p-8.i386.rpm ってのﾀﾞｳｿしてるんだが・・・
・・・不安

[135 134 NG NG]

RedHat7.1と7.3にすんなり入った。

gnat-3.13p-runtime-1-8.i386.rpm
と、gnat-3.13p-8.i386.rpm
の、とりあえず二つだけ持ってきて、この順にrpm -ivh するだけ。

ちょっとイラっとしたことといえば、User's Guideにあった
$ gcc -c hello.adb　が駄目で、gnatgccじゃないとコンパイル
しなかった事ぐらいだった。

まぁ温故知新って言うか、割と楽しめそうな感じ。

[136 デフォルトの名無しさん NG NG]

lovelaceっていうAdaチュートリアルみつけた。
なんかよさげ。

Section1-4にAdaの実行時例外を投げさせる例題があったけど、
例外なんか一個も投げられないで、おかしな値を表示しながら
無限ループしてる。
調べてみると、漏れのつかってるGNATではコンパイル時の
オプションで-cargs -gnatoと指定しないとだめだと分かった。
それ以外はいい感じだった。もうしばらく続けてみよう。

今日はLesson4までやった。
明日はLesson5〜8までやる。オブジェクト指向が含まれる。
あさってはLesson9〜12までやる。Genericsが含まれる。
しあさってはLesson13〜17（最後）までやる。並行処理とかが含まれる。

・・・つうか暇。。。