Author: coke Date: Tue May 22 17:37:42 2007 New Revision: 18629 Modified: trunk/ (props changed) trunk/languages/tcl/runtime/builtin/string.pir
Log: [tcl] Remove another instance of old __vtable syntax. Modified: trunk/languages/tcl/runtime/builtin/string.pir ============================================================================== --- trunk/languages/tcl/runtime/builtin/string.pir (original) +++ trunk/languages/tcl/runtime/builtin/string.pir Tue May 22 17:37:42 2007 @@ -446,7 +446,8 @@ rule = globber.'compile'(pattern) match = rule(the_string) - .return match.__get_bool() + $I0 = istrue match + .return ($I0) bad_option: $S1 = 'bad option "'
