Searched refs:bg1 (Results 1 - 1 of 1) sorted by relevance
| /ast/src/lib/libtk/library/demos/ | ||
| H A D | floor.tcl | 30 bg1 $w $colors(bg1) $colors(outline1) 102 # bg1 -- 112 proc bg1 {w fill outline} { procedure 1334 set colors(bg1) #a9c1da 1343 set colors(bg1) white |
Completed in 94 milliseconds