branch: externals/inspector
commit f534e87d1da8b8cc549a88deaa3a8d121e275e7f
Author: Mariano Montone <marianomont...@gmail.com>
Commit: Mariano Montone <marianomont...@gmail.com>
Slice tests
---
test.el | 7 ++++++-
1 file changed, 6 insertions(+), 1 deletion(-)
diff --git a/test.el b/test.el
index 1f07aab297..7933f814a6 100644
--- a/test.el
+++ b/test.el
@@ -11,7 +11,6 @@
(inspector-inspect '(1 2 3))
(inspector-inspect [1 "two" (three)])
-;; TODO:
;; Long lists need to be sliced:
(inspector-inspect (cl-loop for i from 1 to 3000 collect i))
@@ -66,3 +65,9 @@
x y)
(inspector-inspect (make-rectangle :x 30 :y 40))
+
+(setq inspector-slice-size 10)
+(inspector-inspect (cl-loop for i from 1 to 101 collect i))
+(inspector-inspect (cl-loop for i from 1 to 101 collect (cons i (1+ i))))
+
+(inspector-inspect (apply 'vector (cl-loop for i from 1 to 101 collect i)))
