Функциональный tcl

Годно, спасибо!

Но зачем?

(с Tcl совершенно не знаком - поэтому может оказаться, что фигню какую-то предлагаю)

У меня есть такое предложение. Как понимаю, Tcl связано с GUI, а для него оказалась очень полезной модель событий (events) как в .NET. В Java Swing и Java SWT/JFace есть похожие вещи, но на мой взгляд события из .NET выглядят интереснее и сами по себе, и в свете ФП. И вот почему.

В F# объект event может быть неявно преобразован в IObservable. В общем, это позволяет рассматривать событие как функциональный объект. Можно определить map, filter, merge и другие функции.

По сему предлагаю задуматься над добавлением event и IObservable. На мой взгляд это будет удачным и _практичным_ применением идей ФП к задаче построения GUI.

автор этой хрени здесь в том числе обитает.

Куда ни кликну везде This page has not been created yet. (по первой ссылке)

wiki на ассембле страшно-ужасная :) поэтому документация (какая-никакая) живёт отдельно на http://docu.newiki.ru/doku.php?id=tclamba:tclamba ; будут силы перетащу на асемблу

У вас там, как я понял такой синтаксис, например: map here is a command {this is a list}. Если так то это просто имитация нормальных лямбд, т.к. нельзя писать map [get_a_lambda] {this is a list}, т.к. все, что вернет get_a_lambda будет первым параметром map.

Что вам надо, так это запилить функцию apply {expression} {list}. Остальное легко сделать из apply.

У вас там, как я понял такой синтаксис, например: map here is a command {this is a list}. Если так то это просто имитация нормальных лямбд, т.к. нельзя писать map [get_a_lambda] {this is a list}, т.к. все, что вернет get_a_lambda будет первым параметром map.

а всё так и сделано :)

puts [ map expr 2 + { 1 2 3 } ]
puts [ map {expr 2+} { 1 2 3} ]
puts [ map {expr 2 +} { 1 2 3 } ]
puts [ map [ lambda { x y } { expr $x + $y } ] 2 { 1 2 3 } ]
puts [ map lambda { x y } { expr $x + $y} 2 { 1 2 3 } ]

3 4 5
3 4 5
3 4 5
3 4 5
3 4 5

или имеется в виду сделать нечто вроде

proc foo { expression k } {
  [ expression ] $k
} 

proc bar {} {
  lambda { x } { expr $x * 2 }
}
map foo bar { 1 2 3 }
#= 2 4 6