oxmc/libgtop
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fixing mistakes from previous checkin.

Browse Source
This commit is contained in:
Martin Baulig
1998-06-11 23:53:16 +00:00
parent d9874dca81
commit 8b2bfaa7ca
18 changed files with 237 additions and 297 deletions
Download Patch File Download Diff File Expand all files Collapse all files

32
sysdeps/guile/names/cpu.c
View File

@@ -34,10 +34,9 @@ glibtop_guile_names_cpu (void)
for (i = 0; i < GLIBTOP_MAX_CPU; i++) for (i = 0; i < GLIBTOP_MAX_CPU; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (glibtop_names_cpu [i]), gh_list (gh_str02scm (glibtop_names_cpu [i])),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -52,10 +51,9 @@ glibtop_guile_types_cpu (void)
for (i = 0; i < GLIBTOP_MAX_CPU; i++) for (i = 0; i < GLIBTOP_MAX_CPU; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (glibtop_types_cpu [i]), gh_list (gh_str02scm (glibtop_types_cpu [i])),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -70,11 +68,10 @@ glibtop_guile_labels_cpu (void)
for (i = 0; i < GLIBTOP_MAX_CPU; i++) for (i = 0; i < GLIBTOP_MAX_CPU; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (gettext gh_list (gh_str02scm (gettext
(glibtop_labels_cpu [i])), (glibtop_labels_cpu [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -89,11 +86,10 @@ glibtop_guile_descriptions_cpu (void)
for (i = 0; i < GLIBTOP_MAX_CPU; i++) for (i = 0; i < GLIBTOP_MAX_CPU; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (gettext gh_list (gh_str02scm (gettext
(glibtop_descriptions_cpu [i])), (glibtop_descriptions_cpu [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }

32
sysdeps/guile/names/loadavg.c
View File

@@ -34,10 +34,9 @@ glibtop_guile_names_loadavg (void)
for (i = 0; i < GLIBTOP_MAX_LOADAVG; i++) for (i = 0; i < GLIBTOP_MAX_LOADAVG; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (glibtop_names_loadavg [i]), gh_list (gh_str02scm (glibtop_names_loadavg [i])),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -52,10 +51,9 @@ glibtop_guile_types_loadavg (void)
for (i = 0; i < GLIBTOP_MAX_LOADAVG; i++) for (i = 0; i < GLIBTOP_MAX_LOADAVG; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (glibtop_types_loadavg [i]), gh_list (gh_str02scm (glibtop_types_loadavg [i])),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -70,11 +68,10 @@ glibtop_guile_labels_loadavg (void)
for (i = 0; i < GLIBTOP_MAX_LOADAVG; i++) for (i = 0; i < GLIBTOP_MAX_LOADAVG; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (gettext gh_list (gh_str02scm (gettext
(glibtop_labels_loadavg [i])), (glibtop_labels_loadavg [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -89,11 +86,10 @@ glibtop_guile_descriptions_loadavg (void)
for (i = 0; i < GLIBTOP_MAX_LOADAVG; i++) for (i = 0; i < GLIBTOP_MAX_LOADAVG; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (gettext gh_list (gh_str02scm (gettext
(glibtop_descriptions_loadavg [i])), (glibtop_descriptions_loadavg [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }

32
sysdeps/guile/names/mem.c
View File

@@ -34,10 +34,9 @@ glibtop_guile_names_mem (void)
for (i = 0; i < GLIBTOP_MAX_MEM; i++) for (i = 0; i < GLIBTOP_MAX_MEM; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (glibtop_names_mem [i]), gh_list (gh_str02scm (glibtop_names_mem [i])),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -52,10 +51,9 @@ glibtop_guile_types_mem (void)
for (i = 0; i < GLIBTOP_MAX_MEM; i++) for (i = 0; i < GLIBTOP_MAX_MEM; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (glibtop_types_mem [i]), gh_list (gh_str02scm (glibtop_types_mem [i])),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -70,11 +68,10 @@ glibtop_guile_labels_mem (void)
for (i = 0; i < GLIBTOP_MAX_MEM; i++) for (i = 0; i < GLIBTOP_MAX_MEM; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (gettext gh_list (gh_str02scm (gettext
(glibtop_labels_mem [i])), (glibtop_labels_mem [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -89,11 +86,10 @@ glibtop_guile_descriptions_mem (void)
for (i = 0; i < GLIBTOP_MAX_MEM; i++) for (i = 0; i < GLIBTOP_MAX_MEM; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (gettext gh_list (gh_str02scm (gettext
(glibtop_descriptions_mem [i])), (glibtop_descriptions_mem [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }

32
sysdeps/guile/names/msg_limits.c
View File

@@ -34,10 +34,9 @@ glibtop_guile_names_msg_limits (void)
for (i = 0; i < GLIBTOP_MAX_MSG_LIMITS; i++) for (i = 0; i < GLIBTOP_MAX_MSG_LIMITS; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (glibtop_names_msg_limits [i]), gh_list (gh_str02scm (glibtop_names_msg_limits [i])),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -52,10 +51,9 @@ glibtop_guile_types_msg_limits (void)
for (i = 0; i < GLIBTOP_MAX_MSG_LIMITS; i++) for (i = 0; i < GLIBTOP_MAX_MSG_LIMITS; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (glibtop_types_msg_limits [i]), gh_list (gh_str02scm (glibtop_types_msg_limits [i])),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -70,11 +68,10 @@ glibtop_guile_labels_msg_limits (void)
for (i = 0; i < GLIBTOP_MAX_MSG_LIMITS; i++) for (i = 0; i < GLIBTOP_MAX_MSG_LIMITS; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (gettext gh_list (gh_str02scm (gettext
(glibtop_labels_msg_limits [i])), (glibtop_labels_msg_limits [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -89,11 +86,10 @@ glibtop_guile_descriptions_msg_limits (void)
for (i = 0; i < GLIBTOP_MAX_MSG_LIMITS; i++) for (i = 0; i < GLIBTOP_MAX_MSG_LIMITS; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (gettext gh_list (gh_str02scm (gettext
(glibtop_descriptions_msg_limits [i])), (glibtop_descriptions_msg_limits [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }

32
sysdeps/guile/names/prockernel.c
View File

@@ -34,10 +34,9 @@ glibtop_guile_names_proc_kernel (void)
for (i = 0; i < GLIBTOP_MAX_PROC_KERNEL; i++) for (i = 0; i < GLIBTOP_MAX_PROC_KERNEL; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (glibtop_names_proc_kernel [i]), gh_list (gh_str02scm (glibtop_names_proc_kernel [i])),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -52,10 +51,9 @@ glibtop_guile_types_proc_kernel (void)
for (i = 0; i < GLIBTOP_MAX_PROC_KERNEL; i++) for (i = 0; i < GLIBTOP_MAX_PROC_KERNEL; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (glibtop_types_proc_kernel [i]), gh_list (gh_str02scm (glibtop_types_proc_kernel [i])),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -70,11 +68,10 @@ glibtop_guile_labels_proc_kernel (void)
for (i = 0; i < GLIBTOP_MAX_PROC_KERNEL; i++) for (i = 0; i < GLIBTOP_MAX_PROC_KERNEL; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (gettext gh_list (gh_str02scm (gettext
(glibtop_labels_proc_kernel [i])), (glibtop_labels_proc_kernel [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -89,11 +86,10 @@ glibtop_guile_descriptions_proc_kernel (void)
for (i = 0; i < GLIBTOP_MAX_PROC_KERNEL; i++) for (i = 0; i < GLIBTOP_MAX_PROC_KERNEL; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (gettext gh_list (gh_str02scm (gettext
(glibtop_descriptions_proc_kernel [i])), (glibtop_descriptions_proc_kernel [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }

32
sysdeps/guile/names/proclist.c
View File

@@ -35,10 +35,9 @@ glibtop_guile_names_proclist (void)
for (i = 0; i < GLIBTOP_MAX_PROCLIST; i++) for (i = 0; i < GLIBTOP_MAX_PROCLIST; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (glibtop_names_proclist [i]), gh_list (gh_str02scm (glibtop_names_proclist [i])),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -53,10 +52,9 @@ glibtop_guile_types_proclist (void)
for (i = 0; i < GLIBTOP_MAX_PROCLIST; i++) for (i = 0; i < GLIBTOP_MAX_PROCLIST; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (glibtop_types_proclist [i]), gh_list (gh_str02scm (glibtop_types_proclist [i])),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -71,11 +69,10 @@ glibtop_guile_labels_proclist (void)
for (i = 0; i < GLIBTOP_MAX_PROCLIST; i++) for (i = 0; i < GLIBTOP_MAX_PROCLIST; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (gettext gh_list (gh_str02scm (gettext
(glibtop_labels_proclist [i])), (glibtop_labels_proclist [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -90,11 +87,10 @@ glibtop_guile_descriptions_proclist (void)
for (i = 0; i < GLIBTOP_MAX_PROCLIST; i++) for (i = 0; i < GLIBTOP_MAX_PROCLIST; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (gettext gh_list (gh_str02scm (gettext
(glibtop_descriptions_proclist [i])), (glibtop_descriptions_proclist [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }

32
sysdeps/guile/names/procmem.c
View File

@@ -34,10 +34,9 @@ glibtop_guile_names_proc_mem (void)
for (i = 0; i < GLIBTOP_MAX_PROC_MEM; i++) for (i = 0; i < GLIBTOP_MAX_PROC_MEM; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (glibtop_names_proc_mem [i]), gh_list (gh_str02scm (glibtop_names_proc_mem [i])),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -52,10 +51,9 @@ glibtop_guile_types_proc_mem (void)
for (i = 0; i < GLIBTOP_MAX_PROC_MEM; i++) for (i = 0; i < GLIBTOP_MAX_PROC_MEM; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (glibtop_types_proc_mem [i]), gh_list (gh_str02scm (glibtop_types_proc_mem [i])),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -70,11 +68,10 @@ glibtop_guile_labels_proc_mem (void)
for (i = 0; i < GLIBTOP_MAX_PROC_MEM; i++) for (i = 0; i < GLIBTOP_MAX_PROC_MEM; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (gettext gh_list (gh_str02scm (gettext
(glibtop_labels_proc_mem [i])), (glibtop_labels_proc_mem [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -89,11 +86,10 @@ glibtop_guile_descriptions_proc_mem (void)
for (i = 0; i < GLIBTOP_MAX_PROC_MEM; i++) for (i = 0; i < GLIBTOP_MAX_PROC_MEM; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (gettext gh_list (gh_str02scm (gettext
(glibtop_descriptions_proc_mem [i])), (glibtop_descriptions_proc_mem [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }

32
sysdeps/guile/names/procsegment.c
View File

@@ -34,10 +34,9 @@ glibtop_guile_names_proc_segment (void)
for (i = 0; i < GLIBTOP_MAX_PROC_SEGMENT; i++) for (i = 0; i < GLIBTOP_MAX_PROC_SEGMENT; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (glibtop_names_proc_segment [i]), gh_list (gh_str02scm (glibtop_names_proc_segment [i])),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -52,10 +51,9 @@ glibtop_guile_types_proc_segment (void)
for (i = 0; i < GLIBTOP_MAX_PROC_SEGMENT; i++) for (i = 0; i < GLIBTOP_MAX_PROC_SEGMENT; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (glibtop_types_proc_segment [i]), gh_list (gh_str02scm (glibtop_types_proc_segment [i])),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -70,11 +68,10 @@ glibtop_guile_labels_proc_segment (void)
for (i = 0; i < GLIBTOP_MAX_PROC_SEGMENT; i++) for (i = 0; i < GLIBTOP_MAX_PROC_SEGMENT; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (gettext gh_list (gh_str02scm (gettext
(glibtop_labels_proc_segment [i])), (glibtop_labels_proc_segment [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -89,11 +86,10 @@ glibtop_guile_descriptions_proc_segment (void)
for (i = 0; i < GLIBTOP_MAX_PROC_SEGMENT; i++) for (i = 0; i < GLIBTOP_MAX_PROC_SEGMENT; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (gettext gh_list (gh_str02scm (gettext
(glibtop_descriptions_proc_segment [i])), (glibtop_descriptions_proc_segment [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }

32
sysdeps/guile/names/procsignal.c
View File

@@ -34,10 +34,9 @@ glibtop_guile_names_proc_signal (void)
for (i = 0; i < GLIBTOP_MAX_PROC_SIGNAL; i++) for (i = 0; i < GLIBTOP_MAX_PROC_SIGNAL; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (glibtop_names_proc_signal [i]), gh_list (gh_str02scm (glibtop_names_proc_signal [i])),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -52,10 +51,9 @@ glibtop_guile_types_proc_signal (void)
for (i = 0; i < GLIBTOP_MAX_PROC_SIGNAL; i++) for (i = 0; i < GLIBTOP_MAX_PROC_SIGNAL; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (glibtop_types_proc_signal [i]), gh_list (gh_str02scm (glibtop_types_proc_signal [i])),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -70,11 +68,10 @@ glibtop_guile_labels_proc_signal (void)
for (i = 0; i < GLIBTOP_MAX_PROC_SIGNAL; i++) for (i = 0; i < GLIBTOP_MAX_PROC_SIGNAL; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (gettext gh_list (gh_str02scm (gettext
(glibtop_labels_proc_signal [i])), (glibtop_labels_proc_signal [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -89,11 +86,10 @@ glibtop_guile_descriptions_proc_signal (void)
for (i = 0; i < GLIBTOP_MAX_PROC_SIGNAL; i++) for (i = 0; i < GLIBTOP_MAX_PROC_SIGNAL; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (gettext gh_list (gh_str02scm (gettext
(glibtop_descriptions_proc_signal [i])), (glibtop_descriptions_proc_signal [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }

32
sysdeps/guile/names/procstate.c
View File

@@ -34,10 +34,9 @@ glibtop_guile_names_proc_state (void)
for (i = 0; i < GLIBTOP_MAX_PROC_STATE; i++) for (i = 0; i < GLIBTOP_MAX_PROC_STATE; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (glibtop_names_proc_state [i]), gh_list (gh_str02scm (glibtop_names_proc_state [i])),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -52,10 +51,9 @@ glibtop_guile_types_proc_state (void)
for (i = 0; i < GLIBTOP_MAX_PROC_STATE; i++) for (i = 0; i < GLIBTOP_MAX_PROC_STATE; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (glibtop_types_proc_state [i]), gh_list (gh_str02scm (glibtop_types_proc_state [i])),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -70,11 +68,10 @@ glibtop_guile_labels_proc_state (void)
for (i = 0; i < GLIBTOP_MAX_PROC_STATE; i++) for (i = 0; i < GLIBTOP_MAX_PROC_STATE; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (gettext gh_list (gh_str02scm (gettext
(glibtop_labels_proc_state [i])), (glibtop_labels_proc_state [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -89,11 +86,10 @@ glibtop_guile_descriptions_proc_state (void)
for (i = 0; i < GLIBTOP_MAX_PROC_STATE; i++) for (i = 0; i < GLIBTOP_MAX_PROC_STATE; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (gettext gh_list (gh_str02scm (gettext
(glibtop_descriptions_proc_state [i])), (glibtop_descriptions_proc_state [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }

38
sysdeps/guile/names/proctime.c
View File

@@ -34,10 +34,9 @@ glibtop_guile_names_proc_time (void)
for (i = 0; i < GLIBTOP_MAX_PROC_TIME; i++) for (i = 0; i < GLIBTOP_MAX_PROC_TIME; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (glibtop_names_proc_time [i]), gh_list (gh_str02scm (glibtop_names_proc_time [i])),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -51,11 +50,10 @@ glibtop_guile_types_proc_time (void)
list = gh_list (SCM_UNDEFINED); list = gh_list (SCM_UNDEFINED);
for (i = 0; i < GLIBTOP_MAX_PROC_TIME; i++) for (i = 0; i < GLIBTOP_MAX_PROC_TIME; i++)
list = gh_appen list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (glibtop_types_proc_time [i]), gh_list (gh_str02scm (glibtop_types_proc_time [i])),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -69,12 +67,11 @@ glibtop_guile_labels_proc_time (void)
list = gh_list (SCM_UNDEFINED); list = gh_list (SCM_UNDEFINED);
for (i = 0; i < GLIBTOP_MAX_PROC_TIME; i++) for (i = 0; i < GLIBTOP_MAX_PROC_TIME; i++)
list = gh_appen list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (gettext gh_list (gh_str02scm (gettext
(glibtop_labels_proc_time [i])), (glibtop_labels_proc_time [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -88,12 +85,11 @@ glibtop_guile_descriptions_proc_time (void)
list = gh_list (SCM_UNDEFINED); list = gh_list (SCM_UNDEFINED);
for (i = 0; i < GLIBTOP_MAX_PROC_TIME; i++) for (i = 0; i < GLIBTOP_MAX_PROC_TIME; i++)
list = gh_appen list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (gettext gh_list (gh_str02scm (gettext
(glibtop_descriptions_proc_time [i])), (glibtop_descriptions_proc_time [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }

32
sysdeps/guile/names/procuid.c
View File

@@ -34,10 +34,9 @@ glibtop_guile_names_proc_uid (void)
for (i = 0; i < GLIBTOP_MAX_PROC_UID; i++) for (i = 0; i < GLIBTOP_MAX_PROC_UID; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (glibtop_names_proc_uid [i]), gh_list (gh_str02scm (glibtop_names_proc_uid [i])),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -52,10 +51,9 @@ glibtop_guile_types_proc_uid (void)
for (i = 0; i < GLIBTOP_MAX_PROC_UID; i++) for (i = 0; i < GLIBTOP_MAX_PROC_UID; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (glibtop_types_proc_uid [i]), gh_list (gh_str02scm (glibtop_types_proc_uid [i])),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -70,11 +68,10 @@ glibtop_guile_labels_proc_uid (void)
for (i = 0; i < GLIBTOP_MAX_PROC_UID; i++) for (i = 0; i < GLIBTOP_MAX_PROC_UID; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (gettext gh_list (gh_str02scm (gettext
(glibtop_labels_proc_uid [i])), (glibtop_labels_proc_uid [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -89,11 +86,10 @@ glibtop_guile_descriptions_proc_uid (void)
for (i = 0; i < GLIBTOP_MAX_PROC_UID; i++) for (i = 0; i < GLIBTOP_MAX_PROC_UID; i++)
list = gh_append list = gh_append
(list, gh_list (gh_list (list,
(gh_str02scm (gettext gh_list (gh_str02scm (gettext
(glibtop_descriptions_proc_uid [i])), (glibtop_descriptions_proc_uid [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }

28
sysdeps/guile/names/sem_limits.c
View File

@@ -33,10 +33,9 @@ glibtop_guile_names_sem_limits (void)
list = gh_list (SCM_UNDEFINED); list = gh_list (SCM_UNDEFINED);
for (i = 0; i < GLIBTOP_MAX_SEM_LIMITS; i++) for (i = 0; i < GLIBTOP_MAX_SEM_LIMITS; i++)
list = gh_append (list, gh_list list = gh_append (gh_list (list,
(gh_str02scm (glibtop_names_sem_limits [i]), gh_list (gh_str02scm (glibtop_names_sem_limits [i])),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -50,10 +49,9 @@ glibtop_guile_types_sem_limits (void)
list = gh_list (SCM_UNDEFINED); list = gh_list (SCM_UNDEFINED);
for (i = 0; i < GLIBTOP_MAX_SEM_LIMITS; i++) for (i = 0; i < GLIBTOP_MAX_SEM_LIMITS; i++)
list = gh_append (list, gh_list list = gh_append (gh_list (list,
(gh_str02scm (gettext (glibtop_types_sem_limits [i])), gh_list (gh_str02scm (gettext (glibtop_types_sem_limits [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -67,10 +65,9 @@ glibtop_guile_labels_sem_limits (void)
list = gh_list (SCM_UNDEFINED); list = gh_list (SCM_UNDEFINED);
for (i = 0; i < GLIBTOP_MAX_SEM_LIMITS; i++) for (i = 0; i < GLIBTOP_MAX_SEM_LIMITS; i++)
list = gh_append (list, gh_list list = gh_append (gh_list (list,
(gh_str02scm (gettext (glibtop_labels_sem_limits [i])), gh_list (gh_str02scm (gettext (glibtop_labels_sem_limits [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -84,10 +81,9 @@ glibtop_guile_descriptions_sem_limits (void)
list = gh_list (SCM_UNDEFINED); list = gh_list (SCM_UNDEFINED);
for (i = 0; i < GLIBTOP_MAX_SEM_LIMITS; i++) for (i = 0; i < GLIBTOP_MAX_SEM_LIMITS; i++)
list = gh_append (list, gh_list list = gh_append (gh_list (list,
(gh_str02scm (gettext (glibtop_descriptions_sem_limits [i])), gh_list (gh_str02scm (gettext (glibtop_descriptions_sem_limits [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }

28
sysdeps/guile/names/shm_limits.c
View File

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

28
sysdeps/guile/names/swap.c
View File

@@ -33,10 +33,9 @@ glibtop_guile_names_swap (void)
list = gh_list (SCM_UNDEFINED); list = gh_list (SCM_UNDEFINED);
for (i = 0; i < GLIBTOP_MAX_SWAP; i++) for (i = 0; i < GLIBTOP_MAX_SWAP; i++)
list = gh_append (list, gh_list list = gh_append (gh_list (list,
(gh_str02scm (glibtop_names_swap [i]), gh_list (gh_str02scm (glibtop_names_swap [i])),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -50,10 +49,9 @@ glibtop_guile_types_swap (void)
list = gh_list (SCM_UNDEFINED); list = gh_list (SCM_UNDEFINED);
for (i = 0; i < GLIBTOP_MAX_SWAP; i++) for (i = 0; i < GLIBTOP_MAX_SWAP; i++)
list = gh_append (list, gh_list list = gh_append (gh_list (list,
(gh_str02scm (gettext (glibtop_types_swap [i])), gh_list (gh_str02scm (gettext (glibtop_types_swap [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -67,10 +65,9 @@ glibtop_guile_labels_swap (void)
list = gh_list (SCM_UNDEFINED); list = gh_list (SCM_UNDEFINED);
for (i = 0; i < GLIBTOP_MAX_SWAP; i++) for (i = 0; i < GLIBTOP_MAX_SWAP; i++)
list = gh_append (list, gh_list list = gh_append (gh_list (list,
(gh_str02scm (gettext (glibtop_labels_swap [i])), gh_list (gh_str02scm (gettext (glibtop_labels_swap [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -84,10 +81,9 @@ glibtop_guile_descriptions_swap (void)
list = gh_list (SCM_UNDEFINED); list = gh_list (SCM_UNDEFINED);
for (i = 0; i < GLIBTOP_MAX_SWAP; i++) for (i = 0; i < GLIBTOP_MAX_SWAP; i++)
list = gh_append (list, gh_list list = gh_append (gh_list (list,
(gh_str02scm (gettext (glibtop_descriptions_swap [i])), gh_list (gh_str02scm (gettext (glibtop_descriptions_swap [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }

12
sysdeps/guile/names/sysdeps.c
View File

@@ -33,7 +33,8 @@ glibtop_guile_names_sysdeps (void)
list = gh_list (SCM_UNDEFINED); list = gh_list (SCM_UNDEFINED);
for (i = 0; i < GLIBTOP_MAX_SYSDEPS; i++) for (i = 0; i < GLIBTOP_MAX_SYSDEPS; i++)
list = gh_append2 (list, gh_list (gh_str02scm (glibtop_names_sysdeps [i]), list = gh_append (gh_list (list,
gh_list (gh_str02scm (glibtop_names_sysdeps [i])),
SCM_UNDEFINED)); SCM_UNDEFINED));
return list; return list;
@@ -48,7 +49,8 @@ glibtop_guile_types_sysdeps (void)
list = gh_list (SCM_UNDEFINED); list = gh_list (SCM_UNDEFINED);
for (i = 0; i < GLIBTOP_MAX_SYSDEPS; i++) for (i = 0; i < GLIBTOP_MAX_SYSDEPS; i++)
list = gh_append2 (list, gh_list (gh_str02scm (gettext (glibtop_types_sysdeps [i])), list = gh_append (gh_list (list,
gh_list (gh_str02scm (gettext (glibtop_types_sysdeps [i]))),
SCM_UNDEFINED)); SCM_UNDEFINED));
return list; return list;
@@ -63,7 +65,8 @@ glibtop_guile_labels_sysdeps (void)
list = gh_list (SCM_UNDEFINED); list = gh_list (SCM_UNDEFINED);
for (i = 0; i < GLIBTOP_MAX_SYSDEPS; i++) for (i = 0; i < GLIBTOP_MAX_SYSDEPS; i++)
list = gh_append2 (list, gh_list (gh_str02scm (gettext (glibtop_labels_sysdeps [i])), list = gh_append (gh_list (list,
gh_list (gh_str02scm (gettext (glibtop_labels_sysdeps [i]))),
SCM_UNDEFINED)); SCM_UNDEFINED));
return list; return list;
@@ -78,7 +81,8 @@ glibtop_guile_descriptions_sysdeps (void)
list = gh_list (SCM_UNDEFINED); list = gh_list (SCM_UNDEFINED);
for (i = 0; i < GLIBTOP_MAX_SYSDEPS; i++) for (i = 0; i < GLIBTOP_MAX_SYSDEPS; i++)
list = gh_append2 (list, gh_list (gh_str02scm (gettext (glibtop_descriptions_sysdeps [i])), list = gh_append (gh_list (list,
gh_list (gh_str02scm (gettext (glibtop_descriptions_sysdeps [i]))),
SCM_UNDEFINED)); SCM_UNDEFINED));
return list; return list;

28
sysdeps/guile/names/uptime.c
View File

@@ -33,10 +33,9 @@ glibtop_guile_names_uptime (void)
list = gh_list (SCM_UNDEFINED); list = gh_list (SCM_UNDEFINED);
for (i = 0; i < GLIBTOP_MAX_UPTIME; i++) for (i = 0; i < GLIBTOP_MAX_UPTIME; i++)
list = gh_append (list, gh_list list = gh_append (gh_list (list,
(gh_str02scm (glibtop_names_uptime [i]), gh_list (gh_str02scm (glibtop_names_uptime [i])),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -50,10 +49,9 @@ glibtop_guile_types_uptime (void)
list = gh_list (SCM_UNDEFINED); list = gh_list (SCM_UNDEFINED);
for (i = 0; i < GLIBTOP_MAX_UPTIME; i++) for (i = 0; i < GLIBTOP_MAX_UPTIME; i++)
list = gh_append (list, gh_list list = gh_append (gh_list (list,
(gh_str02scm (gettext (glibtop_types_uptime [i])), gh_list (gh_str02scm (gettext (glibtop_types_uptime [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -67,10 +65,9 @@ glibtop_guile_labels_uptime (void)
list = gh_list (SCM_UNDEFINED); list = gh_list (SCM_UNDEFINED);
for (i = 0; i < GLIBTOP_MAX_UPTIME; i++) for (i = 0; i < GLIBTOP_MAX_UPTIME; i++)
list = gh_append (list, gh_list list = gh_append (gh_list (list,
(gh_str02scm (gettext (glibtop_labels_uptime [i])), gh_list (gh_str02scm (gettext (glibtop_labels_uptime [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }
@@ -84,10 +81,9 @@ glibtop_guile_descriptions_uptime (void)
list = gh_list (SCM_UNDEFINED); list = gh_list (SCM_UNDEFINED);
for (i = 0; i < GLIBTOP_MAX_UPTIME; i++) for (i = 0; i < GLIBTOP_MAX_UPTIME; i++)
list = gh_append (list, gh_list list = gh_append (gh_list (list,
(gh_str02scm (gettext (glibtop_descriptions_uptime [i])), gh_list (gh_str02scm (gettext (glibtop_descriptions_uptime [i]))),
SCM_UNDEFINED), SCM_UNDEFINED));
SCM_UNDEFINED);
return list; return list;
} }

8
sysdeps/guile/proclist.c
View File

@@ -43,10 +43,10 @@ glibtop_guile_get_proclist (void)
if (ptr) { if (ptr) {
for (i = 0; i < proclist.number; i++) for (i = 0; i < proclist.number; i++)
list = gh_append (list, list = gh_append
gh_list (gh_ulong2scm ((unsigned long) ptr [i]), (gh_list (list,
SCM_UNDEFINED), gh_list (gh_ulong2scm ((unsigned long) ptr [i])),
SCM_UNDEFINED); SCM_UNDEFINED));
} }
glibtop_free (ptr); glibtop_free (ptr);