diff options
author | Martin Baulig <martin@home-of-linux.org> | 1999-12-02 20:54:55 +0000 |
---|---|---|
committer | Martin Baulig <martin@src.gnome.org> | 1999-12-02 20:54:55 +0000 |
commit | 2b501953ceb97ce10e997b45e1efc654c79e0210 (patch) | |
tree | 208125b18ed2b4e267e2416c0eb19099550a6274 /scripts | |
parent | 150d9c9961ecef3135abdac0bad5420060c5c755 (diff) | |
download | libgtop-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/ChangeLog | 4 | ||||
-rw-r--r-- | scripts/guile_types.pl | 12 |
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; |