-
Notifications
You must be signed in to change notification settings - Fork 0
/
op_functions3.c
72 lines (61 loc) · 1.61 KB
/
op_functions3.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
59
60
61
62
63
64
65
66
67
68
69
70
71
72
#include "monty.h"
/**
* op_mod - computes the rest of the division of the second top element
* of the stack by the top element of the stack
* @stack: pointer to the pointer to the first element in stack
* @line_number: line number of the instruction
*/
void op_mod(stack_t **stack, unsigned int line_number)
{
if (*stack == NULL || (*stack)->next == NULL)
{
fprintf(stderr, "L%u: can't mod, stack too short\n", line_number);
free_op();
exit(EXIT_FAILURE);
}
if ((*stack)->n == 0)
{
fprintf(stderr, "L%u: division by zero\n", line_number);
free_op();
exit(EXIT_FAILURE);
}
(*stack)->next->n = (*stack)->next->n % (*stack)->n;
op_pop(stack, line_number);
}
/**
* op_pchar - prints the char at the top of the stack
* @stack: pointer to the pointer to the first element in stack
* @line_number: line number of the instruction
*/
void op_pchar(stack_t **stack, unsigned int line_number)
{
if (*stack == NULL)
{
fprintf(stderr, "L%u: can't pchar, stack empty\n", line_number);
free_op();
exit(EXIT_FAILURE);
}
if ((*stack)->n < 0 || (*stack)->n > 127)
{
fprintf(stderr, "L%u: can't pchar, value out of range\n", line_number);
free_op();
exit(EXIT_FAILURE);
}
printf("%c\n", (*stack)->n);
}
/**
* op_pstr - prints the string starting at the top of the stack
* @stack: pointer to the pointer to the first element in stack
* @line_number: line number of the instruction
*/
void op_pstr(stack_t **stack, unsigned int line_number)
{
stack_t *trav = *stack;
while (trav && (trav->n > 0 && trav->n < 128))
{
printf("%c", trav->n);
trav = trav->next;
}
printf("\n");
(void)line_number;
}