Last change
on this file since 0170798 was 3ae31e9, checked in by Thomas Lopatic <thomas@…>, 7 years ago |
Imported original source code.
|
-
Property mode
set to
100755
|
File size:
1.5 KB
|
Rev | Line | |
---|
[3ae31e9] | 1 | scinit.c -- score list functions
|
---|
| 2 | Version 3 -- 1987-04-24
|
---|
| 3 |
|
---|
| 4 | Score storage variables:
|
---|
| 5 |
|
---|
| 6 | BOOL se_chg; /* Score free list changed flag */
|
---|
| 7 |
|
---|
| 8 | long spcount; /* Score storage pool free entry count */
|
---|
| 9 | long frags; /* Score storage pool fragment count */
|
---|
| 10 |
|
---|
| 11 | long se1_cnt; /* Score free list E_SIZE1 entry count */
|
---|
| 12 | long se2_cnt; /* Score free list E_SIZE2 entry count */
|
---|
| 13 | long se3_cnt; /* Score free list E_SIZE3 entry count */
|
---|
| 14 |
|
---|
| 15 | long *pspool; /* Score storage pool pointer */
|
---|
| 16 |
|
---|
| 17 | struct s_entry *size1; /* Score E_SIZE1 entry free list pointer */
|
---|
| 18 | struct s_entry *size2; /* Score E_SIZE2 entry free list pointer */
|
---|
| 19 | struct s_entry *size3; /* Score E_SIZE3 entry free list pointer */
|
---|
| 20 |
|
---|
| 21 | long spool[MAX_SE]; /* Score storage pool */
|
---|
| 22 |
|
---|
| 23 | |
---|
| 24 |
|
---|
| 25 |
|
---|
| 26 | Functions:
|
---|
| 27 |
|
---|
| 28 | struct s_entry *
|
---|
| 29 | e_clr(e1)
|
---|
| 30 | struct s_entry *e1;
|
---|
| 31 |
|
---|
| 32 | Clear the event pointed to by 'e1'. Returns 'e1'.
|
---|
| 33 |
|
---|
| 34 | struct s_entry *
|
---|
| 35 | e_ins(e1, e2)
|
---|
| 36 | struct s_entry *e1, *e2;
|
---|
| 37 |
|
---|
| 38 | Insert the event pointed to by 'e1' after the event
|
---|
| 39 | pointed to by 'e2'. Returns 'e1'.
|
---|
| 40 |
|
---|
| 41 | struct s_entry *
|
---|
| 42 | e_rmv(e1)
|
---|
| 43 | struct s_entry *e1;
|
---|
| 44 |
|
---|
| 45 | Remove the event pointed to by 'e1' from the list it's in.
|
---|
| 46 | Returns 'e1'.
|
---|
| 47 |
|
---|
| 48 | struct s_entry *
|
---|
| 49 | e_alc(w)
|
---|
| 50 | int w;
|
---|
| 51 | Allocate a new event entry. Returns the event entry address,
|
---|
| 52 | or E_NULL if none can be allocated.
|
---|
| 53 |
|
---|
| 54 | int
|
---|
| 55 | e_del(e1)
|
---|
| 56 | struct s_entry *e1;
|
---|
| 57 |
|
---|
| 58 | Deallocate the event entry pointed to by 'e1'.
|
---|
| 59 | Returns 0 if successful, 1 if not.
|
---|
| 60 |
|
---|
| 61 | long
|
---|
| 62 | scinit()
|
---|
| 63 |
|
---|
| 64 | Initialize the score data structures.
|
---|
| 65 | Returns the number of free storage units.
|
---|
Note:
See
TracBrowser
for help on using the repository browser.