suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Chez Scheme: fix typo for flvector operation

Browse Source
This commit is contained in:
Matthew Flatt 2020-11-09 11:43:36 -07:00
parent a17516f5b6
commit 91e3065991
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
racket/src/ChezScheme/c/types.h
View File

@ -268,7 +268,7 @@ typedef struct _bucket_pointer_list {
#define size_closure(n) ptr_align(header_size_closure + (n)*ptr_bytes)
#define size_string(n) ptr_align(header_size_string + (n)*string_char_bytes)
#define size_fxvector(n) ptr_align(header_size_fxvector + (n)*ptr_bytes)
#define size_flvector(n) ptr_align(header_size_fxvector + (n)*sizeof(double))
#define size_flvector(n) ptr_align(header_size_flvector + (n)*sizeof(double))
#define size_bytevector(n) ptr_align(header_size_bytevector + (n))
#define size_bignum(n) ptr_align(header_size_bignum + (n)*bigit_bytes)
#define size_code(n) ptr_align(header_size_code + (n))