Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] Diff of /sml/branches/SMLNJ/src/runtime/c-libs/smlnj-sockets/util-mkhostent.c
ViewVC logotype

Diff of /sml/branches/SMLNJ/src/runtime/c-libs/smlnj-sockets/util-mkhostent.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 438, Wed Sep 15 16:37:27 1999 UTC revision 439, Wed Sep 15 16:37:27 1999 UTC
# Line 38  Line 38 
38          for (nAddrs = 0;  hentry->h_addr_list[nAddrs] != NIL(char *);  nAddrs++)          for (nAddrs = 0;  hentry->h_addr_list[nAddrs] != NIL(char *);  nAddrs++)
39              continue;              continue;
40          for (i = nAddrs, addrs = LIST_nil;  --i >= 0;  ) {          for (i = nAddrs, addrs = LIST_nil;  --i >= 0;  ) {
41              addr = ML_CData(msp, hentry->h_addr_list[i], hentry->h_length);              addr = ML_AllocString (msp, hentry->h_length);
42                memcpy (GET_SEQ_DATAPTR(void, addr), hentry->h_addr_list[i],
43                    hentry->h_length);
44              LIST_cons(msp, addrs, addr, addrs);              LIST_cons(msp, addrs, addr, addrs);
45          }          }
46          REC_ALLOC4 (msp, res, name, aliases, af, addrs);          REC_ALLOC4 (msp, res, name, aliases, af, addrs);

Legend:
Removed from v.438  
changed lines
  Added in v.439

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0