Raymond Toy pushed to branch issue-242-c-call-char-result-wrong at cmucl / cmucl

Commits:

• b921dc29
  by Raymond Toy at 2023-07-01T07:19:31-07:00

  Rename unsigned_to_bool to int_to_bool
  
  Since the global `test_arg` is an `int`, rename `unsigned_to_bool` to
  `int_to_bool` since we're converting an `int` to a `bool` instead of
  an `unsigned`.
  
  This makes the name of the function consistent with what is being
  converted.  Doesn't affect the current test because we only test with
  small non-negative integers.
  

2 changed files:

• tests/issues.lisp
• tests/test-return.c

Changes:

   (flet ((fun (n)

 	   (setf test-arg n)

 	   (alien:alien-funcall

-	    (alien:extern-alien "unsigned_to_bool"

+	    (alien:extern-alien "int_to_bool"

 				(function alien:boolean))))

 	 (expected (n)

 	   (not (zerop n))))

   return (unsigned int) test_arg;

 }

-_Bool unsigned_to_bool()

+_Bool int_to_bool()

 {

   return (_Bool) test_arg;

 }