Searched refs:tags (Results 1 - 13 of 13) sorted by relevance

/ast/src/lib/libtk/library/demos/
H A Dfloor.tcl41 $w create rect 0 100 1 101 -fill {} -outline {} -tags marker
66 # in the floorplan. It changes tags so that the current room is
98 -tags highlight"]
126 -tags {floor1 bg} -fill $fill
127 $w create line 386 129 398 129 -fill $outline -tags {floor1 bg}
128 $w create line 258 355 258 387 -fill $outline -tags {floor1 bg}
129 $w create line 60 387 60 391 -fill $outline -tags {floor1 bg}
130 $w create line 0 337 0 391 -fill $outline -tags {floor1 bg}
131 $w create line 60 391 0 391 -fill $outline -tags {floor1 bg}
132 $w create line 3 114 3 337 -fill $outline -tags {floor
[all...]
H A Ditems.tcl70 -cap butt -join miter -tags item
71 $c create line 4.67c 1c 4.67c 4c -arrow last -tags item
72 $c create line 6.33c 1c 6.33c 4c -arrow both -tags item
75 -width 3 -fill $red -tags item
78 -arrow both -arrowshape {15 15 7} -tags item
80 -cap round -join round -tags item
84 -fill $blue -tags item
86 -arrow both -width 3 -tags item
90 -fill $red -tags item
95 -outline black -width 4 -tags ite
[all...]
H A Dhscale.tcl27 $w.frame.canvas create polygon 0 0 1 1 2 2 -fill DeepSkyBlue3 -tags poly
28 $w.frame.canvas create line 0 0 1 1 2 2 0 0 -fill black -tags line
H A Dvscale.tcl29 $w.frame.canvas create polygon 0 0 1 1 2 2 -fill SeaGreen3 -tags poly
30 $w.frame.canvas create line 0 0 1 1 2 2 0 0 -fill black -tags line
H A Dcscroll.tcl48 -outline black -fill $bg -tags rect
50 -anchor center -tags text
H A Darrow.tcl22 set tags [$c gettags current]
23 if {$tags != ""} {
24 set cur [lindex $tags [lsearch -glob $tags box?]]
45 -tags {box1 box}"
48 -tags {box2 box}"
51 -tags {box3 box}"
H A Dwidget55 # Create a bunch of tags to use in the text widget, such as those for
57 # tags.
102 set tags [.t tag names {@%x,%y}]
103 set i [lsearch -glob $tags demo-*]
274 set tags [.t tag names $index]
275 set i [lsearch -glob $tags demo-*]
282 set demo [string range [lindex $tags $i] 5 end]
297 set tags [.t tag names $index]
298 set i [lsearch -glob $tags demo-*]
304 set demo [string range [lindex $tags
[all...]
H A Dstyle.tcl4 # various display styles that may be set for tags.
64 $w.text insert end tags bold
67 tags with various display styles. If you do this, then the tagged
/ast/src/cmd/html/
H A Dhtml2rtf.h76 int tags; /* # tags in rendering */ member in struct:__anon96
77 Tag_t* tag[1]; /* rendering tags */
120 Hash_table_t* tags; /* tag dictionary */ member in struct:State_s
H A Dhtml2rtf.c34 " begin/end tags in the input \bhtml\b and warns about imbalance.]"
639 for (i = 0; i < rp->tags; i++)
652 for (i = rp->tags - 1; i > 0; i--)
669 if (tp = (Tag_t*)hashget(state.tags, s))
677 else if (!(tp = newof(NiL, Tag_t, 1, 0)) || !(tp->name = hashput(state.tags, 0, tp)))
689 if (rp->tag[n] = (Tag_t*)hashget(state.tags, s))
692 if (!(rp->tags = n))
982 if (!(tp = (Tag_t*)hashget(state.tags, s)))
1416 static const Tag_t tags[] = variable
1510 if (!(state.tags
[all...]
/ast/src/lib/libdss/
H A Dtag.c232 include(Tag_t* tag, Tagframe_t* fp, Tags_t* cp, Tags_t* tags, Tagdisc_t* disc) argument
286 table(Tag_t* tag, Tagframe_t* fp, Tags_t* cp, Tags_t* tags, Tagdisc_t* disc) argument
332 for (tp = tags; tp->name && !streq(b, tp->name); tp++);
425 tagparse(Tag_t* tag, Tagframe_t* fp, Tags_t* tags, Tagdisc_t* disc) argument
515 else if (!tags)
523 for (tp = tags; tp->name; tp++)
537 if ((*(Builtin_f)tp->begf)(tag, fp, tp, tags, disc))
740 * open and parse nested tags in ip
744 tagopen(Sfio_t* ip, const char* file, int line, Tags_t* tags, Tagdisc_t* disc) argument
765 r = tagparse(tag, NiL, tags, dis
809 scan(Tag_t* tag, Tagframe_t* fp, Tagscan_f visit, void* handle, register Tags_t* tags, Tagdisc_t* disc) argument
875 tagscan(Tags_t* tags, Tagscan_f visit, void* handle, Tagdisc_t* disc) argument
933 tagusage(Tags_t* tags, Sfio_t* op, Tagdisc_t* disc) argument
[all...]
/ast/src/cmd/dsslib/xml/
H A Dxml.c30 "pure XML (\aname=value\a attributes within tags ignored) and JSON. In "
42 "[+TAGS?The supported tags are:]{"
1173 static Tags_t tags[] = variable
1216 if (tagusage(tags, sp, &xml->dsstagdisc.tagdisc))
1247 if (!(tag = tagopen(sp, path, 1, &tags[0], &xml->dsstagdisc.tagdisc)) || tagclose(tag))
/ast/src/cmd/dsslib/flat/
H A Dflat.c49 "[+TAGS?The supported tags are:]{"
1817 " remaining tags may appear inside <PHYSICAL>."
1818 " Outside of <PHYSICAL> the tags provide logical"
2099 " remaining tags may appear inside <PHYSICAL>."
2100 " Outside of <PHYSICAL> the tags provide logical"
3015 static Tags_t tags[] = variable
3155 if (tagusage(tags, sp, &flat->dsstagdisc.tagdisc))
3200 if (!(tag = tagopen(sp, path, 1, &tags[0], &flat->dsstagdisc.tagdisc)) || tagclose(tag))

Completed in 50 milliseconds