home *** CD-ROM | disk | FTP | other *** search
/ IBM Aptiva Multimedia Exploration / BPCDROM.ISO / os2image / sym_2 / os2 / dll / buildsym.cmd < prev    next >
Encoding:
Text File  |  1994-11-01  |  724 b   |  21 lines
  1. /* This command file will take the PMWP.MAP file and    */
  2. /* strip out all of the class data information and then */
  3. /* generate a symbol file.                              */
  4. 'erase pmwpnew.map'
  5.  
  6. do until (pos("Publics by Value",record) <> 0)
  7.    record = linein('pmwp.map')
  8.    call lineout 'PMWPNEW.MAP' , record
  9. end
  10.  
  11. do while (lines('pmwp.map') > 0)
  12.    record = linein('pmwp.map')
  13.    /* Yank out classdata information */
  14.    if ((pos("ClassData",record)+pos("NewClass",record)+pos("_Tsk",record)+pos("_task",record)+pos("_rqpr",record)+pos("_tkcl",record)+pos("_thrd",record)) = 0) then
  15.       call lineout 'PMWPNEW.MAP' , record
  16. end
  17.  
  18. 'mapsym pmwpnew.map'
  19. 'erase pmwp.sym'
  20. 'rename pmwpnew.sym pmwp.sym'
  21.