mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-22 20:40:29 +02:00
Code Activity

(Bitwise Operations): Fix lognot to ones-complement.

Browse source
This commit is contained in:
Kevin Ryde 2003-05-08 01:03:25 +00:00
parent 49584bf2b0
commit e222111b83
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
doc/ref/scheme-data.texi
View file

@ -1088,8 +1088,8 @@ set in the result if it is set in an odd number of arguments.
@deffn {Scheme Procedure} lognot n @deffn {Scheme Procedure} lognot n
@deffnx {C Function} scm_lognot (n) @deffnx {C Function} scm_lognot (n)
Return the integer which is the 2s-complement of the integer Return the integer which is the ones-complement of the integer
argument. argument, ie.@: each 0 bit is changed to 1 and each 1 bit to 0.
@lisp @lisp
(number->string (lognot #b10000000) 2) (number->string (lognot #b10000000) 2)