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:

===================================== tests/issues.lisp ===================================== @@ -1088,7 +1088,7 @@ (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))))

===================================== tests/test-return.c ===================================== @@ -38,7 +38,7 @@ int_to_unsigned_int() return (unsigned int) test_arg; }

-_Bool unsigned_to_bool() +_Bool int_to_bool() { return (_Bool) test_arg; }

View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/b921dc292adcd038a13a8c80...