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 car instead of cell_get

Browse source 
car is much faster since there is no function overhead.
This commit is contained in:
Justin Ethier 2017-05-09 15:33:56 +00:00
parent 45c27f5a3a
commit 27bacda445
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
scheme/cyclone/primitives.sld
View file

@ -593,7 +593,7 @@
((eq? p 'symbol?) "Cyc_is_symbol")
((eq? p 'cons) "make_pair")
((eq? p 'cell) "make_cell")
((eq? p 'cell-get) "cell_get")
((eq? p 'cell-get) "car") ;; Unsafe as cell gets added by compiler
((eq? p 'set-cell!) "Cyc_set_cell")
((eq? p 'set-global!) "global_set")
(else