Retropikzel
/
foreign-c
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Add c-type-align

This commit is contained in:
retropikzel 2025-08-06 11:16:51 +03:00
parent bc4befe2d1
commit e9bacd4b0f
1 changed files with 0 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
foreign/c/primitives/ypsilon.scm
View File

@ -19,7 +19,6 @@
((eq? type 'float) (c-sizeof float)) ((eq? type 'float) (c-sizeof float))
((eq? type 'double) (c-sizeof double)) ((eq? type 'double) (c-sizeof double))
((eq? type 'pointer) (c-sizeof void*)) ((eq? type 'pointer) (c-sizeof void*))
((eq? type 'struct) (c-sizeof void*))
((eq? type 'callback) (c-sizeof void*)) ((eq? type 'callback) (c-sizeof void*))
((eq? type 'void) 0) ((eq? type 'void) 0)
(else #f)))) (else #f))))
@ -45,7 +44,6 @@
((eq? type 'float) (alignof:float)) ((eq? type 'float) (alignof:float))
((eq? type 'double) (alignof:double)) ((eq? type 'double) (alignof:double))
((eq? type 'pointer) (alignof:void*)) ((eq? type 'pointer) (alignof:void*))
((eq? type 'struct) (alignof:void*))
((eq? type 'callback) (alignof:void*)) ((eq? type 'callback) (alignof:void*))
((eq? type 'void) 0) ((eq? type 'void) 0)
(else #f)))) (else #f))))