--- a/DOCUMENTATION.markdown Tue Aug 23 00:48:04 2016 +0000
+++ b/DOCUMENTATION.markdown Tue Aug 23 00:50:51 2016 +0000
@@ -566,6 +566,12 @@
Negate the value of `place`.
+### `NOTF` (macro)
+
+ (NOTF PLACE)
+
+Set `place` to `(not place)` in-place.
+
### `REMAINDERF` (macro)
(REMAINDERF PLACE DIVISOR)
--- a/losh.lisp Tue Aug 23 00:48:04 2016 +0000
+++ b/losh.lisp Tue Aug 23 00:50:51 2016 +0000
@@ -406,6 +406,9 @@
(define-modify-macro negatef () -
"Negate the value of `place`.")
+(define-modify-macro notf () not
+ "Set `place` to `(not place)` in-place.")
+
(defun %funcall (value function)
(funcall function value))
--- a/package.lisp Tue Aug 23 00:48:04 2016 +0000
+++ b/package.lisp Tue Aug 23 00:50:51 2016 +0000
@@ -84,6 +84,7 @@
#:remainderf
#:clampf
#:negatef
+ #:notf
#:callf))
(defsubpackage #:losh.lists