linker error für sven
This commit is contained in:
+3
-16
@@ -28,27 +28,14 @@ proc Lisp_Object_Type_to_string(Lisp_Object_Type type) -> const char* {
|
||||
return "unknown";
|
||||
}
|
||||
|
||||
proc create_positional_argument_list(int initial_capacity) -> Positional_Arguments {
|
||||
Positional_Arguments ret;
|
||||
ret.symbols = create_Lisp_Object_array_list(initial_capacity);
|
||||
return ret;
|
||||
}
|
||||
|
||||
proc append_to_positional_argument_list(Positional_Arguments* args, Lisp_Object* sym) -> void {
|
||||
append_to_array_list(&args->symbols, sym);
|
||||
}
|
||||
|
||||
proc create_keyword_argument_list(int initial_capacity) -> Keyword_Arguments {
|
||||
Keyword_Arguments ret;
|
||||
ret.keywords = create_Lisp_Object_array_list(initial_capacity);
|
||||
ret.values = create_Lisp_Object_array_list(initial_capacity);
|
||||
return ret;
|
||||
args->symbols.append(sym);
|
||||
}
|
||||
|
||||
proc append_to_keyword_argument_list(Keyword_Arguments* args,
|
||||
Lisp_Object* keyword,
|
||||
Lisp_Object* default_value) -> void
|
||||
{
|
||||
append_to_array_list(&args->keywords, keyword);
|
||||
append_to_array_list(&args->values, default_value);
|
||||
args->keywords.append(keyword);
|
||||
args->values.append(default_value);
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user