Merge 1497f86 into c73fcb6

lexi-lambda · Jun 30, 2018 · 9b8e20e · 9b8e20e
2 parents c73fcb6 + 1497f86
commit 9b8e20e
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/functional-doc/scribblings/data/functional.scrbl b/functional-doc/scribblings/data/functional.scrbl
@@ -651,12 +651,12 @@ using @tech{either}.
   (define (safe-first lst)
     (if (empty? lst)
         (failure "attempted to get the first element of an empty list")
-        (just (first lst))))
+        (success (first lst))))
 
   (define (safe-rest lst)
      (if (empty? lst)
          (failure "attempted to get the rest of an empty list")
-         (just (rest lst))))
+         (success (rest lst))))
 
   (define (divide-first-two lst)
     (do [a  <- (safe-first lst)]