mirror of
https://github.com/justinethier/cyclone.git
synced 2025-07-11 23:07:36 +02:00
Issue #284 - Fix how udf:prims are compiled
This commit is contained in:
parent
dc34eef03b
commit
d54a0130c0
1 changed files with 3 additions and 2 deletions
|
@ -825,7 +825,7 @@
|
|||
((eq? p 'list->vector) "object")
|
||||
((eq? p 'Cyc-installation-dir) "object")
|
||||
((eq? p 'Cyc-compilation-environment) "object")
|
||||
((member p *udf-prims*) "object")
|
||||
;((member p *udf-prims*) "object")
|
||||
(else #f)))
|
||||
|
||||
;; Determine if primitive creates a C variable
|
||||
|
@ -879,7 +879,8 @@
|
|||
;cons
|
||||
;cell
|
||||
))
|
||||
(member exp *udf-prims*))))
|
||||
;(member exp *udf-prims*)
|
||||
)))
|
||||
|
||||
;; Pass continuation as the function's first parameter?
|
||||
(define (prim:cont? exp)
|
||||
|
|
Loading…
Add table
Reference in a new issue