language-servers/roc
1
0
Fork 0
mirror of https://github.com/roc-lang/roc.git synced 2025-09-30 15:21:12 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 6

wip

Browse source
This commit is contained in:
Richard Feldman 2020-04-25 08:39:51 -04:00
parent d0c9c433a6
commit afbe871e6d
5 changed files with 28 additions and 12 deletions
Download patch file Download diff file Expand all files Collapse all files

4
compiler/can/src/builtins.rs
View file

@ -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<Def> {
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 ]*
@ -208,7 +208,7 @@ fn no_region<T>(value: T) -> Located<T> {
fn tag(name: &'static str, args: Vec<Expr>, var_store: &VarStore) -> Expr {
Expr::Tag {
variant_var: var_store.fresh(),
ext_var: var_store.fresh(), // TODO Variable::EMPTY_TAG_UNION should work here
ext_var: var_store.fresh(),
name: TagName::Global(name.into()),
arguments: args
.into_iter()