2ee739cc |
1 | /* |
2 | * tspr.h |
3 | * |
4 | * [Generated from tspr, 25 September 1996] |
5 | */ |
6 | |
7 | #if !defined(__CC_NORCROFT) || !defined(__arm) |
8 | #error You must use the Norcroft ARM Compiler for Sapphire programs |
9 | #endif |
10 | |
11 | #pragma include_only_once |
12 | #pragma force_top_level |
13 | |
14 | #ifndef __tspr_h |
15 | #define __tspr_h |
16 | |
17 | #ifndef __sapphire_h |
18 | #include "sapphire.h" |
19 | #endif |
20 | |
21 | /*----- Overview ----------------------------------------------------------* |
22 | * |
23 | * Functions provided: |
24 | * |
25 | * tspr_getSprAddr |
26 | * tspr_borderWidths |
27 | * tspr_adjustBox |
28 | */ |
29 | |
30 | /* --- tspr_getSprAddr --- * |
31 | * |
32 | * On entry: -- |
33 | * |
34 | * On exit: R0 == pointer to tool sprites, or 0 if none |
35 | * |
36 | * Use: Returns a pointer to the toolsprites. If the user is using |
37 | * RISC OS 2, or there are no toolsprites defined, then |
38 | * 0 is returned. |
39 | */ |
40 | |
41 | extern routine tspr_getSprAddr; |
42 | |
43 | /* --- tspr_borderWidths --- * |
44 | * |
45 | * On entry: -- |
46 | * |
47 | * On exit: R0 == title bar height |
48 | * R1 == vertical scroll bar width |
49 | * R2 == horizontal scroll bar height |
50 | * |
51 | * Use: Return the width of window tools by looking at the |
52 | * sprites associated with them, rather than creating |
53 | * a temporary window. |
54 | */ |
55 | |
56 | extern routine tspr_borderWidths; |
57 | |
58 | /* --- tspr_adjustBox --- * |
59 | * |
60 | * On entry: R1 == pointer to Wimp_OpenWindow block to modify |
61 | * |
62 | * On exit: Block updated in place |
63 | * |
64 | * Use: Updates the open block to ensure that the window is opened |
65 | * on the screen. |
66 | */ |
67 | |
68 | extern routine tspr_adjustBox; |
69 | |
70 | /*----- That's all, folks -------------------------------------------------*/ |
71 | |
72 | #endif |