| |
| |
| |
|
Page: 1 2
Comments:
<0> and it wasnt working when you put the ^$ in bcos you forgot the \( and \)
<1> ye
<1> wanna help me?
<1> i need the script to return linenumber and column number of where the error was
<2> u cant be helped Gotisch :D
<1> so
<0> lol
<1> no that i have
<0> wheres the column number
<1> that we need to calculate first
<1> and line number too
<1> because we have rel line number
<0> calculate?
<1> so now we do this
<1> ah ill write it on my own :P
<0> lol
<1> look
<1> we get ther error message
<1> invalid command name "throw"
<1> while executing
<1> "throw bug here!"
<1> (procedure "test" line 2)
<1> invoked from within
<1> "test 123"
<1> (procedure "mysql::connect" line 3)
<1> invoked from within
<1> "mysql::connect u p d"
<1> (file "debugit.tcl" line 38)
<1> invoked from within
<1> "source $file "
<1> so the actuall bug is in procedure test
<1> and i the second line of that proc
<1> so we need to locate that procs definition in the file
<1> and then add 1 to its line number
<1> and we got line number
<1> then we do a calc for the row
<1> column
<0> wait
<0> regexp -inline {\([A-Za-z]+ \"*\" line ([0-9]+)\)} {(procedure "mysql::connect" line 3)}
<0> ;regexp -inline {\([A-Za-z]+ \"*\" line ([0-9]+)\)} {(procedure "mysql::connect" line 3)}
<3> [GRiMMY]: #1541 (247 clicks) Tcl:
<1> ;regexp {^\((.+) "(.+)" line ([0-9]+)\)$} {(procedure "mysql::connect" line 3)} - type err line
<0> ;regexp -inline {\(* \"(.+)\" line ([0-9]+)\)} {(procedure "mysql::connect" line 3)}
<3> Gotisch: #1542 (28672 clicks) Tcl: 1
<3> [GRiMMY]: #1543 (10253 clicks) Tcl: { "mysql::connect" line 3)} mysql::connect 3
<1> ;set type
<3> Gotisch: #1544 (162 clicks) Tcl: procedure
<1> ;set err
<3> Gotisch: #1545 (140 clicks) Tcl: mysql::connect
<1> so now we search
<1> ha
<1> not easy
<1> we need to find the definition of connect
<1> in the mysql namespace
<0> whatever
<1> i wanna write a game
<0> lol
<0> write a poker game
<1> so that i can play it
<0> texas hold em
<1> nah to hard
<1> i tryed that already
<0> i got the shuffle already made
<1> was a miserable failure :]
<1> me too
<0> lol but how secure is your shuffle?
<1> then i shifted to blackjack
<0> lol
<0> i got a blackjack done
<0> not that great
<0> no betting or anything, just basic hands in place
<1> ye
<4> Hi, I need a bit of help with TCL/TK, When I'm running a TK window and I want to show a dialog message that accepts input (such as OK button), the dialog message is not showing up at all whent he main TK window is minimized
<4> is there anything I have to do to get it to show?
<4> I've tried focus $win
<0> are you using toplevel when creating it?
<4> No, didn't even think of that
<4> how would I get the dialog to gain focus and to be placed on top?
<4> is it sort of a MID Parent Child type thing?
<0> i have no idea
<0> i dont really touch Tk
<4> grab $win?
<0> i'm just looking through the wiki
<4> It seems like as if the dialog gets stuck when I initiate the draw method, for e.g. set dlg [Dialog .cdmid $text]; set answer [$dlg draw]
<4> then it gets stuck
<4> if the other TK window is minimized
<0> well create it as toplevel
<5> hi
<5> hw can i strip text-formates like bold?
<0> read the ****ing manual
<5> wow
<5> nice chan
<0> well first off
<0> you should have read the topic
<0> which tells you to goto a different channel
<0> secondly this IS in the manual
<0> again the topic tells you to RTFM
<6> how do i backslash metacharacters such as [ and ] in a string?
<7> uh with blackslash?!
<6> seems like lsearch -glob will add backslashes to strings which contain metacharacters
<7> lsearch wont add anything
<6> rockshox, the string is in a variable and not known
<7> why do you need to escape the metachars
<6> lsearch -glob [list "[crap]" *] is not matching sublists with "\[crap\]" in them
<8> state it.
<7> youre using a variable as the pattern for lsearch?
<6> lsearch -glob [list "\\\[crap\\\]" *] is
<3> glk: #1612 (170 clicks) Tcl: -1
<7> youre using a variable as the pattern for lsearch?
<6> yes
<7> see string map
<6> but even so when i enter a double quoted string instead of a variable the same weirdness results
<7> there is no weirdness
<6> why does lsearch seem to be backslashing metacharacters in the list searched?
<6> i'd need to retype my examples as they're wrong
<6> but maybe you get the idea
<6> so string map { "\[" "\\\[" "\]" "\\\]" } $crap will do it?
<6> that kludge works but i wish i knew why lsearch -glob was behaving this way
<6> so to recap with a valid example
<6> set blah [list "\[poo\]" 123123]
<3> glk: #1625 (200 clicks) Tcl: {[poo]} 123123
<6> lsearch -glob $blah [list "\[poo\]" *] will return -1
<6> lsearch -glob $blah [list "\\\[poo\\\]" *] will return 0
<6> question: why?
<7> its called escaping for one
<7> not backslashing
<7> and [ ] and special characters in glob patterns
<7> if you dont want that then use -exact
<7> lsearch -glob {[poo]} o
<3> RockShox: #1633 (139 clicks) Tcl: -1
<7> lsearch -glob o {[poo]}
<3> RockShox: #1634 (140 clicks) Tcl: 0
<7> get it
<6> your example isn't the same
<6> lsearch -glob {[poo]} "\[poo\]"
<3> glk: #1637 (166 clicks) Tcl: -1
<6> lsearch -glob {[poo]} "[poo]"
<6> i thought of asking for "escaping" but figured i'd be happy with simple backslashing and didn't want to confuse the issue with html escaping
<6> is my next to last lsearch supposed to result in -1, rockshox?
<6> wait, i see.
<6> tcl is expanding metacharacters inside quoted strings too
<7> uh what?
<6> for the globbing
<7> sigh
<6> i started tcl a couple days ago didn't realize a bare * is about the same as "*"
<6> just trying to tweak a half-broken script, too, so wasn't about to plunge into it
<7> double quotes allow expansion
<7> braces do not
Return to
#tcl
or
Go to some related
logs:
#worldcup
#gamedev
aholesahole
tile view,icon size,xp
idology+politics
#linux-noob
#openbsd
Mohammad Mona Byrd Fatemi muslim
installation wquick
maidgore
|
|