From: KATO K. <k.k...@gm...> - 2008-04-22 09:37:54
|
> Thanks for this library. It looks good for a first pass. > You do have some very odd coding constructs that should be corrected before release. Sorry, and Thanks. This library is my first lump of program in Tcl. So, there are many foolish logics in sourcecode, maybe. :( > I think this is good for 0.1 commit, then fix after. Supposing it is adopted, I will welcome. > but it looks like a rough conversion from another language (Perl?), That's right. The original library written in PHP. How to deal with container/structures differs considerably. Some amount of correction was made according to indication. http://knivez.homelinux.org/~spro/tcl/yapt-0.1.1.tar.gz > * Use foreach instead of for constructs for lists > * Brace all expressions All "twirl-variables" on foreach-idiom to be braced. But "for constructs for lists", I don't understand these concrete places. Can I trouble you to show me there. > * Some 'concat's look like string appending is meant > * Use 'eq' instead of string equal in exprs > * Use 'string match' instead of -length in some cases corrected > * Is 'isAliasNode' an incorrect conversion from Perl RE? now, "Alias Node" is no implemented in the library. So I comment outed the procedures.(and some not used) > * Use 'string is bool' over lsearch of type - if valid. It seems to be the treatment which is partly different. Tcl:([string is true/false $token]) 1 == {1 true yes or on} 0 == {0 false no off} YAML: 1 == {true on + yes y} 0 == {false off - no n} However, I am seldom scrupulous about this point... :) |