Lines Matching refs:lambda

135       (assert-error (tn) (lambda () (symbol? (string-read "-a"))))
194 (assert-error "invalid function calling: boolean" (lambda () (#t)))
195 (assert-error "invalid function calling: integer" (lambda () (1)))
196 (assert-error "invalid function calling: null" (lambda () ('())))
197 (assert-error "invalid function calling: pair" (lambda () ('(1 2))))
198 (assert-error "invalid function calling: char" (lambda () (#\a)))
199 (assert-error "invalid function calling: string" (lambda () ("a")))
200 (assert-error "invalid function calling: vector" (lambda () (#(1))))
203 (define f (lambda () #t))
205 (assert-error (tn) (lambda () (f . #t)))
206 (assert-error (tn) (lambda () (f #t)))
207 (assert-error (tn) (lambda () (f #t . #t)))
208 (assert-error (tn) (lambda () (f #t #t)))
209 (assert-error (tn) (lambda () (f #t #t . #t)))
210 (assert-error (tn) (lambda () (f #t #t #t)))
211 (assert-error (tn) (lambda () (f #t #t #t . #t)))
213 (define f (lambda args args))
215 (assert-error (tn) (lambda () (f . #t)))
217 (assert-error (tn) (lambda () (f #t . #t)))
219 (assert-error (tn) (lambda () (f #t #t . #t)))
221 (assert-error (tn) (lambda () (f #t #t #t . #t)))
223 (define f (lambda (x) x))
224 (assert-error (tn) (lambda () (f)))
225 (assert-error (tn) (lambda () (f . #t)))
227 (assert-error (tn) (lambda () (f #t . #t)))
228 (assert-error (tn) (lambda () (f #t #t)))
229 (assert-error (tn) (lambda () (f #t #t . #t)))
230 (assert-error (tn) (lambda () (f #t #t #t)))
231 (assert-error (tn) (lambda () (f #t #t #t . #t)))
233 (define f (lambda (x . rest) (list x rest)))
234 (assert-error (tn) (lambda () (f)))
235 (assert-error (tn) (lambda () (f . #t)))
237 (assert-error (tn) (lambda () (f #t . #t)))
239 (assert-error (tn) (lambda () (f #t #t . #t)))
241 (assert-error (tn) (lambda () (f #t #t #t . #t)))
243 (define f (lambda (x y) (list x y)))
244 (assert-error (tn) (lambda () (f)))
245 (assert-error (tn) (lambda () (f . #t)))
246 (assert-error (tn) (lambda () (f #t)))
247 (assert-error (tn) (lambda () (f #t . #t)))
249 (assert-error (tn) (lambda () (f #t #t . #t)))
250 (assert-error (tn) (lambda () (f #t #t #t)))
251 (assert-error (tn) (lambda () (f #t #t #t . #t)))
253 (define f (lambda (x y . rest) (list x y rest)))
254 (assert-error (tn) (lambda () (f)))
255 (assert-error (tn) (lambda () (f . #t)))
256 (assert-error (tn) (lambda () (f #t)))
257 (assert-error (tn) (lambda () (f #t . #t)))
259 (assert-error (tn) (lambda () (f #t #t . #t)))
261 (assert-error (tn) (lambda () (f #t #t #t . #t)))
266 (assert-error (tn) (lambda () (f . #t)))
267 (assert-error (tn) (lambda () (f #t)))
268 (assert-error (tn) (lambda () (f #t . #t)))
269 (assert-error (tn) (lambda () (f #t #t)))
270 (assert-error (tn) (lambda () (f #t #t . #t)))
271 (assert-error (tn) (lambda () (f #t #t #t)))
272 (assert-error (tn) (lambda () (f #t #t #t . #t)))
276 (assert-error (tn) (lambda () (f . #t)))
278 (assert-error (tn) (lambda () (f #t . #t)))
280 (assert-error (tn) (lambda () (f #t #t . #t)))
282 (assert-error (tn) (lambda () (f #t #t #t . #t)))
285 (assert-error (tn) (lambda () (f)))
286 (assert-error (tn) (lambda () (f . #t)))
288 (assert-error (tn) (lambda () (f #t . #t)))
289 (assert-error (tn) (lambda () (f #t #t)))
290 (assert-error (tn) (lambda () (f #t #t . #t)))
291 (assert-error (tn) (lambda () (f #t #t #t)))
292 (assert-error (tn) (lambda () (f #t #t #t . #t)))
295 (assert-error (tn) (lambda () (f)))
296 (assert-error (tn) (lambda () (f . #t)))
298 (assert-error (tn) (lambda () (f #t . #t)))
300 (assert-error (tn) (lambda () (f #t #t . #t)))
302 (assert-error (tn) (lambda () (f #t #t #t . #t)))
305 (assert-error (tn) (lambda () (f)))
306 (assert-error (tn) (lambda () (f . #t)))
307 (assert-error (tn) (lambda () (f #t)))
308 (assert-error (tn) (lambda () (f #t . #t)))
310 (assert-error (tn) (lambda () (f #t #t . #t)))
311 (assert-error (tn) (lambda () (f #t #t #t)))
312 (assert-error (tn) (lambda () (f #t #t #t . #t)))
315 (assert-error (tn) (lambda () (f)))
316 (assert-error (tn) (lambda () (f . #t)))
317 (assert-error (tn) (lambda () (f #t)))
318 (assert-error (tn) (lambda () (f #t . #t)))
320 (assert-error (tn) (lambda () (f #t #t . #t)))
322 (assert-error (tn) (lambda () (f #t #t #t . #t)))
329 (assert-equal? (tn) #t ((lambda () #t)))
330 (assert-error (tn) (lambda () ((lambda () #t) . #t)))
331 (assert-error (tn) (lambda () ((lambda () #t) #t)))
332 (assert-error (tn) (lambda () ((lambda () #t) #t . #t)))
333 (assert-error (tn) (lambda () ((lambda () #t) #t #t)))
334 (assert-error (tn) (lambda () ((lambda () #t) #t #t . #t)))
335 (assert-error (tn) (lambda () ((lambda () #t) #t #t #t)))
336 (assert-error (tn) (lambda () ((lambda () #t) #t #t #t . #t)))
339 (assert-error (tn) (lambda () (and . #t)))
341 (assert-error (tn) (lambda () (and #t . #t)))
343 (assert-error (tn) (lambda () (and #t #t . #t)))
345 (assert-error (tn) (lambda () (and #t #t #t . #t)))
347 (assert-error (tn) (lambda () (quote)))
348 (assert-error (tn) (lambda () (quote . #t)))
350 (assert-error (tn) (lambda () (quote #t . #t)))
351 (assert-error (tn) (lambda () (quote #t #t)))
352 (assert-error (tn) (lambda () (quote #t #t . #t)))
353 (assert-error (tn) (lambda () (quote #t #t #t)))
354 (assert-error (tn) (lambda () (quote #t #t #t . #t)))
356 (assert-error (tn) (lambda () (let*)))
357 (assert-error (tn) (lambda () (let* . #t)))
358 (assert-error (tn) (lambda () (let* ())))
359 (assert-error (tn) (lambda () (let* #t . #t)))
361 (assert-error (tn) (lambda () (let* #t #t . #t)))
363 (assert-error (tn) (lambda () (let* #t #t #t . #t)))
366 (assert-error (tn) (lambda () (set!)))
367 (assert-error (tn) (lambda () (set! . #t)))
368 (assert-error (tn) (lambda () (set! #t)))
369 (assert-error (tn) (lambda () (set! #t . #t)))
374 (assert-error (tn) (lambda () (set! #t #t . #t)))
375 (assert-error (tn) (lambda () (set! #t #t #t)))
376 (assert-error (tn) (lambda () (set! #t #t #t . #t)))
378 (assert-error (tn) (lambda () (if)))
379 (assert-error (tn) (lambda () (if . #t)))
380 (assert-error (tn) (lambda () (if #t)))
381 (assert-error (tn) (lambda () (if #t . #t)))
383 (assert-error (tn) (lambda () (if #t #t . #t)))
385 (assert-error (tn) (lambda () (if #t #t #t . #t)))
389 (assert-error (tn) (lambda () (string-read "'")))
390 (assert-error (tn) (lambda () (string-read "`")))
391 (assert-error (tn) (lambda () (string-read ",")))
392 (assert-error (tn) (lambda () (string-read ",@")))