rem: for (i = argc ; i--; ) { l = scheme_make_pair(argv[i], l);
add: if (immut) { for (i = argc ; i--; ) { l = scheme_make_immutable_pair(argv[i], l); } } else { for (i = argc ; i--; ) { l = scheme_make_pair(argv[i], l); }
context: list_exec (int argc, Scheme_Object *argv[], int star){  int i;  Scheme_Object *l;  if (star) {    --argc;    l = argv[argc];  } else    l = scheme_null;  for (i = argc ; i--; ) {    l = scheme_make_pair(argv[i], l);  }  return l;}