rusefi
/
bldc
mirror of https://github.com/rusefi/bldc.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity
bldc/tests/test_callcc_1.lisp

7 lines
85 B
Common Lisp
Raw Normal View History

Squashed 'lispBM/lispBM/' changes from 6deae379..ccca9778 ccca9778 update lbmred.md e182bffd changed doc i28 to i 3b277e28 error message printing verbosity level can be toggled between high and low 0f00e692 update one of the call-cc tests 6a377f74 added some tests of call-cc 4f3e8adc update application of a call-cc continuation. zero arguments is ok, will apply to nil. More than 1 argument is an error and terminates the context 50fdd498 small tweaks to repl-cps git-subtree-dir: lispBM/lispBM git-subtree-split: ccca9778ee0ddad6ea44bdc309ba128c92723309
2022-04-03 03:26:23 -07:00
(define f (lambda (x) (+ x 1)))
Squashed 'lispBM/lispBM/' changes from f7c74492..5659e40a 5659e40a low-level flash errors propagate into the evaluator cd881c01 tweak lbmref db42aac7 tweak lbmref d1033e98 tweak lbmref 77783470 tweak refman bufcreate d9575830 incremental read-evaluate. Removed all types of arrays except for byte-arrays d5d5fdf1 type checking in array-extensions ca072954 buflen is ok on constant arrays 90614b33 bugfix in lbm_channel string_write de62dbd7 only one is_closure func git-subtree-dir: lispBM/lispBM git-subtree-split: 5659e40aac7a1e43b158a978e4e633ef118afeeb
2023-04-04 03:36:41 -07:00
(check (= (f (call-cc (lambda (k) (k 10)))) 11))