Subversion Repositories Kolibri OS

Rev

Rev 750 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  1.  
  2. ; Macroinstruction for making export section
  3.  
  4.  
  5. macro export dllname,[label,string]
  6.  { common
  7.     local module,addresses,names,ordinal,count
  8.     count = 0
  9.    forward
  10.     count = count+1
  11.    common
  12.     dd 0,0,0, (module-OS_BASE) , 1
  13.     dd count,count,(addresses-OS_BASE),(names-OS_BASE),(ordinal-OS_BASE)
  14.     addresses:
  15.    forward
  16.     dd (label-OS_BASE)
  17.    common
  18.     names:
  19.    forward
  20.     local name
  21.     dd (name-OS_BASE)
  22.    common
  23.     ordinal: count = 0
  24.    forward
  25.     dw count
  26.     count = count+1
  27.    common
  28.     module db dllname,0
  29.    forward
  30.     name db string,0
  31.  }
  32.