Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
Karsten Poeck
ansi-test
Commits
f4ad0fc2
Commit
f4ad0fc2
authored
Nov 18, 2002
by
pfdietz
Browse files
Added loop13.lsp (which is not complete).
parent
427111ab
Changes
2
Hide whitespace changes
Inline
Side-by-side
ansi-tests/gclload2.lsp
View file @
f4ad0fc2
...
...
@@ -86,6 +86,7 @@
(load "loop10.lsp")
(load "loop11.lsp")
(load "loop12.lsp")
(load "loop13.lsp")
;;; Tests of conses
...
...
ansi-tests/loop13.lsp
0 → 100644
View file @
f4ad0fc2
;-*- Mode: Lisp -*-
;;;; Author: Paul Dietz
;;;; Created: Sun Nov 17 12:37:45 2002
;;;; Contains: Tests of DO, DOING, RETURN in LOOP
(in-package :cl-test)
(deftest loop.13.1
(loop do (return 10))
10)
(deftest loop.13.2
(loop doing (return 10))
10)
(deftest loop.13.3
(loop for i from 0 below 100 by 7
when (> i 50) return i)
56)
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment