Парсер, выполнение кода.

[zumm]

Доброго всем! Проблема в том, что мне нужно реализовывать выполнение кода записаного в отдельном файле (например sourse.txt) я, предположим, написал парсер который разбивает все как положено на операторы и переменные. Но вот как это все выполнить? Наверное нужно как то в памяти разместить, но я совершенно не понимаю как Если не тяжело разъясните как это делаеться на примере если получаем, например:

var
 i: integer;

или

if i=1 then

PS Код написан на паскале.

[Utkin]

Под переменные можно затратить динамический массив . Допустим структура имя (String) и значение (Variant)
Выполнить все тоже просто. Раз разбивает делаете промежуточную компиляцию в код, где каждое действие имеет свой числовой номер. А затем через оператор case .

[zumm]

Utkin, вот меня и интересует, что делать в операторе case? Например у нас есть:

if opCode='if' then
 index:=1;
case index of
 1: ???// я без понятия что тут должно быть :(
 ...
end;

[Utkin]

Ну такой вариант - сначала проходишься по всем строкам и упаковываешь их в специальный вид. Итак вся программа это массив строк. Ты переводишь их в массив структур вида: идентификатор структуры, набор параметров (ну скажем пять или шесть каких то данных, Variant или String, разберешься по обстоятельствам).
Ну вот:

if i=1 then

1: begin
        Читаешь параметры
        Провести сравнение первого параметра со третьим
        Верно ли сравнение с операцией равно?
        Да - выполним четвертый параметр (если он есть)
        Нет - выполним пятый параметр (если он есть) 
end;

[VintProg]

Это уже батенька интерпретатор.

[zumm]

Проблема в том что я не знаю как их выполнить, можно ли попросить Вас привести полный код выполнения, если предположить что в файле всего одна проверка, и если она верно то выводится сообщение.

Содержимое файла source.txt:

var
 i: integer;
begin
 i:=1;
 if i=1 then
  ShowMessage('+'); \\ я знаю что в паскале нет этой функции, но это для наглядности :)
end.

[VintProg]

Сначало надо объявить тип глобальных переменных интерпретатора:

Type
 T_VARS = Record
   Value : pointer;    //Это значение
   Id     : pAnsiChar; //это имя переменной в скрипте
  END;


type
   GLOBAL_VARS : array of T_VARS; - сама вереница переменных.

А много поточный ты хочеш сделать?
А и еще так это все не объясниш, статью писать надо.

[Utkin]

Я же тебе сказал как. Загоняешь строки в массив и смотришь что есть что. А потом цикл по числу элементов в массиве.

[VintProg]

Я же тебе сказал как. Загоняешь строки в массив и смотришь что есть что. А потом цикл по числу элементов в массиве.

А можно и в память поднять, а потом их обрабатывать там.

[zumm]

Народ, перед вами нуб обыкновенный, поэтому сори конешно за тупость, но мне тяжело понять, как его именно выполнить?!

Я же тебе сказал как. Загоняешь строки в массив и смотришь что есть что. А потом цикл по числу элементов в массиве.

Я ничего не понял...

Сначало надо объявить тип глобальных переменных интерпретатора:

Type
 T_VARS = Record
   Value : pointer;    //Это значение
   Id     : pAnsiChar; //это имя переменной в скрипте
  END;


type
   GLOBAL_VARS : array of T_VARS; - сама вереница переменных.

А много поточный ты хочеш сделать?
А и еще так это все не объясниш, статью писать надо.

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