|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Andrey Sapozhnikov 2:5020/400 20 Aug 2002 18:06:57
To : Artem Chuprina
Subject : Re: Perl, ООП и критика
--------------------------------------------------------------------------------
ru> <ajtbfv$65e$2@host.talk.ru> <slrnam4d9j.ang.ran@banquet.lan.ice.ru>
From: Andrey Sapozhnikov <sapa@icb.chel.su>
Artem Chuprina wrote:
> Здравствуй, Alexey Desyatnik.
> AD> Еще раз, помедленнее... :) Язык Tcl сводится к синтаксису
> AD> команда [параметры]
>
> AD> плюс правила подстановки значений переменных да различия между
> AD> строками в кавычках и разных скобках. ВСЕ. И какова ценность
> AD> ЭТОГО? Практически - нулевая.
>
> Да? И как на так описанном языке реализовать for или proc?
Вот примерно так, если я еще не забыл Тикль:
proc for {start test next body} {
global errorInfo
uplevel $start
while {[uplevel [list expr $test]]} {
switch [catch {uplevel $body} err] {
1 { error $err $errorInfo}
2 { uplevel [list return $err] }
3 break
4 { uplevel $next; continue }
}
uplevel $next
}
}
Андрей
--- ifmail v.2.15dev5
* Origin: Demos online service (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
