forked from CLoouis/Tubes2TBFO
-
Notifications
You must be signed in to change notification settings - Fork 1
/
stack.c
58 lines (51 loc) · 1.38 KB
/
stack.c
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
#include <stdio.h>
#include "stack.h"
/* ************ Prototype ************ */
/* *** Konstruktor/Kreator *** */
void CreateEmptyst (Stackt *S)
/* I.S. sembarang; */
/* F.S. Membuat sebuah Stackt S yang kosong berkapasitas MaxEll */
/* jadi indeksnya antara 1.. MaxEll+1 karena 0 tidak dipakai */
/* Ciri Stackt kosong : TOP berNillai Nill */
{
Top(*S) = Nill;
}
/* ************ Predikat Untuk test keadaan KOLEKSI ************ */
bool IsEmptyst (Stackt S)
/* Mengirim true jika Stackt kosong: lihat definisi di atas */
{
return (Top(S) == Nill);
}
bool isFull (Stackt S)
/* Mengirim true jika tabel penampung Nillai elemen Stackt penuh */
{
return (Top(S) == MaxEll);
}
/* ************ Menambahkan sebuah elemen ke Stackt ************ */
void Pushst (Stackt * S, Infotype X)
/* Menambahkan X sebagai elemen Stackt S. */
/* I.S. S mungkin kosong, tabel penampung elemen Stackt TIDAK penuh */
/* F.S. X menjadi TOP yang baru,TOP bertambah 1 */
{
Top(*S)++;
InfoTop(*S) = X;
}
/* ************ Menghapus sebuah elemen Stackt ************ */
void Popst (Stackt * S, Infotype* X)
/* Menghapus X dari Stackt S. */
/* I.S. S tidak mungkin kosong */
/* F.S. X adalah Nillai elemen TOP yang lama, TOP berkurang 1 */
{
*X = InfoTop(*S);
Top(*S)--;
}
Stackt Reverse(Stackt S){
Stackt res;
CreateEmptyst(&res);
while (!IsEmptyst(S)){
Infotype top;
Popst(&S, &top);
Pushst(&res, top);
}
return res;
}