blob: 4d46f237321f6498c2aad2909f3f5881615e5425 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
#| 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-quote cps-quote=>
cps-if cps-if=>
core->cps
cps->sexpr
cps:with-sub-kont)
(include "cps.scm"))
|
