Fcalva/cyclone
1
0
Fork 0
mirror of https://github.com/justinethier/cyclone.git synced 2025-07-15 16:57:35 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

WIP

Browse source
This commit is contained in:
Justin Ethier 2016-07-10 23:05:50 -04:00
parent fa69ce0cb7
commit 2815d45030
1 changed files with 16 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

17
scheme/cyclone/primitives.sld
View file

@ -7,7 +7,9 @@
;;;; This module contains information about Cyclone's scheme primitives. ;;;; This module contains information about Cyclone's scheme primitives.
;;;; ;;;;
(define-library (scheme cyclone primitives) (define-library (scheme cyclone primitives)
(import (scheme base)) (import (scheme base)
; (srfii 69)
)
(export (export
prim? prim?
*primitives* *primitives*
@ -152,6 +154,19 @@
Cyc-write Cyc-write
Cyc-display)) Cyc-display))
; ;; Keep track of how many args are required for each primitive.
; ;; For each primitive, define:
; ;; - number of args
; ;; - min number of required args (for a func that takes optional args)
; ;; If the number is not applicable then the primitive is not listed or the value is #f
; (define *primitives-num-args*
; '()
; )
;
; (define (prim:num-args prim) 'TODO)
; (define (prim:min-num-args prim) 'TODO)
;; TODO: dont' put this here, just the list ;; TODO: dont' put this here, just the list
; ;; Constant Folding ; ;; Constant Folding
; ;; Is a primitive being applied in such a way that it can be ; ;; Is a primitive being applied in such a way that it can be