home *** CD-ROM | disk | FTP | other *** search
/ QBasic & Borland Pascal & C / Delphi5.iso / C / Samples / CSAPE32.ARJ / SOURCE / CSSRC / MENUPDPL.C < prev    next >
Encoding:
C/C++ Source or Header  |  1990-09-07  |  604 b   |  39 lines
  1. /*
  2.     menupdpl.c        
  3.  
  4.     % menu_PutDPL
  5.  
  6.     add to the menu's data ptr list
  7.  
  8.     C-scape 3.2
  9.     Copyright (c) 1988, by Oakland Group, Inc.
  10.     ALL RIGHTS RESERVED.
  11.  
  12.     Revision History:
  13.     -----------------
  14.      1/21/90 jdc    changed oslist stuff
  15.      3/28/90 jmd    ansi-fied
  16.      9/07/90 jmd    renamed oslist funcs
  17. */
  18.  
  19. #include "menu.h"
  20.  
  21. char *menu_PutDPL(menu_type menu, char *s)
  22. /*
  23. */
  24. {
  25.     int h;
  26.  
  27.     if (menu->dptrlist == NULL) {
  28.         if ((menu->dptrlist = oslist_Open(1, 0)) == NULL) {
  29.             return(NULL);
  30.         }
  31.     }
  32.     h = oslist_SetSym(menu->dptrlist, s, NULL);
  33.  
  34.     return(oslist_GetSym(menu->dptrlist, h));
  35. }
  36.  
  37.  
  38.  
  39.