   1207   return p;
   1208 #else
   1209   char *r;
   1210   int n, y;
   1211 
   1212   Tcl_DStringSetLength(&dstr,0);
   1213   if ((n = Tcl_Gets(chn, &dstr)) >= 0) {
   1214     /*    Tcl_DStringAppend(&dstr, "\r\n", 2);*/
   1215     /* printf("C%d=%s\n", n, dstr.string); */
   1216     if (str) {
   1217       strncpy(str,dstr.string,size);
   1218       return str;
   1219     } else
   1220       return dstr.string;
   1221   } else {
   1222     if (!Tcl_InputBlocked(chn))
   1223       return NULL;
   1224 
   1225 again:
   1226     Tcl_CreateFileHandler(fgets_f, TCL_READABLE|TCL_EXCEPTION, tk_fgets_proc, 0);
   1227 
   1228     tk_fgets_input = 0;
   1229     /*    printf("R=");*/
   1230     do {
   1231       n=Tk_DoOneEvent(0); 
   1232       /*      printf(".");*/
   1233     } while (!tk_fgets_input);
   1234     /*    printf("\n");*/
   1235 
   1236 
   1237     Tcl_DStringSetLength(&dstr,0);
   1238     n = Tcl_Gets(chn, &dstr);
   1239     if (n >= 0) {
   1240       /*      Tcl_DStringAppend(&dstr, "\r\n", 2);*/
   1241       /* printf("F=%s\n", dstr.string); */
   1242       if (str) {
   1243 	strncpy(str,dstr.string,size);
   1244 	return str;
   1245       } else
   1246 	return dstr.string;
   1247     } else {
   1248       printf("n=%d\n",n);
   1249       if (!Tcl_InputBlocked(chn))
   1250 	return NULL;
   1251       else
   1252 	goto again;
   1253     }
   1254   }
   1255 #endif
   1256 }
   1257 
   1258 
   1259 
   1260 
   1261 
p (Channel *) chn
p *(Channel *) chn
next
p *(Channel *) chn
help watch
wtach (Channel *) chn->channelName
watch (Channel *) chn->channelName
watch ((Channel *) chn)->channelName
cont
watch
watch ((Channel *) chn)
cont
break tk.c:1165
run -R news.uwa.edu.au
watch *chn
cont
run
p *(Channel *)chn
watch **chn
watch (Channel *)chn->channelName
watch ((Channel *)chn)->channelName
cont
quit
break nntp.c:1117
run -A -R localhost
step
next
print buf
next
print buf
print response
quit
break nntp.c:1117
run
run -A -R localhost
step
next
print buf
quit
break nntp.c:546
run
run -A -R news.uwa.edu.au
next
step
next
step
next
step
next
step
frame 2
frame 3
frame 4
frame 5
frame 4
run
cont
frame 6
frame 5
break nntp.c:689
cont
frame 1
frame 2
frame 1
quit
frame 0
print name
print master
print sorted_groups
frame 2
quit
frame 0
print ah
print firsta
print cura
quit
frame 0
frame 1
core-file /usr/home/toivo/nn/core
frame 0
print ah
print cura
print quick
print articles
print *(articles)
print **(articles)
print **(articles+1)
print **(articles+2)
print **(articles+3)
print **(articles+4)
print **(articles+5)
print **(articles+6)
print **(articles+10)
print **(articles+15)
print cura
print **(articles+35)
print firsta
print **(articles+135)
p firsta+cura
print **(articles+119)
print ah
p articles[firsta + cura]
p *articles[firsta + cura]
p articles[119]
p articles[118]
p articles[110]
p articles[100]
p articles[1]
p articles[5]
p articles[8]
p articles[18]
p articles[58]
p articles[98]
p articles[88]
p articles[78]
p articles[82]
p articles[84]
p articles[86]
p articles[87]
print firsta
print cura
frame 1
print pcur
print cur
print n_articles
frame 2
quit
run
frame 1
frame 0
print str
up
print term_name
quit
frame 0
print article_id
print art_id_to_mi
p art_id_to_mi[article_id]
p art_id_to_mi[0]
p art_id_to_mi[1]
p art_id_to_mi[2]
p art_id_to_mi[3]
p art_id_to_mi[4]
frame 1
frame 2
frame 1
p menu_info
quit
frame 0
p art_id_to_mi[1]
p art_id_to_mi[2]
p article_id
p **art_id_to_mi
p *art_id_to_mi
p *4
p **art_id_to_mi
p *art_id_to_mi[0]
p *art_id_to_mi[1]
quit
frame 0
print firsta
print cura
print articles
frame 1
print cur
print ah
frame 0
p articles[firsta + cura]
quit
frame 0
p firsta + cura
p articles[10]
p articles[20]
p articles[18]
p articles[15]
p articles[16]
p articles[17]
p firsta
p cura
quit
frame 0
print firsta
print cura
quit
frame 2
quit
frame 1
quit
run
break menu.c:317
cont
quit
run
quit
frame 1
quit
file /usr/home/toivo/nn/nn-tk
quit
kill
quit

