Skip to content
Snippets Groups Projects
Commit 5d5d2c79 authored by rtoy's avatar rtoy
Browse files

Fix for bug in alien enum types reported by Nicolas Neuss, cmucl-imp,

2004/11/09.  An example illustrating the bug is:

    (use-package "ALIEN")
    (use-package "C-CALL")

    (def-alien-type yes_no_t (enum yes_no_t :NO :YES))
    (def-alien-type nil
	(struct foo
		(arg1 yes_no_t)
		(arg2 yes_no_t)))

    (def-alien-routine "set_default_options" void
      (options (* (struct foo))))

Modified alien-type-translator for enum so that if the enum type is
known and it's the same type as before we skip the call to (setf
auxiliary-alien-type).  This fixes the problem.
parent 39efd495
No related branches found
No related tags found
No related merge requests found
Loading
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment