New file.
1999-12-02 Martin Baulig <martin@home-of-linux.org> * guile_types.pl: New file.
This commit is contained in:
committed by
Martin Baulig
parent
150d9c9961
commit
2b501953ce
@@ -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.
|
||||
|
12
scripts/guile_types.pl
Normal file
12
scripts/guile_types.pl
Normal file
@@ -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;
|
Reference in New Issue
Block a user