diff options
| author | Matthias Benkard <code@mail.matthias.benkard.de> | 2008-03-04 15:02:43 +0100 |
|---|---|---|
| committer | Matthias Benkard <code@mail.matthias.benkard.de> | 2008-03-04 15:02:43 +0100 |
| commit | 0880bd6ab8539d43cde12ca556ea46b2ee0f0518 (patch) | |
| tree | 48838e9a58216ef020ae676518e95bc2f2762566 /Lisp/libobjcl.lisp | |
| parent | 8bda6a9a7a3d48613383cf5f3cfb06f27cdbfd10 (diff) | |
Fix objcl_create_imp.
darcs-hash:259fe285f4dde3cb5d6a964593524f7e9619faf4
Diffstat (limited to 'Lisp/libobjcl.lisp')
| -rw-r--r-- | Lisp/libobjcl.lisp | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Lisp/libobjcl.lisp b/Lisp/libobjcl.lisp index 394672e..797ee1e 100644 --- a/Lisp/libobjcl.lisp +++ b/Lisp/libobjcl.lisp @@ -45,9 +45,9 @@ (defcfun ("objcl_invoke_with_types" %objcl-invoke-with-types) :pointer (argc :int) (superclass-for-send-super :pointer) - (return_typespec :string) - (arg_typespecs (:array :string)) - (return_value (:pointer :void)) + (return-typespec :string) + (arg-typespecs (:array :string)) + (return-value (:pointer :void)) (argv (:array (:pointer :void)))) (defcfun ("objcl_find_class" %objcl-find-class) :pointer |