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

Use double_type as ptr type for UDF inlines

Browse source 
Cannot use common_type as it leads to segfaults when running the gcbench benchmark. There must be an alignment problem or such that seems to work most of the time but is ultimately unstable.
This commit is contained in:
Justin Ethier 2017-05-09 21:44:26 +00:00
parent 27bacda445
commit d533cf6910
1 changed files with 5 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
scheme/cyclone/primitives.sld
View file

@ -698,11 +698,11 @@
;; Determine if primitive receives a pointer to a local C variable
(define (prim/c-var-pointer p)
(cond
((eq? p 'Cyc-fast-plus) "common_type")
((eq? p 'Cyc-fast-sub) "common_type")
((eq? p 'Cyc-fast-mul) "common_type")
((eq? p 'Cyc-fast-div) "common_type")
((member p *udf-prims*) "common_type")
((eq? p 'Cyc-fast-plus) "double_type")
((eq? p 'Cyc-fast-sub) "double_type")
((eq? p 'Cyc-fast-mul) "double_type")
((eq? p 'Cyc-fast-div) "double_type")
((member p *udf-prims*) "double_type")
(else #f)))
;; Determine if primitive assigns (allocates) a C variable