inverse: Fix docs

diff --git a/basis/inverse/inverse-docs.factor b/basis/inverse/inverse-docs.factor
index 47b5e1184d38dba864d12e933eb58527dd004eab..af0a6452f72e75455a3e53d3740285acea9a1443 100644 (file)
--- a/basis/inverse/inverse-docs.factor
+++ b/basis/inverse/inverse-docs.factor
@@ -49,7 +49,7 @@ HELP: switch
 { $see-also undo } ;
 
 HELP: under
-{ $values { "invertible-quot" "" } { "quot" "" } }
+{ $values { "invertible-quot" quotation } { "quot" quotation } }
 { $description "Applies " { $snippet "invertible-quot" } ", then " { $snippet "quot" } " and finally the inverse of " { $snippet "invertible-quot" } "." }
 { $examples
     "Round a decimal number to two decimals:"

diff --git a/basis/inverse/inverse.factor b/basis/inverse/inverse.factor
index 33954c7634701a74a0ae6b8a0686f9fe815e1316..04ee00c361b76c8dd6d387e0e029fec0edc0b761 100644 (file)
--- a/basis/inverse/inverse.factor
+++ b/basis/inverse/inverse.factor
@@ -292,5 +292,5 @@ SYNTAX: INVERSE: scan-word parse-definition define-inverse ;
 
 SYNTAX: DUAL: scan-word scan-word define-dual ;
 
-MACRO: under ( reversible-quot quot -- quot )
+MACRO: under ( invertible-quot quot -- quot )
     over [undo] '[ @ @ @ ] ;