| 1 | ; |
| 2 | ; SWIList format file |
| 3 | ; |
| 4 | ; Defines output styles for SWIList |
| 5 | ; |
| 6 | |
| 7 | [Assembler...] |
| 8 | ; |
| 9 | ; swis.sh |
| 10 | ; |
| 11 | ; SWI names from numbers [generated %d[%zdy %mo %ce%yr] by SWIList] |
| 12 | ; You may freely distribute and modify this file. |
| 13 | ; |
| 14 | |
| 15 | [ :LNOT::DEF:swis__dfn |
| 16 | GBLL swis__dfn |
| 17 | |
| 18 | MACRO |
| 19 | SWIDEF $name,$number |
| 20 | $name EQU $number |
| 21 | X$name EQU $number :OR: &20000 |
| 22 | MEND |
| 23 | %% |
| 24 | |
| 25 | ; --- %m SWIs --- |
| 26 | |
| 27 | %% |
| 28 | SWIDEF %s,&%n |
| 29 | %% |
| 30 | |
| 31 | ] |
| 32 | |
| 33 | END |
| 34 | [C...] |
| 35 | /* |
| 36 | * swis.h |
| 37 | * |
| 38 | * SWI names from numbers [generated %d[%zdy %mo %ce%yr] by SWIList] |
| 39 | * You may freely distribute and modify this file. |
| 40 | */ |
| 41 | |
| 42 | #pragma force_top_level |
| 43 | #pragma include_only_once |
| 44 | |
| 45 | #ifndef SWIS_H |
| 46 | #define SWIS_H |
| 47 | %% |
| 48 | |
| 49 | /* --- %m SWIs --- */ |
| 50 | |
| 51 | %% |
| 52 | #define %s 0x%n |
| 53 | #define X%s 0x%x |
| 54 | %% |
| 55 | |
| 56 | #endif |
| 57 | [C++...] |
| 58 | // |
| 59 | // swis.h |
| 60 | // |
| 61 | // SWI names from numbers [generated %d[%zdy %mo %ce%yr] by SWIList] |
| 62 | // You may freely distribute and modify this file. |
| 63 | // |
| 64 | |
| 65 | #ifndef SWIS_H |
| 66 | #define SWIS_H |
| 67 | %% |
| 68 | |
| 69 | // --- %m SWIs --- |
| 70 | |
| 71 | %% |
| 72 | #define %s 0x%n |
| 73 | #define X%s 0x%x |
| 74 | %% |
| 75 | |
| 76 | #endif |