diff --git a/compiler/can/src/builtins.rs b/compiler/can/src/builtins.rs index c9f928dc29..aa23379b8b 100644 --- a/compiler/can/src/builtins.rs +++ b/compiler/can/src/builtins.rs @@ -26,7 +26,7 @@ use roc_types::subs::{VarStore, Variable}; /// lookup (if the bounds check passed). That internal function is hardcoded in code gen, /// which works fine because it doesn't involve any open tag unions. pub fn builtin_defs(var_store: &VarStore) -> Vec { - vec![/*list_get(var_store),*/ list_first(var_store)] + vec![list_get(var_store), list_first(var_store)] } /// List.get : List elem, Int -> Result elem [ OutOfBounds ]* diff --git a/compiler/gen/tests/helpers/eval.rs b/compiler/gen/tests/helpers/eval.rs index e681469c65..7e30f17c5c 100644 --- a/compiler/gen/tests/helpers/eval.rs +++ b/compiler/gen/tests/helpers/eval.rs @@ -105,7 +105,7 @@ macro_rules! assert_llvm_evals_to { builder.build_return(Some(&ret)); // Uncomment this to see the module's un-optimized LLVM instruction output: - env.module.print_to_stderr(); + // env.module.print_to_stderr(); if main_fn.verify(true) { fpm.run_on(&main_fn); @@ -419,7 +419,7 @@ macro_rules! assert_evals_to { assert_llvm_evals_to!($src, $expected, $ty, (|val| val)); } { - // assert_opt_evals_to!($src, $expected, $ty, (|val| val)); + assert_opt_evals_to!($src, $expected, $ty, (|val| val)); } }; ($src:expr, $expected:expr, $ty:ty, $transform:expr) => { @@ -428,7 +428,7 @@ macro_rules! assert_evals_to { assert_llvm_evals_to!($src, $expected, $ty, $transform); } { - // assert_opt_evals_to!($src, $expected, $ty, $transform); + assert_opt_evals_to!($src, $expected, $ty, $transform); } }; } diff --git a/compiler/module/src/symbol.rs b/compiler/module/src/symbol.rs index 34abb0569e..2d6b01fa2a 100644 --- a/compiler/module/src/symbol.rs +++ b/compiler/module/src/symbol.rs @@ -642,7 +642,7 @@ define_builtins! { 10 LIST_LEN: "len" 11 LIST_FOLDL: "foldl" 12 LIST_FOLDR: "foldr" - 13 LIST_GET_UNSAFE: "getUnsafe" + 13 LIST_GET_UNSAFE: "#getUnsafe" 14 LIST_CONCAT: "concat" 15 LIST_FIRST: "first" 16 LIST_FIRST_ARG: "first#list"