Fix test, for completeness

This commit is contained in:
Isaac Shoebottom 2022-10-05 10:16:46 -03:00
parent 41cbf8b58e
commit 6809a95041

View File

@ -22,6 +22,6 @@
(check-equal? (sum `(1 2)) 3) (check-equal? (sum `(1 2)) 3)
(check-equal? (sum `(1 2 "buckle my shoe")) 3) (check-equal? (sum `(1 2 "buckle my shoe")) 3)
(check-equal? (sum `(-1 -2)) -3) ;test for negative numbers (check-equal? (sum `(-1 -2)) -3) ;test for negative numbers
(check-equal? (sum `(-1 `(1 2) -2))) ;test for recursive lists (check-equal? (sum `(-1 `(1 2) -2)) 3) ;test for recursive lists
(check-equal? (sum `(0.1 0.2)) 0.3) ;test for floating point numbers (check-equal? (sum `(0.1 0.2)) 0.3) ;test for floating point numbers
) )