blob: eee119dc1f131bdc761241e682a34c4288c0f4eb (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
#| Copyright (c) Peter McGoron 2024
|
| This Source Code Form is subject to the terms of the Mozilla Public
| License, v. 2.0. If a copy of the MPL was not distributed with this
| file, You can obtain one at https://mozilla.org/MPL/2.0/.
|#
(define-library (gamma-scheme cps)
(import (scheme base)
(scheme write)
(mcgoron cond-thunk)
(mcgoron cond-thunk values))
(export cps-kappa cps-kappa=>
cps-closure cps-closure=>
cps-apply-kont cps-apply-kont=>
cps-apply cps-apply=>
cps-if cps-if=>
core->cps
cps->sexpr
cps:with-sub-kont)
(include "cps.scm"))
|
