/ast/src/cmd/INIT/ |
H A D | hello.c | 23 int main() { int new = 0; printf("hello world\n"); return new;} local
|
/ast/src/lib/libtk/library/ |
H A D | palette.tcl | 21 # will be used as the new background color (all other colors will 29 # Create an array that has the complete new palette. If some colors 33 set new(background) [lindex $args 0] 35 array set new $args 37 if ![info exists new(background)] { 40 if ![info exists new(foreground)] { 41 set new(foreground) black 43 set bg [winfo rgb . $new(background)] 44 set fg [winfo rgb . $new(foreground)] 49 if ![info exists new( [all...] |
H A D | menu.tcl | 222 error "can't post $menu: it isn't a descendant of $w (this is a new requirement in Tk versions 3.0 and later)" 368 set new [winfo containing $rootx $rooty] 369 if {($new != $tkPriv(inMenubutton)) && (($new == "") 370 || ([winfo toplevel $new] == [winfo toplevel $w]))} { 374 if {($new != "") && ([winfo class $new] == "Menubutton") 375 && ([$new cget -indicatoron] == 0) 378 tkMbPost $new $rootx $rooty 380 tkMbEnter $new [all...] |
H A D | text.tcl | 30 # in a row, from a new up or down. 585 # pos - The desired new position for the cursor in the window. 600 # keyboard. It moves the cursor to a new position, then extends 605 # new - A new position for the insertion cursor (the cursor hasn't 608 proc tkTextKeySelect {w new} { 612 if [$w compare $new < insert] { 613 $w tag add sel $new insert 615 $w tag add sel insert $new 619 if [$w compare $new < ancho [all...] |
H A D | entry.tcl | 420 # keyboard. It moves the cursor to a new position, then extends 425 # new - A new position for the insertion cursor (the cursor hasn't 428 proc tkEntryKeySelect {w new} { 431 $w selection to $new 433 $w selection adjust $new 435 $w icursor $new 513 # pos - The desired new position for the cursor in the window. 540 set new [string index [$w get] [expr $i-1]][string index [$w get] $first] 542 $w insert insert $new [all...] |
/ast/src/lib/libtk/generic/ |
H A D | tkAtom.c | 74 * A new entry may be added to the local atom cache. 87 int new; 94 hPtr = Tcl_CreateHashEntry(&dispPtr->nameTable, name, &new); 95 if (new) { 102 &new); 150 int new, mustFree; 162 &new); 169 &new); 207 int new; 211 &new); 86 int new; local 148 int new, mustFree; local 204 int new; local [all...] |
H A D | tkCursor.c | 111 int new; 119 nameHashPtr = Tcl_CreateHashEntry(&nameTable, (char *) &nameKey, &new); 120 if (!new) { 142 idHashPtr = Tcl_CreateHashEntry(&idTable, (char *) &idKey, &new); 143 if (!new) { 194 int new; 210 dataHashPtr = Tcl_CreateHashEntry(&dataTable, (char *) &dataKey, &new); 211 if (!new) { 245 idHashPtr = Tcl_CreateHashEntry(&idTable, (char *) &idKey, &new); 246 if (!new) { 110 int new; local 192 int new; local [all...] |
H A D | tkBitmap.c | 151 int new; 162 nameHashPtr = Tcl_CreateHashEntry(&nameTable, (char *) &nameKey, &new); 163 if (!new) { 170 * No suitable bitmap exists. Create a new bitmap from the 232 &new); 233 if (!new) { 275 int new; 283 predefHashPtr = Tcl_CreateHashEntry(&predefTable, name, &new); 284 if (!new) { 478 int new; 150 int new; local 273 int new; local 472 int new; local [all...] |
H A D | tkConfig.c | 364 char *old, *new; 367 new = NULL; 369 new = (char *) ckalloc((unsigned) (strlen(value) + 1)); 370 strcpy(new, value); 376 *((char **) ptr) = new; 426 Pixmap new, old; 429 new = None; 432 new = Tk_GetBitmap(interp, tkwin, uid); 433 if (new == None) { 441 *((Pixmap *) ptr) = new; 361 char *old, *new; local 423 Pixmap new, old; local 442 Tk_3DBorder new, old; local 468 Tk_Cursor new, old; local [all...] |
H A D | tkFrame.c | 216 * a new main window. See the user documentation for the "frame" 232 * new application, then this is NULL. */ 240 * new application. */ 244 Tk_Window new = NULL; 298 new = Tk_CreateWindowFromPath(interp, tkwin, argv[1], screenName); 301 * We were called from Tk_Init; create a new application. 307 new = TkCreateMainWindow(interp, screenName, appName); 309 if (new == NULL) { 313 className = Tk_GetOption(new, "class", "Class"); 318 Tk_SetClass(new, classNam 242 Tk_Window new = NULL; local [all...] |
H A D | tkGC.c | 104 int new; 241 valueHashPtr = Tcl_CreateHashEntry(&valueTable, (char *) &valueKey, &new); 242 if (!new) { 250 * new GC and add a new structure to the database. 280 idHashPtr = Tcl_CreateHashEntry(&idTable, (char *) &idKey, &new); 281 if (!new) { 103 int new; local
|
H A D | tkColor.c | 90 * If a colormap fills up, attempts to allocate new colors from that 161 int new; 178 nameHashPtr = Tcl_CreateHashEntry(&nameTable, (char *) &nameKey, &new); 179 if (!new) { 229 * Now create a new TkColor structure and add it to nameTable. 280 int new; 298 valueHashPtr = Tcl_CreateHashEntry(&valueTable, (char *) &valueKey, &new); 299 if (!new) { 307 * color and add a new structure to valueTable. 564 * a new on 160 int new; local 278 int new; local [all...] |
H A D | tkEntry.c | 340 Tk_Window new; 348 new = Tk_CreateWindowFromPath(interp, tkwin, argv[1], (char *) NULL); 349 if (new == NULL) { 360 entryPtr->tkwin = new; 361 entryPtr->display = Tk_Display(new); 872 GC new; 929 new = Tk_GetGC(entryPtr->tkwin, GCForeground|GCFont|GCGraphicsExposures, 934 entryPtr->textGC = new; 938 new = Tk_GetGC(entryPtr->tkwin, GCForeground|GCFont, &gcValues); 942 entryPtr->selTextGC = new; 339 Tk_Window new; local 868 GC new; local 1332 char *new; local 1395 char *new; local [all...] |
H A D | tkGeometry.c | 90 * Proc becomes the new geometry manager for tkwin, replacing 94 * manager for tkwin different from the new one, it is notified 217 * repositioned to take account of the new internal border width. 247 * with the new information. The caller must eventually call 265 int new, map; 279 hPtr = Tcl_CreateHashEntry(&maintainHashTable, (char *) master, &new); 280 if (!new) { 261 int new, map; local
|
H A D | tkCanvText.c | 196 * This procedure is invoked to create a new text item 206 * A new text item is created. 214 Tk_Canvas canvas; /* Canvas to hold new item. */ 215 Tk_Item *itemPtr; /* Record to hold new item; header 628 * Create the new TextLine array and fill it in using the geometry 916 char *new; 930 new = (char *) ckalloc((unsigned) (textPtr->numChars + length + 1)); 931 strncpy(new, textPtr->text, (size_t) beforeThis); 932 strcpy(new+beforeThis, string); 933 strcpy(new 909 char *new; local 981 char *new; local [all...] |
H A D | tkScrollbar.c | 100 * and lastUnit), or the "new" form (firstFraction and lastFraction). 156 * NEW_STYLE_COMMANDS: Non-zero means the new style of commands 292 Tk_Window new; 300 new = Tk_CreateWindowFromPath(interp, tkwin, argv[1], (char *) NULL); 301 if (new == NULL) { 312 scrollPtr->tkwin = new; 313 scrollPtr->display = Tk_Display(new); 720 GC new; 752 new = Tk_GetGC(scrollPtr->tkwin, GCForeground, &gcValues); 756 scrollPtr->troughGC = new; 291 Tk_Window new; local 716 GC new; local [all...] |
/ast/src/cmd/pax/ |
H A D | testpax.sh | 27 # tar-path tar the old and new archives 95 : new files and base archive 97 mkdir new 98 cd new 129 '') "$@" -wf ../new.$suf $fmt * || status=1 ;; 130 *) $tar cf ../new.$suf . || status=1 ;; 136 "$@" -rf new.$suf -wf old-new.$suf $fmt -z old.$suf || status=1 138 : replicate new archive 140 "$@" -rf old-new [all...] |
H A D | delta2patch.sh | 59 mkdir $tmp $tmp/old $tmp/new || exit 61 pax --nosummary -rf $delta -z $base -s ",.*,$tmp/new/&," $changes 62 diff -r -N -u $tmp/old $tmp/new | sed -e "s,$tmp/new/,,g" -e "s,$tmp/old/,,g" -e $'s/^--- \\([^\t]*\\)/&.orig/' -e '/^diff /s/ [^ ]*$/.orig&/'
|
/ast/src/lib/libtksh/tcl/ |
H A D | tclFHandle.c | 55 * a new file handle if needed. 73 int new; 82 entryPtr = Tcl_CreateHashEntry(&fileTable, (char *) &key, &new); 83 if (new) { 72 int new; local
|
H A D | tclPreserve.c | 133 Reference *new; 135 new = (Reference *) ckalloc((unsigned) 137 memcpy((VOID *) new, (VOID *) refArray, 140 refArray = new; 146 * Make a new entry for the new reference. 131 Reference *new; local
|
/ast/src/lib/libtksh/lib/tksh7.6/ |
H A D | init.tcl | 55 # in one of the common forms !!, !<number>, or ^old^new. If 102 set new [split $errorInfo \n] 103 set new [join [lrange $new 0 [expr [llength $new] - 6]] \n] 105 -errorinfo $new $msg 114 set new [auto_execok $name] 115 if {$new != ""} { 118 return [uplevel exec >&@stdout <@stdin [list $new] [lrange $args 1 end]] 129 if [regexp {^\^([^^]*)\^([^^]*)\^?$} $name dummy old new] { [all...] |
/ast/src/cmd/msgcc/ |
H A D | msgcc.sh | 43 [+?If \b-M-new\b is not specified then messages are merged with those in the 47 [+new?Create a new \b-o\b file.] 48 [+preserve?Messages in the \b-o\b file that are not in new 50 either reuse the message numbers with new message text that 126 -M-new) __merge__= 368 [[ $__verbose__ ]] && print -u2 $__command__: old:1-$((__new__-1)) new:$__new__-$__max__ drop $__ndrop__ add $((__max__-__new__+1))
|
/ast/src/lib/libtksh/src/ |
H A D | basic.c | 161 * Create a new TCL command interpreter. 270 int new; 282 hPtr = Tcl_CreateHashEntry(iPtr->assocData, buffer, &new); 345 * the data is overwritten with the new data. The delete function will 368 int new; 374 hPtr = Tcl_CreateHashEntry(iPtr->assocData, name, &new); 375 if (new == 0) { 539 * Invoke deletion callbacks; note that a callback can create new 823 * was set, errorInfo is cleared before adding the new message. 837 * If an error is already being logged, then the new errorInf 268 int new; local 364 int new; local [all...] |
/ast/src/cmd/ksh93/tests/ |
H A D | variables.sh | 219 then err_exit 'CDPATH does not display new directory' 224 then err_exit 'CDPATH displays new directory when not used' 228 then err_exit "CDPATH ${tmp#/} does not display new directory" 498 VAR=new $tmp/script > $tmp/out 500 [[ $got == new ]] || err_exit "previously unset environment variable not passed to script, expected 'new', got '$got'" 504 VAR=new $tmp/script > $tmp/out 506 [[ $got == new ]] || err_exit "environment variable covering local variable not passed to script, expected 'new', got '$got'" 510 VAR=new [all...] |
/ast/src/cmd/ie/ |
H A D | history.c | 301 * Copy the last <n> commands to a new file and make this the history file 311 off_t old,new=0; local 334 old = new; 335 new = io_seek(fdo,hist_position(++n),SEEK_SET); 349 while(new>old && c!=EOF); 635 * each new-line character is replaced with string <nl>. 889 * compute the new command and line number. 941 * given a file containing a command and a string of the form old=new, 942 * execute the command with the string old replaced by new 949 register char *new local [all...] |