Fixing mistakes from previous checkin.

This commit is contained in:
Martin Baulig
1998-06-11 23:53:16 +00:00
parent d9874dca81
commit 321f5180f7
18 changed files with 237 additions and 297 deletions

View File

@@ -33,10 +33,9 @@ glibtop_guile_names_shm_limits (void)
list = gh_list (SCM_UNDEFINED);
for (i = 0; i < GLIBTOP_MAX_SHM_LIMITS; i++)
list = gh_append (list, gh_list
(gh_str02scm (glibtop_names_shm_limits [i]),
SCM_UNDEFINED),
SCM_UNDEFINED);
list = gh_append (gh_list (list,
gh_list (gh_str02scm (glibtop_names_shm_limits [i])),
SCM_UNDEFINED));
return list;
}
@@ -50,10 +49,9 @@ glibtop_guile_types_shm_limits (void)
list = gh_list (SCM_UNDEFINED);
for (i = 0; i < GLIBTOP_MAX_SHM_LIMITS; i++)
list = gh_append (list, gh_list
(gh_str02scm (gettext (glibtop_types_shm_limits [i])),
SCM_UNDEFINED),
SCM_UNDEFINED);
list = gh_append (gh_list (list,
gh_list (gh_str02scm (gettext (glibtop_types_shm_limits [i]))),
SCM_UNDEFINED));
return list;
}
@@ -67,10 +65,9 @@ glibtop_guile_labels_shm_limits (void)
list = gh_list (SCM_UNDEFINED);
for (i = 0; i < GLIBTOP_MAX_SHM_LIMITS; i++)
list = gh_append (list, gh_list
(gh_str02scm (gettext (glibtop_labels_shm_limits [i])),
SCM_UNDEFINED),
SCM_UNDEFINED);
list = gh_append (gh_list (list,
gh_list (gh_str02scm (gettext (glibtop_labels_shm_limits [i]))),
SCM_UNDEFINED));
return list;
}
@@ -84,10 +81,9 @@ glibtop_guile_descriptions_shm_limits (void)
list = gh_list (SCM_UNDEFINED);
for (i = 0; i < GLIBTOP_MAX_SHM_LIMITS; i++)
list = gh_append (list, gh_list
(gh_str02scm (gettext (glibtop_descriptions_shm_limits [i])),
SCM_UNDEFINED),
SCM_UNDEFINED);
list = gh_append (gh_list (list,
gh_list (gh_str02scm (gettext (glibtop_descriptions_shm_limits [i]))),
SCM_UNDEFINED));
return list;
}