projects
/
pspp
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Added some extraneous crud to .cvsignore files
[pspp]
/
src
/
language
/
control
/
control-stack.c
diff --git
a/src/language/control/control-stack.c
b/src/language/control/control-stack.c
index 7263842933fe225da0a7625250b540cdb89b72aa..4b57bdeceb473e1b2d48872ac25beb2ed2fabd8f 100644
(file)
--- a/
src/language/control/control-stack.c
+++ b/
src/language/control/control-stack.c
@@
-11,12
+11,12
@@
struct ctl_struct
{
struct ctl_struct
{
- struct ctl_class *class; /* Class of control structure. */
+
const
struct ctl_class *class; /* Class of control structure. */
struct ctl_struct *down; /* Points toward the bottom of ctl_stack. */
void *private; /* Private data. */
};
struct ctl_struct *down; /* Points toward the bottom of ctl_stack. */
void *private; /* Private data. */
};
-struct ctl_struct *ctl_stack;
+st
atic st
ruct ctl_struct *ctl_stack;
void
ctl_stack_clear (void)
void
ctl_stack_clear (void)
@@
-31,7
+31,7
@@
ctl_stack_clear (void)
}
void
}
void
-ctl_stack_push (struct ctl_class *class, void *private)
+ctl_stack_push (
const
struct ctl_class *class, void *private)
{
struct ctl_struct *ctl;
{
struct ctl_struct *ctl;
@@
-44,7
+44,7
@@
ctl_stack_push (struct ctl_class *class, void *private)
}
void *
}
void *
-ctl_stack_top (struct ctl_class *class)
+ctl_stack_top (
const
struct ctl_class *class)
{
struct ctl_struct *top = ctl_stack;
if (top != NULL && top->class == class)
{
struct ctl_struct *top = ctl_stack;
if (top != NULL && top->class == class)
@@
-61,7
+61,7
@@
ctl_stack_top (struct ctl_class *class)
}
void *
}
void *
-ctl_stack_search (struct ctl_class *class)
+ctl_stack_search (
const
struct ctl_class *class)
{
struct ctl_struct *ctl;
{
struct ctl_struct *ctl;
@@
-75,7
+75,7
@@
ctl_stack_search (struct ctl_class *class)
}
void
}
void
-ctl_stack_pop (void *private
UNUSED
)
+ctl_stack_pop (void *private)
{
struct ctl_struct *top = ctl_stack;
{
struct ctl_struct *top = ctl_stack;