Subversion Repositories Kolibri OS

Rev

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

  1. format coff
  2. use32                                   ; Tell compiler to use 32 bit instructions
  3.        
  4. section '.flat' code                    ; Keep this line before includes or GCC messes up call addresses
  5.  
  6. ;include 'struct.inc'
  7. include '../../../programs/proc32.inc'
  8. include '../../../programs/macros.inc'
  9. purge section,mov,add,sub
  10.  
  11. include '../../../programs/dll.inc'
  12.        
  13. public init_rasterworks as '_kolibri_rasterworks_init'
  14.        
  15. ;;; Returns 0 on success. -1 on failure.
  16.  
  17. proc init_rasterworks
  18.         mcall 68,11
  19.         stdcall dll.Load, @IMPORT
  20.         ret
  21. endp   
  22.        
  23. @IMPORT:
  24.  
  25. library lib_rasterworks,     'rasterworks.obj'
  26.  
  27. import  lib_rasterworks, \
  28.                 drawText           , 'drawText'    , \
  29.         countUTF8Z         , 'cntUTF-8'    , \
  30.                 charsFit           , 'charsFit'    , \
  31.                 strWidth           , 'strWidth'
  32.  
  33. public drawText         as  '_drawText'
  34. public countUTF8Z       as  '_countUTF8Z'
  35. public charsFit         as  '_charsFit'
  36. public strWidth         as  '_strWidth'
  37.