summaryrefslogtreecommitdiff
path: root/scripts
diff options
context:
space:
mode:
authorMartin Baulig <martin@home-of-linux.org>1999-12-02 20:54:55 +0000
committerMartin Baulig <martin@src.gnome.org>1999-12-02 20:54:55 +0000
commit2b501953ceb97ce10e997b45e1efc654c79e0210 (patch)
tree208125b18ed2b4e267e2416c0eb19099550a6274 /scripts
parent150d9c9961ecef3135abdac0bad5420060c5c755 (diff)
downloadlibgtop-2b501953ceb97ce10e997b45e1efc654c79e0210.tar.gz
New file.
1999-12-02 Martin Baulig <martin@home-of-linux.org> * guile_types.pl: New file.
Diffstat (limited to 'scripts')
-rw-r--r--scripts/ChangeLog4
-rw-r--r--scripts/guile_types.pl12
2 files changed, 16 insertions, 0 deletions
diff --git a/scripts/ChangeLog b/scripts/ChangeLog
index b3f9673d..8b2b2781 100644
--- a/scripts/ChangeLog
+++ b/scripts/ChangeLog
@@ -1,3 +1,7 @@
+1999-12-02 Martin Baulig <martin@home-of-linux.org>
+
+ * guile_types.pl: New file.
+
1999-11-28 Martin Baulig <martin@home-of-linux.org>
* c_types.pl: New file.
diff --git a/scripts/guile_types.pl b/scripts/guile_types.pl
new file mode 100644
index 00000000..b3fb420c
--- /dev/null
+++ b/scripts/guile_types.pl
@@ -0,0 +1,12 @@
+$typeinfo = {'long' => ['gh_long2scm', 'gh_scm2long'],
+ 'ulong' => ['gh_ulong2scm', 'gh_scm2ulong'],
+ 'pid_t' => ['gh_long2scm', 'gh_scm2long'],
+ 'int' => ['gh_long2scm', 'gh_scm2long'],
+ 'retval' => ['gh_long2scm', 'gh_scm2long'],
+ 'ushort' => ['gh_long2scm', 'gh_scm2long'],
+ 'unsigned' => ['gh_ulong2scm', 'gh_scm2ulong'],
+ 'double' => ['gh_double2scm', 'gh_scm2double'],
+ 'string' => ['gh_str02scm', 'gh_scm2newstr'],
+ };
+
+1;