Názory k článku TCL základy (1)

V příkladech je i:
set a [expr 1 + 1]
set b [expr 5 % 2]
set result [expr $a == $b]
set result [expr $a == [expr $b + 1]]

Co dělají první dva řádky, to v článku popsáno je a to si dovedu představit, ale co přesně dělají ty další dva?

Do resultu ulozi vysledek porovnani. Pokud je a <> b, tak tam vrazi 0, pokud jsou si rovny, tak 1.

Prave kvoli jednoduchosti tvorby GUI v Tk pre MacOSX rozmyslam, ze sa na TCL a Tk kuknu. WTG!

Zatim jsem to neuvedl, protoze to je i pro me novinkou, ale Computer Press vydal novou publikaci o Tcl/Tk. Pokud to myslis vazne, urcite neuskodi sehnat si ji.

Patrik Vrba

Ja som jazyk Tcl vyuzival vo "velkom mnozstve" na pisanie storovanych procedur v Postgrese. Je to super jazyk :-)

Tesim se na pokracovani.

{skakal pes pres oves}
Jak interpreter pozná, zdali jde o řetězec, v němž se nerozvinují $-sekvence, anebo o seznam o čtyř členech?
Nebo pro Tcl je řetězec a seznam jedno a totéž?

Ano, retezec je v zasade totozny se seznamem, je to podobne jako treba s rozlozenim radky v awk ($0 cely radek, tady je cely radek proste ta promenna; $1 je prvni polozka pred oddelovacem - bezne whitespacem - a tady je to [lindex $x 0], cislovani polozek je od 0).
Podle definice: A list is simply a string with list elements separated by white space.
Uvedeny retezec je tedy i seznamem o ctyrech clenech. Ale pozor. Slozene zavorky ztraci svuj specialni vyznam v uvozovkach:

% set x {a b}
a b
% puts $x
a b
% set r {$x g}
$x g
% puts $r
$x g
## ale pozor !
% set z "e {$x} f"
e {a b} f
% puts $z
e {a b} f


Co se jeste seznamu seznamu tyka, tak z clanku mozna nemusi byt nekomu jasne, proc se list v prikladu inicializuje prikazem list a ne proste zavorkama, tedy:

% set novySeznam [list 1 dva 3]

a ne

% set novySeznam {1 dva 3}

Takto je to ekvivalentni, ale rozdil bude az budete potrebovat ruzne expandovat ci neexpandovat promenne pri tvorbe listu. Ve slozenych zavorkach se neexpanduje nic, v uvozovkach vse. Takze prikaz list je cesta, jak udelat mix obojiho :-). Tedy treba:

% set y [list {$x} $x]
{$x} {a b {c d} {e f}}
% puts [lindex $y 1]
a b {c d} {e f}
% puts [lindex $y 0]
$x

ale

% set y "{$x} $x"
{a b {c d} {e f}} a b {c d} {e f}
% set y {{$x} $x}
{$x} $x
% set y {"$x" $x}
"$x" $x


Tcl je bezva jazyk na rychle sflikovani nejakeho skriptu s GUI, ale tyhle cary s expandovanim a neexpandovanim aby prase zvalelo... Nicmene jak si zvyknete, tak uz budete asi v pohode :-).

Rozšířili jste mi obzory. Vůbec jsem nevěděl, že to existuje. Těším se na pokračování. :-)

Da se pomoci tohoto jazyku vytvorit gui pro programy napr v C? diky

TCL/TK ma jak slusne rozhrani pro psani extenzi v
C (i jinych jazycich) tak velmi pekny zpusob, jak
vyuzit interpret TCL/Tk i jednotlive prikazy v C. Ostatne Tk je hodne uspesna multiplatformni GUI knihovna, a proto skoro v kazdem jazyku existuje nejake rozhrani k Tk. C automaticky, Python, Perl, Scheme, OCAML...
Trpelivost, urcite se tim autor bude zabyvat pozdeji :-). Netrpelivym mohu vrele doporucit knihu Practical Programming in Tcl and Tk od Brenta B. Welche. Tlusta, prehledna, vyborny vyklad. No a k tomu od O'Reillyho Tcl/Tk tools (ackoli je trochu starsi). Na Tcl/Tk jsou vyborne tri veci - Tk, expect a snadne zacleneni interpretu do svych aplikaci v necem jinem. A ma dve vady - pomalost ve srovnani treba s perlem (na vse v hranatych zavorkach se vola podinterpret, napr., a ne vzdy se to da kompilatorem zpracovat dopredu) a potize s uvozovkama a slozenyma zavorkama :-).

podla mojich informacii vzniklo TCL prave za ucelom umoznenia skriptovania programom v inych jazykoch (napr. C), teda aby bolo mozne co najlahsie implementovat nejaky skriptovaci jazyk do programov v inych jazykoch, napriklad v ich konfiguracnych suboroch.
Je to pravda?

Z jisteho pohledu ano - je to skriptovaci jazyk navrzeny mimo jine s ohledem na snadnou rozsiritelnost a snadne zacleneni do jinych projektu (jako napr. konfiguracni nebo rozsirujici jazyk.). Napriklad neni moc problem napsat v C aplikaci, ke ktere se GUI napise v Tcl/Tk - interpret je casti aplikace, a je pak mozne napsat libovolne "skiny" a rozsireni v cistem Tcl/Tk. Ale RMS by nam vysvetlil, ze bychom radeji meli pouzit neco poradneho, treba scheme-based Guile. Nechce nekdo napsat neco o Guile+Gtk ? Many mi prijdou dost nestravitelne.

jak je to vlastne s hranatymi zavorkami?
je to test, uvozuje seznam, nebo uvozuje eval?

a nebo nasledujicimu prikladu absolutne nerozumim?

set novySeznam [list 1 dva 3] # to jako naplni novySeznam hodnotou true?
puts [llength $novySeznam]
lappend novySeznam 4 # tomu rozumim :)

Vysledkem hranatych zavorek nebude booleanovska hodnota, ale novy seznam. Hranate zavorky jako by rikaji "spust na me novy interpreter". Ve skutecnosti k tomu i dojde. Interpreter potom vrati vysledek prikazu, ktery se ulozi do promenne novySeznam.

Patrik Vrba