language-servers/roc
1
0
Fork 0
mirror of https://github.com/roc-lang/roc.git synced 2025-09-29 06:44:46 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 7

Add env.small_str_bytes

Browse source
This commit is contained in:
Richard Feldman 2020-09-12 23:05:01 -04:00
parent 8322006e36
commit 254b93a8ce
2 changed files with 5 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
compiler/gen/src/llvm/build.rs
View file

@ -94,6 +94,10 @@ impl<'a, 'ctx, 'env> Env<'a, 'ctx, 'env> {
pub fn ptr_int(&self) -> IntType<'ctx> { pub fn ptr_int(&self) -> IntType<'ctx> {
ptr_int(self.context, self.ptr_bytes) ptr_int(self.context, self.ptr_bytes)
} }
pub fn small_str_bytes(&self) -> u32 {
self.ptr_bytes * 2
}
} }
pub fn module_from_builtins<'ctx>(ctx: &'ctx Context, module_name: &str) -> Module<'ctx> { pub fn module_from_builtins<'ctx>(ctx: &'ctx Context, module_name: &str) -> Module<'ctx> {

2
compiler/gen/src/llvm/build_str.rs
View file

@ -401,7 +401,7 @@ where
byte_array_ptr, byte_array_ptr,
&[ctx &[ctx
.i8_type() .i8_type()
.const_int(((env.ptr_bytes * 2) - 1) as u64, false)], .const_int(env.small_str_bytes() as u64 - 1, false)],
"final_byte_ptr", "final_byte_ptr",
) )
}; };