X-Git-Url: https://thelambdalab.xyz/gitweb/index.cgi?p=scheme.forth.jl.git;a=blobdiff_plain;f=src%2Fscheme-primitives.4th;h=f6bb92d399d9bddc5e4baf9b8584224bd8adf8f2;hp=f94701f743c2d21222167450094cc8f6a4b8a7e2;hb=41b469d050586a05cd43fdd4c78755616af3f7b4;hpb=34c8e9e803a2257d9234b1381ad4eef725e224da diff --git a/src/scheme-primitives.4th b/src/scheme-primitives.4th index f94701f..f6bb92d 100644 --- a/src/scheme-primitives.4th +++ b/src/scheme-primitives.4th @@ -607,10 +607,6 @@ defer display 2swap apply ; make-primitive apply -: make-continuation - \ TODO: Capture parameter and return stacks in continuation -; - :noname ( args -- result ) make-continuation nil cons 2swap apply