Оказывается ихняя ADA это "наш" PL/SQL

← →
Sergey Masloff (2006-04-10 22:00) [0]

Попалась тут на глаза спецификация. С удивлением сделал вывод сабж ;-)

← →
Kerk © (2006-04-10 22:25) [1]

Любопытно :)
Пример кода на ADA можно?

← →
Джо © (2006-04-10 22:28) [2]

Да и то и то — "паскалеобразное". Неужели настолько похожи? Присоединяюсь к [1]

← →
Джо © (2006-04-10 22:32) [3]

Вот, кстати говоря, адовский (или аццкий?) хелловорлд:

with Ada.Text_Io; procedure Hello_World is begin Ada.Text_Io.Put_Line("Hello World!"); for I in 1..10 loop Ada.Text_Io.Put(Integer"Image(I)); end loop; end;

Какой-то он странный, нифига я не понял, что есть (Integer"Image(I))...

А вообще, например, объявление процедуры похоже на PL/SQL, только в последнем вместо is — as.

← →
Sergey Masloff (2006-04-10 22:36) [4]

Легко
package MyPack is
type MYData is private;
function MyFunc(arg: in integer) return integer;
private
v:MYData;
end;
package body MyPack is
function MyFunc(arg: in integer) return integer is
localvar: integer;
begin
localvar := 0;
for i in 1..arg loop
loclvar := localvar + 1;
end loop;
end MyFunc;
end;
with Text_IO; use Text_IO;
with MyPack; use MyPack;
procedure main is
x,y : integer;
begin
get(x);
y := MyFunc(x);
put(y);
end;

← →
Sergey Masloff (2006-04-10 22:41) [5]

Джо © (10.04.06 22:32) [3]
Апрстроф ( " ) это обращение к значению атрибута. Как в дотнете есть атрибуты [WebMethod(...)] так и в АДЕ. ТОлько свои нельзя задавать - только предопределенные. Что такое Integer"Image(I) это конечно читать надо я так не скажу

← →
Джо © (2006-04-10 22:46) [6]

> [5] Sergey Masloff (10.04.06 22:41)

Спасибо :) Но ясности не добавилось. А вообще, вижу, что довольно-таки "многословный" язык, эта Ада.

Хотя конструкция for I in 1..10 loop симпатична :)

← →
Sergey Masloff (2006-04-10 22:50) [8]

> [8] Sergey Masloff (10.04.06 22:50)
> Ну я ж ненужного понаписал чтобы побольше показать похожести
> ;-))

Да я понял :) Под многословностью я имею в виду постоянное использование конструкций <нечто> is <то-то>, <функция> return <то-то>. Немного тяжеловесно. И этим, несомненно, напоминает PL/SQL ;)

Оказывается ихняя ADA это "наш" PL/SQL Найти похожие ветки