Rev 6456 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
| Rev | Author | Line No. | Line |
|---|---|---|---|
| 6454 | punk_joker | 1 | format coff |
| 2 | use32 ; Tell compiler to use 32 bit instructions |
||
| 3 | |||
| 4 | section '.init' code ; Keep this line before includes or GCC messes up call addresses |
||
| 5 | |||
| 6 | include '../../../programs/proc32.inc' |
||
| 7 | include '../../../programs/macros.inc' |
||
| 8 | purge section,mov,add,sub |
||
| 9 | |||
| 10 | include '../../../programs/dll.inc' |
||
| 11 | |||
| 6495 | punk_joker | 12 | public init_kmenu as '_kolibri_kmenu_init' |
| 6454 | punk_joker | 13 | ;;; Returns 0 on success. -1 on failure. |
| 14 | |||
| 15 | proc init_kmenu |
||
| 16 | mcall 68,11 |
||
| 17 | stdcall dll.Load, @IMPORT |
||
| 18 | ret |
||
| 19 | endp |
||
| 20 | |||
| 21 | @IMPORT: |
||
| 22 | library lib_kmenu, 'kmenu.obj' |
||
| 23 | |||
| 24 | import lib_kmenu, \ |
||
| 25 | kmainmenu_draw, 'kmainmenu_draw' , \ |
||
| 26 | kmainmenu_dispatch_cursorevent, 'kmainmenu_dispatch_cursorevent' , \ |
||
| 27 | kmainmenu_get_height, 'kmainmenu_get_height', \ |
||
| 28 | ksubmenu_new, 'ksubmenu_new' , \ |
||
| 29 | ksubmenu_delete, 'ksubmenu_delete' , \ |
||
| 30 | ksubmenu_draw, 'ksubmenu_draw' , \ |
||
| 31 | ksubmenu_add, 'ksubmenu_add' , \ |
||
| 32 | ksubmenu_set_items_margin, 'ksubmenu_set_items_margin' , \ |
||
| 33 | ksubmenu_set_items_padding, 'ksubmenu_set_items_padding' , \ |
||
| 34 | kmenuitem_new, 'kmenuitem_new' , \ |
||
| 35 | kmenuitem_delete, 'kmenuitem_delete' , \ |
||
| 36 | kmenuitem_draw, 'kmenuitem_draw' , \ |
||
| 37 | kmenuitem_get_preffered_width, 'kmenuitem_get_preffered_width' , \ |
||
| 38 | kmenuitem_get_preffered_height, 'kmenuitem_get_preffered_height' , \ |
||
| 39 | kmenu_set_font, 'kmenu_set_font' , \ |
||
| 40 | kmenu_init, 'kmenu_init' |
||
| 41 | |||
| 42 | public kmainmenu_draw as '_kmainmenu_draw' |
||
| 43 | public kmainmenu_dispatch_cursorevent as '_kmainmenu_dispatch_cursorevent' |
||
| 44 | public kmainmenu_get_height as '_kmainmenu_get_height' |
||
| 45 | public ksubmenu_new as '_ksubmenu_new' |
||
| 46 | public ksubmenu_delete as '_ksubmenu_delete' |
||
| 47 | public ksubmenu_draw as '_ksubmenu_draw' |
||
| 48 | public ksubmenu_add as '_ksubmenu_add' |
||
| 49 | public ksubmenu_set_items_margin as '_ksubmenu_set_items_margin' |
||
| 50 | public ksubmenu_set_items_padding as '_ksubmenu_set_items_padding' |
||
| 51 | public kmenuitem_new as '_kmenuitem_new' |
||
| 52 | public kmenuitem_new as '_kmenuitem__submenu_new' |
||
| 53 | public kmenuitem_delete as '_kmenuitem_delete' |
||
| 54 | public kmenuitem_draw as '_kmenuitem_draw' |
||
| 55 | public kmenuitem_get_preffered_width as '_kmenuitem_get_preffered_width' |
||
| 56 | public kmenuitem_get_preffered_height as '_kmenuitem_get_preffered_height' |
||
| 57 | public kmenu_set_font as '_kmenu_set_font' |
||
| 58 | public kmenu_init as '_kmenu_init' |