Pascal для AVR Опции

[DMD]

Здравствуйте.
Ребят, посоветуйте хороший компилятор паскаля для AVR, в частности для серии ATTiny, но лучше для большинства (а то мало ли что).
И ещё, не подскажете - слишком придется "платить" за язык высокого уровня в смысле объема кода? А то тут проект светит, там на ассемблере далеко не уедешь, язык С скучный, хочу вот паскаль освоить...
Спасибо.

[Rst7]

А ещё эта тема наглядно продемонстрировала, что программирование на Си делает людей агрессивными и нетерпимыми.

Ооо, скажите, а вот я принципиально стараюсь писать циклы как do{...}while(--var); и постоянно пользую goto. Вы не поскажете, у меня может тоже психические отклонения какие?

[msalov]

Извините за оффтоп, не удержался, в тему холливара Pascal vs C/C++:
Из доклада "Система образования как фактор национального суверенитета в сфере информационных технологий" (стр 12)

Обучение программированию с помощью Си эквивалентно развращению малолетних

[zhevak]

Извините за оффтоп, не удержался, в тему холливара Pascal vs C/C++:
Из доклада "Система образования как фактор национального суверенитета в сфере информационных технологий" (стр 12)

Спасибо за ссылку. С одной строны, я поржал от души, а с другой строны неприятно осознавать, что в руководстве страны сидят такие жопоголовые кормчие.

Я вижу здесь три грубейшие ошибки. Все остальное -- производное от них. Поэтому комментировать тут нечего. Ошибки:
1. Данный документ родили товарищи-адепты Паскаля, а не адепты Си/Си++.
2. В качестве консультанта был приглашен Н.Вирт, а не Ритчи или Страуструп.
3. На своем заседании они пили явно не ту водку.

Как следствие, докумен получился однобокий и тенденциозный. Очень напоминает истерию Советского Союза на Американские угрозы. Короче -- в жопу этот трактат.

ЗЫ, а что, правда было бы прикольно, еслиб Н.Вирт поносил бы свои языки (Паскаль, Модула, Оберон), а ратовал за Си. А вы что хотели услышать от этой братии?

поступаем как Keil решил эту задачу в CA:

procedure ramfunc(..);__ram;
begin
end;
накрайняк процедурный тип в паскале есть, выделяем память в RAM - копируем туда код из флеш и выполняем.

Нет, нет, Уважаемый! Вы меня непоняли. Я просил реальную конструкцию, а не гипотетическую.
Уточняю -- если Вы привели этот код, то назовите в каком компиляторе какой версии это было написано. Подозреваю, что такого компилятора реально не существует.
Разубедите.

[defunct]

Нет, нет, Уважаемый! Вы меня непоняли. Я просил реальную конструкцию, а не гипотетическую.

ОК вот не гипотетический код:

Код

const MAX_CODE_SIZE = 128;

type
     int_func  = function( a, b : integer): integer;


function sum( a, b : integer ): integer;
begin
   result := a + b;
end;

function mul( a, b : integer): integer;
begin
   result := a * b;
end;

function StackFrameLauncher( flash_func : int_func; a, b : integer ) : integer;
var
     stack_frame : array[0..MAX_CODE_SIZE - 1] of char;
begin
    if ( pointer( @flash_func ) = Nil ) then
       result := 0
    else
    begin
       CopyMemory( pointer(@stack_frame), pointer( @flash_func), MAX_CODE_SIZE );
       result := int_func( @stack_frame )( a, b )
    end
end;

begin
   WriteLn( IntToStr ( StackFrameLauncher( sum, 6, 8 ) ) );
   WriteLn( IntToStr ( StackFrameLauncher( mul, 6, 8 ) ) )
end.

Подозреваю, что такого компилятора реально не существует.
Разубедите.

__ram конструкция ни одним Паскаль-компилятором не поддерживается, но тем не менее если бы была на то необходимость (были бы комиляторы с Паскаля под ARM) ее бы несомненно реализовали.

[zhevak]

to defunct

Код написан качественно, наглядно, понимабельно.
Но ответ не полный. Пожалуйста, назовите компилятор и его версию.

Результат в пользу Паскаля пока не засчитывается.

Ключевая фраза выделена
[qoute]__ram конструкция ни одним Паскаль-компилятором не поддерживается, но тем не менее если бы была на то необходимость (были бы комиляторы с Паскаля под ARM) ее бы несомненно реализовали.
[/quote]
Значит, такой потребности нет. Была бы необходимость, так и на Фортране были бы введены соответствующие механизмы, которые позволяли бы писать на нет драйверы. Однако ж по какой-то причине их нет. Интересно, что за причина?

[defunct]

назовите компилятор и его версию.

Приведенный пример скопилировал в Delphi7.

Значит, такой потребности нет

Верно - потребности в нем нет, тут я с Вами согласен.
Писать на паскале, басике и т.п. под МК - кощунство.