[PATCH vkd3d 2/5] vkd3d-shader: Add a hlsl_ namespace prefix to common functions.

Zebediah Figura zfigura at codeweavers.com
Tue Feb 2 16:11:14 CST 2021


Signed-off-by: Zebediah Figura <zfigura at codeweavers.com>
---
 libs/vkd3d-shader/hlsl.c | 168 +++++++++++-----------
 libs/vkd3d-shader/hlsl.h | 132 ++++++++++--------
 libs/vkd3d-shader/hlsl.l |   5 +-
 libs/vkd3d-shader/hlsl.y | 292 +++++++++++++++++++--------------------
 4 files changed, 303 insertions(+), 294 deletions(-)

diff --git a/libs/vkd3d-shader/hlsl.c b/libs/vkd3d-shader/hlsl.c
index 011cdaf5..20b4fa7f 100644
--- a/libs/vkd3d-shader/hlsl.c
+++ b/libs/vkd3d-shader/hlsl.c
@@ -36,7 +36,7 @@ void hlsl_report_message(const struct source_location loc,
         set_parse_status(&hlsl_ctx.status, PARSE_WARN);
 }
 
-BOOL add_declaration(struct hlsl_scope *scope, struct hlsl_ir_var *decl, BOOL local_var)
+BOOL hlsl_add_var(struct hlsl_scope *scope, struct hlsl_ir_var *decl, BOOL local_var)
 {
     struct hlsl_ir_var *var;
 
@@ -59,7 +59,7 @@ BOOL add_declaration(struct hlsl_scope *scope, struct hlsl_ir_var *decl, BOOL lo
     return TRUE;
 }
 
-struct hlsl_ir_var *get_variable(struct hlsl_scope *scope, const char *name)
+struct hlsl_ir_var *hlsl_get_var(struct hlsl_scope *scope, const char *name)
 {
     struct hlsl_ir_var *var;
 
@@ -70,10 +70,10 @@ struct hlsl_ir_var *get_variable(struct hlsl_scope *scope, const char *name)
     }
     if (!scope->upper)
         return NULL;
-    return get_variable(scope->upper, name);
+    return hlsl_get_var(scope->upper, name);
 }
 
-void free_declaration(struct hlsl_ir_var *decl)
+void hlsl_free_var(struct hlsl_ir_var *decl)
 {
     vkd3d_free((void *)decl->name);
     vkd3d_free((void *)decl->semantic);
@@ -81,7 +81,7 @@ void free_declaration(struct hlsl_ir_var *decl)
     vkd3d_free(decl);
 }
 
-struct hlsl_type *new_hlsl_type(const char *name, enum hlsl_type_class type_class,
+struct hlsl_type *hlsl_new_type(const char *name, enum hlsl_type_class type_class,
         enum hlsl_base_type base_type, unsigned dimx, unsigned dimy)
 {
     struct hlsl_type *type;
@@ -94,7 +94,7 @@ struct hlsl_type *new_hlsl_type(const char *name, enum hlsl_type_class type_clas
     type->dimx = dimx;
     type->dimy = dimy;
     if (type_class == HLSL_CLASS_MATRIX)
-        type->reg_size = is_row_major(type) ? dimy : dimx;
+        type->reg_size = hlsl_type_is_row_major(type) ? dimy : dimx;
     else
         type->reg_size = 1;
 
@@ -103,9 +103,9 @@ struct hlsl_type *new_hlsl_type(const char *name, enum hlsl_type_class type_clas
     return type;
 }
 
-struct hlsl_type *new_array_type(struct hlsl_type *basic_type, unsigned int array_size)
+struct hlsl_type *hlsl_new_array_type(struct hlsl_type *basic_type, unsigned int array_size)
 {
-    struct hlsl_type *type = new_hlsl_type(NULL, HLSL_CLASS_ARRAY, HLSL_TYPE_FLOAT, 1, 1);
+    struct hlsl_type *type = hlsl_new_type(NULL, HLSL_CLASS_ARRAY, HLSL_TYPE_FLOAT, 1, 1);
 
     if (!type)
         return NULL;
@@ -126,7 +126,7 @@ static DWORD get_array_size(const struct hlsl_type *type)
     return 1;
 }
 
-struct hlsl_type *new_struct_type(const char *name, struct list *fields)
+struct hlsl_type *hlsl_new_struct_type(const char *name, struct list *fields)
 {
     struct hlsl_struct_field *field;
     unsigned int reg_size = 0;
@@ -154,7 +154,7 @@ struct hlsl_type *new_struct_type(const char *name, struct list *fields)
     return type;
 }
 
-struct hlsl_type *get_type(struct hlsl_scope *scope, const char *name, BOOL recursive)
+struct hlsl_type *hlsl_get_type(struct hlsl_scope *scope, const char *name, BOOL recursive)
 {
     struct rb_entry *entry = rb_get(&scope->types, name);
 
@@ -162,16 +162,16 @@ struct hlsl_type *get_type(struct hlsl_scope *scope, const char *name, BOOL recu
         return RB_ENTRY_VALUE(entry, struct hlsl_type, scope_entry);
 
     if (recursive && scope->upper)
-        return get_type(scope->upper, name, recursive);
+        return hlsl_get_type(scope->upper, name, recursive);
     return NULL;
 }
 
-BOOL find_function(const char *name)
+BOOL hlsl_get_function(const char *name)
 {
     return rb_get(&hlsl_ctx.functions, name) != NULL;
 }
 
-unsigned int components_count_type(struct hlsl_type *type)
+unsigned int hlsl_type_component_count(struct hlsl_type *type)
 {
     struct hlsl_struct_field *field;
     unsigned int count = 0;
@@ -182,7 +182,7 @@ unsigned int components_count_type(struct hlsl_type *type)
     }
     if (type->type == HLSL_CLASS_ARRAY)
     {
-        return components_count_type(type->e.array.type) * type->e.array.elements_count;
+        return hlsl_type_component_count(type->e.array.type) * type->e.array.elements_count;
     }
     if (type->type != HLSL_CLASS_STRUCT)
     {
@@ -192,12 +192,12 @@ unsigned int components_count_type(struct hlsl_type *type)
 
     LIST_FOR_EACH_ENTRY(field, type->e.elements, struct hlsl_struct_field, entry)
     {
-        count += components_count_type(field->type);
+        count += hlsl_type_component_count(field->type);
     }
     return count;
 }
 
-BOOL compare_hlsl_types(const struct hlsl_type *t1, const struct hlsl_type *t2)
+BOOL hlsl_type_compare(const struct hlsl_type *t1, const struct hlsl_type *t2)
 {
     if (t1 == t2)
         return TRUE;
@@ -226,7 +226,7 @@ BOOL compare_hlsl_types(const struct hlsl_type *t1, const struct hlsl_type *t2)
         {
             t1field = LIST_ENTRY(t1cur, struct hlsl_struct_field, entry);
             t2field = LIST_ENTRY(t2cur, struct hlsl_struct_field, entry);
-            if (!compare_hlsl_types(t1field->type, t2field->type))
+            if (!hlsl_type_compare(t1field->type, t2field->type))
                 return FALSE;
             if (strcmp(t1field->name, t2field->name))
                 return FALSE;
@@ -238,12 +238,12 @@ BOOL compare_hlsl_types(const struct hlsl_type *t1, const struct hlsl_type *t2)
     }
     if (t1->type == HLSL_CLASS_ARRAY)
         return t1->e.array.elements_count == t2->e.array.elements_count
-                && compare_hlsl_types(t1->e.array.type, t2->e.array.type);
+                && hlsl_type_compare(t1->e.array.type, t2->e.array.type);
 
     return TRUE;
 }
 
-struct hlsl_type *clone_hlsl_type(struct hlsl_type *old, unsigned int default_majority)
+struct hlsl_type *hlsl_type_clone(struct hlsl_type *old, unsigned int default_majority)
 {
     struct hlsl_struct_field *old_field, *field;
     struct hlsl_type *type;
@@ -271,7 +271,7 @@ struct hlsl_type *clone_hlsl_type(struct hlsl_type *old, unsigned int default_ma
     switch (old->type)
     {
         case HLSL_CLASS_ARRAY:
-            type->e.array.type = clone_hlsl_type(old->e.array.type, default_majority);
+            type->e.array.type = hlsl_type_clone(old->e.array.type, default_majority);
             type->e.array.elements_count = old->e.array.elements_count;
             type->reg_size = type->e.array.elements_count * type->e.array.type->reg_size;
             break;
@@ -302,7 +302,7 @@ struct hlsl_type *clone_hlsl_type(struct hlsl_type *old, unsigned int default_ma
                     vkd3d_free(type);
                     return NULL;
                 }
-                field->type = clone_hlsl_type(old_field->type, default_majority);
+                field->type = hlsl_type_clone(old_field->type, default_majority);
                 field->name = vkd3d_strdup(old_field->name);
                 if (old_field->semantic)
                     field->semantic = vkd3d_strdup(old_field->semantic);
@@ -316,7 +316,7 @@ struct hlsl_type *clone_hlsl_type(struct hlsl_type *old, unsigned int default_ma
         }
 
         case HLSL_CLASS_MATRIX:
-            type->reg_size = is_row_major(type) ? type->dimy : type->dimx;
+            type->reg_size = hlsl_type_is_row_major(type) ? type->dimy : type->dimx;
             break;
 
         default:
@@ -328,19 +328,19 @@ struct hlsl_type *clone_hlsl_type(struct hlsl_type *old, unsigned int default_ma
     return type;
 }
 
-struct hlsl_ir_expr *new_cast(struct hlsl_ir_node *node, struct hlsl_type *type,
+struct hlsl_ir_expr *hlsl_new_cast(struct hlsl_ir_node *node, struct hlsl_type *type,
         struct source_location *loc)
 {
     struct hlsl_ir_node *cast;
 
-    cast = new_unary_expr(HLSL_IR_UNOP_CAST, node, *loc);
+    cast = hlsl_new_unary_expr(HLSL_IR_UNOP_CAST, node, *loc);
     if (cast)
         cast->data_type = type;
-    return expr_from_node(cast);
+    return hlsl_ir_expr(cast);
 }
 
-struct hlsl_ir_var *new_var(const char *name, struct hlsl_type *type, const struct source_location loc,
-        const char *semantic, unsigned int modifiers, const struct reg_reservation *reg_reservation)
+struct hlsl_ir_var *hlsl_new_var(const char *name, struct hlsl_type *type, const struct source_location loc,
+        const char *semantic, unsigned int modifiers, const struct hlsl_reg_reservation *reg_reservation)
 {
     struct hlsl_ir_var *var;
 
@@ -359,9 +359,9 @@ struct hlsl_ir_var *new_var(const char *name, struct hlsl_type *type, const stru
     return var;
 }
 
-struct hlsl_ir_var *new_synthetic_var(const char *name, struct hlsl_type *type, const struct source_location loc)
+struct hlsl_ir_var *hlsl_new_synthetic_var(const char *name, struct hlsl_type *type, const struct source_location loc)
 {
-    struct hlsl_ir_var *var = new_var(vkd3d_strdup(name), type, loc, NULL, 0, NULL);
+    struct hlsl_ir_var *var = hlsl_new_var(vkd3d_strdup(name), type, loc, NULL, 0, NULL);
 
     if (var)
         list_add_tail(&hlsl_ctx.globals->vars, &var->scope_entry);
@@ -373,7 +373,7 @@ static BOOL type_is_single_reg(const struct hlsl_type *type)
     return type->type == HLSL_CLASS_SCALAR || type->type == HLSL_CLASS_VECTOR;
 }
 
-struct hlsl_ir_assignment *new_assignment(struct hlsl_ir_var *var, struct hlsl_ir_node *offset,
+struct hlsl_ir_assignment *hlsl_new_assignment(struct hlsl_ir_var *var, struct hlsl_ir_node *offset,
         struct hlsl_ir_node *rhs, unsigned int writemask, struct source_location loc)
 {
     struct hlsl_ir_assignment *assign;
@@ -392,12 +392,12 @@ struct hlsl_ir_assignment *new_assignment(struct hlsl_ir_var *var, struct hlsl_i
     return assign;
 }
 
-struct hlsl_ir_assignment *new_simple_assignment(struct hlsl_ir_var *lhs, struct hlsl_ir_node *rhs)
+struct hlsl_ir_assignment *hlsl_new_simple_assignment(struct hlsl_ir_var *lhs, struct hlsl_ir_node *rhs)
 {
-    return new_assignment(lhs, NULL, rhs, 0, rhs->loc);
+    return hlsl_new_assignment(lhs, NULL, rhs, 0, rhs->loc);
 }
 
-struct hlsl_ir_constant *new_uint_constant(unsigned int n, const struct source_location loc)
+struct hlsl_ir_constant *hlsl_new_uint_constant(unsigned int n, const struct source_location loc)
 {
     struct hlsl_ir_constant *c;
 
@@ -408,7 +408,7 @@ struct hlsl_ir_constant *new_uint_constant(unsigned int n, const struct source_l
     return c;
 }
 
-struct hlsl_ir_node *new_unary_expr(enum hlsl_ir_expr_op op, struct hlsl_ir_node *arg, struct source_location loc)
+struct hlsl_ir_node *hlsl_new_unary_expr(enum hlsl_ir_expr_op op, struct hlsl_ir_node *arg, struct source_location loc)
 {
     struct hlsl_ir_expr *expr;
 
@@ -420,12 +420,11 @@ struct hlsl_ir_node *new_unary_expr(enum hlsl_ir_expr_op op, struct hlsl_ir_node
     return &expr->node;
 }
 
-struct hlsl_ir_node *new_binary_expr(enum hlsl_ir_expr_op op,
-        struct hlsl_ir_node *arg1, struct hlsl_ir_node *arg2)
+struct hlsl_ir_node *hlsl_new_binary_expr(enum hlsl_ir_expr_op op, struct hlsl_ir_node *arg1, struct hlsl_ir_node *arg2)
 {
     struct hlsl_ir_expr *expr;
 
-    assert(compare_hlsl_types(arg1->data_type, arg2->data_type));
+    assert(hlsl_type_compare(arg1->data_type, arg2->data_type));
 
     if (!(expr = vkd3d_calloc(1, sizeof(*expr))))
         return NULL;
@@ -436,7 +435,7 @@ struct hlsl_ir_node *new_binary_expr(enum hlsl_ir_expr_op op,
     return &expr->node;
 }
 
-struct hlsl_ir_if *new_if(struct hlsl_ir_node *condition, struct source_location loc)
+struct hlsl_ir_if *hlsl_new_if(struct hlsl_ir_node *condition, struct source_location loc)
 {
     struct hlsl_ir_if *iff;
 
@@ -449,7 +448,7 @@ struct hlsl_ir_if *new_if(struct hlsl_ir_node *condition, struct source_location
     return iff;
 }
 
-struct hlsl_ir_load *new_var_load(struct hlsl_ir_var *var, const struct source_location loc)
+struct hlsl_ir_load *hlsl_new_var_load(struct hlsl_ir_var *var, const struct source_location loc)
 {
     struct hlsl_ir_load *load;
 
@@ -460,7 +459,7 @@ struct hlsl_ir_load *new_var_load(struct hlsl_ir_var *var, const struct source_l
     return load;
 }
 
-struct hlsl_ir_swizzle *new_swizzle(DWORD s, unsigned int components,
+struct hlsl_ir_swizzle *hlsl_new_swizzle(DWORD s, unsigned int components,
         struct hlsl_ir_node *val, struct source_location *loc)
 {
     struct hlsl_ir_swizzle *swizzle;
@@ -468,18 +467,18 @@ struct hlsl_ir_swizzle *new_swizzle(DWORD s, unsigned int components,
     if (!(swizzle = vkd3d_malloc(sizeof(*swizzle))))
         return NULL;
     init_node(&swizzle->node, HLSL_IR_SWIZZLE,
-            new_hlsl_type(NULL, HLSL_CLASS_VECTOR, val->data_type->base_type, components, 1), *loc);
+            hlsl_new_type(NULL, HLSL_CLASS_VECTOR, val->data_type->base_type, components, 1), *loc);
     hlsl_src_from_node(&swizzle->val, val);
     swizzle->swizzle = s;
     return swizzle;
 }
 
-BOOL type_is_void(const struct hlsl_type *type)
+BOOL hlsl_type_is_void(const struct hlsl_type *type)
 {
     return type->type == HLSL_CLASS_OBJECT && type->base_type == HLSL_TYPE_VOID;
 }
 
-struct hlsl_ir_function_decl *new_func_decl(struct hlsl_type *return_type,
+struct hlsl_ir_function_decl *hlsl_new_func_decl(struct hlsl_type *return_type,
         struct list *parameters, const char *semantic, struct source_location loc)
 {
     struct hlsl_ir_function_decl *decl;
@@ -491,13 +490,13 @@ struct hlsl_ir_function_decl *new_func_decl(struct hlsl_type *return_type,
     decl->semantic = semantic;
     decl->loc = loc;
 
-    if (!type_is_void(return_type))
+    if (!hlsl_type_is_void(return_type))
     {
         struct hlsl_ir_var *return_var;
         char name[28];
 
         sprintf(name, "<retval-%p>", decl);
-        if (!(return_var = new_synthetic_var(name, return_type, loc)))
+        if (!(return_var = hlsl_new_synthetic_var(name, return_type, loc)))
         {
             vkd3d_free(decl);
             return NULL;
@@ -524,7 +523,7 @@ static int compare_hlsl_types_rb(const void *key, const struct rb_entry *entry)
     return strcmp(name, type->name);
 }
 
-void push_scope(struct hlsl_parse_ctx *ctx)
+void hlsl_push_scope(struct hlsl_parse_ctx *ctx)
 {
     struct hlsl_scope *new_scope;
 
@@ -538,7 +537,7 @@ void push_scope(struct hlsl_parse_ctx *ctx)
     list_add_tail(&ctx->scopes, &new_scope->entry);
 }
 
-BOOL pop_scope(struct hlsl_parse_ctx *ctx)
+BOOL hlsl_pop_scope(struct hlsl_parse_ctx *ctx)
 {
     struct hlsl_scope *prev_scope = ctx->cur_scope->upper;
 
@@ -638,7 +637,7 @@ void init_functions_tree(struct rb_tree *funcs)
     rb_init(&hlsl_ctx.functions, compare_function_rb);
 }
 
-const char *debug_base_type(const struct hlsl_type *type)
+const char *hlsl_base_type_to_string(const struct hlsl_type *type)
 {
     const char *name = "(unknown)";
 
@@ -678,11 +677,11 @@ const char *debug_hlsl_type(const struct hlsl_type *type)
 
     if (type->type == HLSL_CLASS_ARRAY)
     {
-        name = debug_base_type(type->e.array.type);
-        return vkd3d_dbg_sprintf("%s[%u]", name, type->e.array.elements_count);
+        return vkd3d_dbg_sprintf("%s[%u]", hlsl_base_type_to_string(type->e.array.type),
+                type->e.array.elements_count);
     }
 
-    name = debug_base_type(type);
+    name = hlsl_base_type_to_string(type);
 
     if (type->type == HLSL_CLASS_SCALAR)
         return vkd3d_dbg_sprintf("%s", name);
@@ -693,7 +692,7 @@ const char *debug_hlsl_type(const struct hlsl_type *type)
     return "unexpected_type";
 }
 
-const char *debug_modifiers(DWORD modifiers)
+const char *hlsl_debug_modifiers(DWORD modifiers)
 {
     char string[110];
 
@@ -730,7 +729,7 @@ const char *debug_modifiers(DWORD modifiers)
     return vkd3d_dbg_sprintf("%s", string[0] ? string + 1 : "");
 }
 
-const char *debug_node_type(enum hlsl_ir_node_type type)
+const char *hlsl_node_type_to_string(enum hlsl_ir_node_type type)
 {
     static const char * const names[] =
     {
@@ -773,7 +772,7 @@ static void debug_dump_src(struct vkd3d_string_buffer *buffer, const struct hlsl
 static void debug_dump_ir_var(struct vkd3d_string_buffer *buffer, const struct hlsl_ir_var *var)
 {
     if (var->modifiers)
-        vkd3d_string_buffer_printf(buffer, "%s ", debug_modifiers(var->modifiers));
+        vkd3d_string_buffer_printf(buffer, "%s ", hlsl_debug_modifiers(var->modifiers));
     vkd3d_string_buffer_printf(buffer, "%s %s", debug_hlsl_type(var->data_type), var->name);
     if (var->semantic)
         vkd3d_string_buffer_printf(buffer, " : %s", var->semantic);
@@ -856,7 +855,8 @@ static void debug_dump_ir_constant(struct vkd3d_string_buffer *buffer, const str
                 break;
 
             default:
-                vkd3d_string_buffer_printf(buffer, "Constants of type %s not supported\n", debug_base_type(type));
+                vkd3d_string_buffer_printf(buffer, "Constants of type %s not supported\n",
+                        hlsl_base_type_to_string(type));
         }
     }
     if (type->dimx != 1)
@@ -1025,43 +1025,43 @@ static void debug_dump_instr(struct vkd3d_string_buffer *buffer, const struct hl
     switch (instr->type)
     {
         case HLSL_IR_ASSIGNMENT:
-            debug_dump_ir_assignment(buffer, assignment_from_node(instr));
+            debug_dump_ir_assignment(buffer, hlsl_ir_assignment(instr));
             break;
 
         case HLSL_IR_CONSTANT:
-            debug_dump_ir_constant(buffer, constant_from_node(instr));
+            debug_dump_ir_constant(buffer, hlsl_ir_constant(instr));
             break;
 
         case HLSL_IR_EXPR:
-            debug_dump_ir_expr(buffer, expr_from_node(instr));
+            debug_dump_ir_expr(buffer, hlsl_ir_expr(instr));
             break;
 
         case HLSL_IR_IF:
-            debug_dump_ir_if(buffer, if_from_node(instr));
+            debug_dump_ir_if(buffer, hlsl_ir_if(instr));
             break;
 
         case HLSL_IR_JUMP:
-            debug_dump_ir_jump(buffer, jump_from_node(instr));
+            debug_dump_ir_jump(buffer, hlsl_ir_jump(instr));
             break;
 
         case HLSL_IR_LOAD:
-            debug_dump_deref(buffer, &load_from_node(instr)->src);
+            debug_dump_deref(buffer, &hlsl_ir_load(instr)->src);
             break;
 
         case HLSL_IR_LOOP:
-            debug_dump_ir_loop(buffer, loop_from_node(instr));
+            debug_dump_ir_loop(buffer, hlsl_ir_loop(instr));
             break;
 
         case HLSL_IR_SWIZZLE:
-            debug_dump_ir_swizzle(buffer, swizzle_from_node(instr));
+            debug_dump_ir_swizzle(buffer, hlsl_ir_swizzle(instr));
             break;
 
         default:
-            vkd3d_string_buffer_printf(buffer, "<No dump function for %s>", debug_node_type(instr->type));
+            vkd3d_string_buffer_printf(buffer, "<No dump function for %s>", hlsl_node_type_to_string(instr->type));
     }
 }
 
-void debug_dump_ir_function_decl(const struct hlsl_ir_function_decl *func)
+void hlsl_dump_function(const struct hlsl_ir_function_decl *func)
 {
     struct vkd3d_string_buffer buffer;
     struct hlsl_ir_var *param;
@@ -1083,7 +1083,7 @@ void debug_dump_ir_function_decl(const struct hlsl_ir_function_decl *func)
     vkd3d_string_buffer_cleanup(&buffer);
 }
 
-void free_hlsl_type(struct hlsl_type *type)
+void hlsl_free_type(struct hlsl_type *type)
 {
     struct hlsl_struct_field *field, *next_field;
 
@@ -1100,7 +1100,7 @@ void free_hlsl_type(struct hlsl_type *type)
     vkd3d_free(type);
 }
 
-void free_instr_list(struct list *list)
+void hlsl_free_instr_list(struct list *list)
 {
     struct hlsl_ir_node *node, *next_node;
 
@@ -1109,7 +1109,7 @@ void free_instr_list(struct list *list)
     /* Iterate in reverse, to avoid use-after-free when unlinking sources from
      * the "uses" list. */
     LIST_FOR_EACH_ENTRY_SAFE_REV(node, next_node, list, struct hlsl_ir_node, entry)
-        free_instr(node);
+        hlsl_free_instr(node);
     vkd3d_free(list);
 }
 
@@ -1139,9 +1139,9 @@ static void free_ir_if(struct hlsl_ir_if *if_node)
     struct hlsl_ir_node *node, *next_node;
 
     LIST_FOR_EACH_ENTRY_SAFE(node, next_node, &if_node->then_instrs, struct hlsl_ir_node, entry)
-        free_instr(node);
+        hlsl_free_instr(node);
     LIST_FOR_EACH_ENTRY_SAFE(node, next_node, &if_node->else_instrs, struct hlsl_ir_node, entry)
-        free_instr(node);
+        hlsl_free_instr(node);
     hlsl_src_remove(&if_node->condition);
     vkd3d_free(if_node);
 }
@@ -1162,7 +1162,7 @@ static void free_ir_loop(struct hlsl_ir_loop *loop)
     struct hlsl_ir_node *node, *next_node;
 
     LIST_FOR_EACH_ENTRY_SAFE(node, next_node, &loop->body, struct hlsl_ir_node, entry)
-        free_instr(node);
+        hlsl_free_instr(node);
     vkd3d_free(loop);
 }
 
@@ -1172,44 +1172,44 @@ static void free_ir_swizzle(struct hlsl_ir_swizzle *swizzle)
     vkd3d_free(swizzle);
 }
 
-void free_instr(struct hlsl_ir_node *node)
+void hlsl_free_instr(struct hlsl_ir_node *node)
 {
     switch (node->type)
     {
         case HLSL_IR_ASSIGNMENT:
-            free_ir_assignment(assignment_from_node(node));
+            free_ir_assignment(hlsl_ir_assignment(node));
             break;
 
         case HLSL_IR_CONSTANT:
-            free_ir_constant(constant_from_node(node));
+            free_ir_constant(hlsl_ir_constant(node));
             break;
 
         case HLSL_IR_EXPR:
-            free_ir_expr(expr_from_node(node));
+            free_ir_expr(hlsl_ir_expr(node));
             break;
 
         case HLSL_IR_IF:
-            free_ir_if(if_from_node(node));
+            free_ir_if(hlsl_ir_if(node));
             break;
 
         case HLSL_IR_JUMP:
-            free_ir_jump(jump_from_node(node));
+            free_ir_jump(hlsl_ir_jump(node));
             break;
 
         case HLSL_IR_LOAD:
-            free_ir_load(load_from_node(node));
+            free_ir_load(hlsl_ir_load(node));
             break;
 
         case HLSL_IR_LOOP:
-            free_ir_loop(loop_from_node(node));
+            free_ir_loop(hlsl_ir_loop(node));
             break;
 
         case HLSL_IR_SWIZZLE:
-            free_ir_swizzle(swizzle_from_node(node));
+            free_ir_swizzle(hlsl_ir_swizzle(node));
             break;
 
         default:
-            FIXME("Unsupported node type %s.\n", debug_node_type(node->type));
+            FIXME("Unsupported node type %s.\n", hlsl_node_type_to_string(node->type));
     }
 }
 
@@ -1217,7 +1217,7 @@ static void free_function_decl(struct hlsl_ir_function_decl *decl)
 {
     vkd3d_free((void *)decl->semantic);
     vkd3d_free(decl->parameters);
-    free_instr_list(decl->body);
+    hlsl_free_instr_list(decl->body);
     vkd3d_free(decl);
 }
 
@@ -1233,12 +1233,12 @@ static void free_function(struct hlsl_ir_function *func)
     vkd3d_free(func);
 }
 
-void free_function_rb(struct rb_entry *entry, void *context)
+void hlsl_free_function_rb(struct rb_entry *entry, void *context)
 {
     free_function(RB_ENTRY_VALUE(entry, struct hlsl_ir_function, entry));
 }
 
-void add_function_decl(struct rb_tree *funcs, char *name, struct hlsl_ir_function_decl *decl, BOOL intrinsic)
+void hlsl_add_function(struct rb_tree *funcs, char *name, struct hlsl_ir_function_decl *decl, BOOL intrinsic)
 {
     struct hlsl_ir_function *func;
     struct rb_entry *func_entry, *old_entry;
diff --git a/libs/vkd3d-shader/hlsl.h b/libs/vkd3d-shader/hlsl.h
index 88ed6de4..138ab4ee 100644
--- a/libs/vkd3d-shader/hlsl.h
+++ b/libs/vkd3d-shader/hlsl.h
@@ -206,7 +206,7 @@ struct hlsl_src
 
 #define HLSL_MODIFIERS_MAJORITY_MASK (HLSL_MODIFIER_ROW_MAJOR | HLSL_MODIFIER_COLUMN_MAJOR)
 
-struct reg_reservation
+struct hlsl_reg_reservation
 {
     enum vkd3d_shader_register_type type;
     DWORD regnum;
@@ -219,7 +219,7 @@ struct hlsl_ir_var
     const char *name;
     const char *semantic;
     unsigned int modifiers;
-    const struct reg_reservation *reg_reservation;
+    const struct hlsl_reg_reservation *reg_reservation;
     struct list scope_entry, param_entry;
 
     unsigned int first_write, last_read;
@@ -404,14 +404,14 @@ struct parse_parameter
     struct hlsl_type *type;
     const char *name;
     const char *semantic;
-    const struct reg_reservation *reg_reservation;
+    const struct hlsl_reg_reservation *reg_reservation;
     unsigned int modifiers;
 };
 
 struct parse_colon_attribute
 {
     const char *semantic;
-    struct reg_reservation *reg_reservation;
+    struct hlsl_reg_reservation *reg_reservation;
 };
 
 struct parse_initializer
@@ -429,7 +429,7 @@ struct parse_variable_def
     char *name;
     unsigned int array_size;
     const char *semantic;
-    struct reg_reservation *reg_reservation;
+    struct hlsl_reg_reservation *reg_reservation;
     struct parse_initializer initializer;
 };
 
@@ -508,53 +508,49 @@ enum hlsl_error_level
     HLSL_LEVEL_NOTE,
 };
 
-void hlsl_message(const char *fmt, ...) VKD3D_PRINTF_FUNC(1,2) DECLSPEC_HIDDEN;
-void hlsl_report_message(const struct source_location loc,
-        enum hlsl_error_level level, const char *fmt, ...) VKD3D_PRINTF_FUNC(3,4) DECLSPEC_HIDDEN;
-
-static inline struct hlsl_ir_assignment *assignment_from_node(const struct hlsl_ir_node *node)
+static inline struct hlsl_ir_assignment *hlsl_ir_assignment(const struct hlsl_ir_node *node)
 {
     assert(node->type == HLSL_IR_ASSIGNMENT);
     return CONTAINING_RECORD(node, struct hlsl_ir_assignment, node);
 }
 
-static inline struct hlsl_ir_constant *constant_from_node(const struct hlsl_ir_node *node)
+static inline struct hlsl_ir_constant *hlsl_ir_constant(const struct hlsl_ir_node *node)
 {
     assert(node->type == HLSL_IR_CONSTANT);
     return CONTAINING_RECORD(node, struct hlsl_ir_constant, node);
 }
 
-static inline struct hlsl_ir_expr *expr_from_node(const struct hlsl_ir_node *node)
+static inline struct hlsl_ir_expr *hlsl_ir_expr(const struct hlsl_ir_node *node)
 {
     assert(node->type == HLSL_IR_EXPR);
     return CONTAINING_RECORD(node, struct hlsl_ir_expr, node);
 }
 
-static inline struct hlsl_ir_if *if_from_node(const struct hlsl_ir_node *node)
+static inline struct hlsl_ir_if *hlsl_ir_if(const struct hlsl_ir_node *node)
 {
     assert(node->type == HLSL_IR_IF);
     return CONTAINING_RECORD(node, struct hlsl_ir_if, node);
 }
 
-static inline struct hlsl_ir_jump *jump_from_node(const struct hlsl_ir_node *node)
+static inline struct hlsl_ir_jump *hlsl_ir_jump(const struct hlsl_ir_node *node)
 {
     assert(node->type == HLSL_IR_JUMP);
     return CONTAINING_RECORD(node, struct hlsl_ir_jump, node);
 }
 
-static inline struct hlsl_ir_load *load_from_node(const struct hlsl_ir_node *node)
+static inline struct hlsl_ir_load *hlsl_ir_load(const struct hlsl_ir_node *node)
 {
     assert(node->type == HLSL_IR_LOAD);
     return CONTAINING_RECORD(node, struct hlsl_ir_load, node);
 }
 
-static inline struct hlsl_ir_loop *loop_from_node(const struct hlsl_ir_node *node)
+static inline struct hlsl_ir_loop *hlsl_ir_loop(const struct hlsl_ir_node *node)
 {
     assert(node->type == HLSL_IR_LOOP);
     return CONTAINING_RECORD(node, struct hlsl_ir_loop, node);
 }
 
-static inline struct hlsl_ir_swizzle *swizzle_from_node(const struct hlsl_ir_node *node)
+static inline struct hlsl_ir_swizzle *hlsl_ir_swizzle(const struct hlsl_ir_node *node)
 {
     assert(node->type == HLSL_IR_SWIZZLE);
     return CONTAINING_RECORD(node, struct hlsl_ir_swizzle, node);
@@ -592,61 +588,75 @@ static inline void set_parse_status(enum parse_status *current, enum parse_statu
         *current = PARSE_WARN;
 }
 
-struct hlsl_type *new_array_type(struct hlsl_type *basic_type, unsigned int array_size) DECLSPEC_HIDDEN;
-struct hlsl_ir_assignment *new_assignment(struct hlsl_ir_var *var, struct hlsl_ir_node *offset,
+void init_functions_tree(struct rb_tree *funcs) DECLSPEC_HIDDEN;
+
+const char *hlsl_base_type_to_string(const struct hlsl_type *type) DECLSPEC_HIDDEN;
+const char *debug_hlsl_type(const struct hlsl_type *type) DECLSPEC_HIDDEN;
+const char *hlsl_debug_modifiers(DWORD modifiers) DECLSPEC_HIDDEN;
+const char *hlsl_node_type_to_string(enum hlsl_ir_node_type type) DECLSPEC_HIDDEN;
+
+void hlsl_add_function(struct rb_tree *funcs, char *name, struct hlsl_ir_function_decl *decl,
+        BOOL intrinsic) DECLSPEC_HIDDEN;
+BOOL hlsl_add_var(struct hlsl_scope *scope, struct hlsl_ir_var *decl, BOOL local_var) DECLSPEC_HIDDEN;
+
+int hlsl_compile(enum vkd3d_shader_type type, DWORD major, DWORD minor, const char *entrypoint,
+        struct vkd3d_shader_code *dxbc, struct vkd3d_shader_message_context *message_context) DECLSPEC_HIDDEN;
+
+void hlsl_dump_function(const struct hlsl_ir_function_decl *func) DECLSPEC_HIDDEN;
+
+void hlsl_free_instr(struct hlsl_ir_node *node) DECLSPEC_HIDDEN;
+void hlsl_free_instr_list(struct list *list) DECLSPEC_HIDDEN;
+void hlsl_free_function_rb(struct rb_entry *entry, void *context) DECLSPEC_HIDDEN;
+void hlsl_free_type(struct hlsl_type *type) DECLSPEC_HIDDEN;
+void hlsl_free_var(struct hlsl_ir_var *decl) DECLSPEC_HIDDEN;
+
+BOOL hlsl_get_function(const char *name) DECLSPEC_HIDDEN;
+struct hlsl_type *hlsl_get_type(struct hlsl_scope *scope, const char *name, BOOL recursive) DECLSPEC_HIDDEN;
+struct hlsl_ir_var *hlsl_get_var(struct hlsl_scope *scope, const char *name) DECLSPEC_HIDDEN;
+
+struct hlsl_type *hlsl_new_array_type(struct hlsl_type *basic_type, unsigned int array_size) DECLSPEC_HIDDEN;
+struct hlsl_ir_assignment *hlsl_new_assignment(struct hlsl_ir_var *var, struct hlsl_ir_node *offset,
         struct hlsl_ir_node *rhs, unsigned int writemask, struct source_location loc) DECLSPEC_HIDDEN;
-struct hlsl_ir_node *new_binary_expr(enum hlsl_ir_expr_op op, struct hlsl_ir_node *arg1,
+struct hlsl_ir_node *hlsl_new_binary_expr(enum hlsl_ir_expr_op op, struct hlsl_ir_node *arg1,
         struct hlsl_ir_node *arg2) DECLSPEC_HIDDEN;
-struct hlsl_ir_expr *new_cast(struct hlsl_ir_node *node, struct hlsl_type *type,
+struct hlsl_ir_expr *hlsl_new_cast(struct hlsl_ir_node *node, struct hlsl_type *type,
         struct source_location *loc) DECLSPEC_HIDDEN;
-struct hlsl_ir_function_decl *new_func_decl(struct hlsl_type *return_type,
+struct hlsl_ir_function_decl *hlsl_new_func_decl(struct hlsl_type *return_type,
         struct list *parameters, const char *semantic, struct source_location loc) DECLSPEC_HIDDEN;
-struct hlsl_ir_if *new_if(struct hlsl_ir_node *condition, struct source_location loc) DECLSPEC_HIDDEN;
-struct hlsl_ir_assignment *new_simple_assignment(struct hlsl_ir_var *lhs, struct hlsl_ir_node *rhs) DECLSPEC_HIDDEN;
-struct hlsl_type *new_struct_type(const char *name, struct list *fields) DECLSPEC_HIDDEN;
-struct hlsl_ir_swizzle *new_swizzle(DWORD s, unsigned int components,
+struct hlsl_ir_if *hlsl_new_if(struct hlsl_ir_node *condition, struct source_location loc) DECLSPEC_HIDDEN;
+struct hlsl_ir_assignment *hlsl_new_simple_assignment(struct hlsl_ir_var *lhs,
+        struct hlsl_ir_node *rhs) DECLSPEC_HIDDEN;
+struct hlsl_type *hlsl_new_struct_type(const char *name, struct list *fields) DECLSPEC_HIDDEN;
+struct hlsl_ir_swizzle *hlsl_new_swizzle(DWORD s, unsigned int components,
         struct hlsl_ir_node *val, struct source_location *loc) DECLSPEC_HIDDEN;
-struct hlsl_ir_var *new_synthetic_var(const char *name, struct hlsl_type *type,
+struct hlsl_ir_var *hlsl_new_synthetic_var(const char *name, struct hlsl_type *type,
         const struct source_location loc) DECLSPEC_HIDDEN;
-struct hlsl_ir_constant *new_uint_constant(unsigned int n, const struct source_location loc) DECLSPEC_HIDDEN;
-struct hlsl_ir_node *new_unary_expr(enum hlsl_ir_expr_op op, struct hlsl_ir_node *arg,
-        struct source_location loc) DECLSPEC_HIDDEN;
-struct hlsl_ir_var *new_var(const char *name, struct hlsl_type *type, const struct source_location loc,
-        const char *semantic, unsigned int modifiers, const struct reg_reservation *reg_reservation) DECLSPEC_HIDDEN;
-struct hlsl_ir_load *new_var_load(struct hlsl_ir_var *var, const struct source_location loc) DECLSPEC_HIDDEN;
-
-BOOL add_declaration(struct hlsl_scope *scope, struct hlsl_ir_var *decl, BOOL local_var) DECLSPEC_HIDDEN;
-struct hlsl_ir_var *get_variable(struct hlsl_scope *scope, const char *name) DECLSPEC_HIDDEN;
-void free_declaration(struct hlsl_ir_var *decl) DECLSPEC_HIDDEN;
-struct hlsl_type *new_hlsl_type(const char *name, enum hlsl_type_class type_class,
+struct hlsl_type *hlsl_new_type(const char *name, enum hlsl_type_class type_class,
         enum hlsl_base_type base_type, unsigned dimx, unsigned dimy) DECLSPEC_HIDDEN;
-struct hlsl_type *clone_hlsl_type(struct hlsl_type *old, unsigned int default_majority) DECLSPEC_HIDDEN;
-struct hlsl_type *get_type(struct hlsl_scope *scope, const char *name, BOOL recursive) DECLSPEC_HIDDEN;
-BOOL is_row_major(const struct hlsl_type *type) DECLSPEC_HIDDEN;
-BOOL find_function(const char *name) DECLSPEC_HIDDEN;
-unsigned int components_count_type(struct hlsl_type *type) DECLSPEC_HIDDEN;
-BOOL compare_hlsl_types(const struct hlsl_type *t1, const struct hlsl_type *t2) DECLSPEC_HIDDEN;
-void push_scope(struct hlsl_parse_ctx *ctx) DECLSPEC_HIDDEN;
-BOOL pop_scope(struct hlsl_parse_ctx *ctx) DECLSPEC_HIDDEN;
-void init_functions_tree(struct rb_tree *funcs) DECLSPEC_HIDDEN;
-void add_function_decl(struct rb_tree *funcs, char *name, struct hlsl_ir_function_decl *decl,
-        BOOL intrinsic) DECLSPEC_HIDDEN;
-BOOL type_is_void(const struct hlsl_type *type) DECLSPEC_HIDDEN;
+struct hlsl_ir_constant *hlsl_new_uint_constant(unsigned int n, const struct source_location loc) DECLSPEC_HIDDEN;
+struct hlsl_ir_node *hlsl_new_unary_expr(enum hlsl_ir_expr_op op, struct hlsl_ir_node *arg,
+        struct source_location loc) DECLSPEC_HIDDEN;
+struct hlsl_ir_var *hlsl_new_var(const char *name, struct hlsl_type *type, const struct source_location loc,
+        const char *semantic, unsigned int modifiers,
+        const struct hlsl_reg_reservation *reg_reservation) DECLSPEC_HIDDEN;
+struct hlsl_ir_load *hlsl_new_var_load(struct hlsl_ir_var *var, const struct source_location loc) DECLSPEC_HIDDEN;
+
+void hlsl_message(const char *fmt, ...) VKD3D_PRINTF_FUNC(1,2) DECLSPEC_HIDDEN;
+void hlsl_report_message(const struct source_location loc,
+        enum hlsl_error_level level, const char *fmt, ...) VKD3D_PRINTF_FUNC(3,4) DECLSPEC_HIDDEN;
+
+void hlsl_push_scope(struct hlsl_parse_ctx *ctx) DECLSPEC_HIDDEN;
+BOOL hlsl_pop_scope(struct hlsl_parse_ctx *ctx) DECLSPEC_HIDDEN;
+
+struct hlsl_type *hlsl_type_clone(struct hlsl_type *old, unsigned int default_majority) DECLSPEC_HIDDEN;
+BOOL hlsl_type_compare(const struct hlsl_type *t1, const struct hlsl_type *t2) DECLSPEC_HIDDEN;
+unsigned int hlsl_type_component_count(struct hlsl_type *type) DECLSPEC_HIDDEN;
+BOOL hlsl_type_is_row_major(const struct hlsl_type *type) DECLSPEC_HIDDEN;
+BOOL hlsl_type_is_void(const struct hlsl_type *type) DECLSPEC_HIDDEN;
 
 int hlsl_lexer_compile(const char *text, enum vkd3d_shader_type type, DWORD major, DWORD minor, const char *entrypoint,
         struct vkd3d_shader_code *dxbc, struct vkd3d_shader_message_context *message_context) DECLSPEC_HIDDEN;
 int hlsl_parser_compile(enum vkd3d_shader_type type, DWORD major, DWORD minor, const char *entrypoint,
         struct vkd3d_shader_code *dxbc, struct vkd3d_shader_message_context *message_context) DECLSPEC_HIDDEN;
 
-const char *debug_base_type(const struct hlsl_type *type) DECLSPEC_HIDDEN;
-const char *debug_hlsl_type(const struct hlsl_type *type) DECLSPEC_HIDDEN;
-const char *debug_modifiers(DWORD modifiers) DECLSPEC_HIDDEN;
-const char *debug_node_type(enum hlsl_ir_node_type type) DECLSPEC_HIDDEN;
-void debug_dump_ir_function_decl(const struct hlsl_ir_function_decl *func) DECLSPEC_HIDDEN;
-
-void free_hlsl_type(struct hlsl_type *type) DECLSPEC_HIDDEN;
-void free_instr(struct hlsl_ir_node *node) DECLSPEC_HIDDEN;
-void free_instr_list(struct list *list) DECLSPEC_HIDDEN;
-void free_function_rb(struct rb_entry *entry, void *context) DECLSPEC_HIDDEN;
-
 #endif
diff --git a/libs/vkd3d-shader/hlsl.l b/libs/vkd3d-shader/hlsl.l
index 0bb1ee88..6fd9ecd4 100644
--- a/libs/vkd3d-shader/hlsl.l
+++ b/libs/vkd3d-shader/hlsl.l
@@ -172,10 +172,9 @@ row_major               {return KW_ROW_MAJOR;           }
 
 {IDENTIFIER}            {
                             hlsl_lval.name = vkd3d_strdup(yytext);
-                            if (get_variable(hlsl_ctx.cur_scope, yytext)
-                                    || find_function(yytext))
+                            if (hlsl_get_var(hlsl_ctx.cur_scope, yytext) || hlsl_get_function(yytext))
                                 return VAR_IDENTIFIER;
-                            else if (get_type(hlsl_ctx.cur_scope, yytext, TRUE))
+                            else if (hlsl_get_type(hlsl_ctx.cur_scope, yytext, TRUE))
                                 return TYPE_IDENTIFIER;
                             else
                                 return NEW_IDENTIFIER;
diff --git a/libs/vkd3d-shader/hlsl.y b/libs/vkd3d-shader/hlsl.y
index e1ba7c98..5c346eeb 100644
--- a/libs/vkd3d-shader/hlsl.y
+++ b/libs/vkd3d-shader/hlsl.y
@@ -50,7 +50,7 @@ static void debug_dump_decl(struct hlsl_type *type, DWORD modifiers, const char
 {
     TRACE("Line %u: ", line_no);
     if (modifiers)
-        TRACE("%s ", debug_modifiers(modifiers));
+        TRACE("%s ", hlsl_debug_modifiers(modifiers));
     TRACE("%s %s;\n", debug_hlsl_type(type), declname);
 }
 
@@ -87,21 +87,21 @@ static BOOL compatible_data_types(struct hlsl_type *t1, struct hlsl_type *t2)
 
     if (t1->type == HLSL_CLASS_ARRAY)
     {
-        if (compare_hlsl_types(t1->e.array.type, t2))
+        if (hlsl_type_compare(t1->e.array.type, t2))
             /* e.g. float4[3] to float4 is allowed */
             return TRUE;
 
         if (t2->type == HLSL_CLASS_ARRAY || t2->type == HLSL_CLASS_STRUCT)
-            return components_count_type(t1) >= components_count_type(t2);
+            return hlsl_type_component_count(t1) >= hlsl_type_component_count(t2);
         else
-            return components_count_type(t1) == components_count_type(t2);
+            return hlsl_type_component_count(t1) == hlsl_type_component_count(t2);
     }
 
     if (t1->type == HLSL_CLASS_STRUCT)
-        return components_count_type(t1) >= components_count_type(t2);
+        return hlsl_type_component_count(t1) >= hlsl_type_component_count(t2);
 
     if (t2->type == HLSL_CLASS_ARRAY || t2->type == HLSL_CLASS_STRUCT)
-        return components_count_type(t1) == components_count_type(t2);
+        return hlsl_type_component_count(t1) == hlsl_type_component_count(t2);
 
     if (t1->type == HLSL_CLASS_MATRIX || t2->type == HLSL_CLASS_MATRIX)
     {
@@ -110,12 +110,12 @@ static BOOL compatible_data_types(struct hlsl_type *t1, struct hlsl_type *t2)
 
         /* Matrix-vector conversion is apparently allowed if they have the same components count */
         if ((t1->type == HLSL_CLASS_VECTOR || t2->type == HLSL_CLASS_VECTOR)
-                && components_count_type(t1) == components_count_type(t2))
+                && hlsl_type_component_count(t1) == hlsl_type_component_count(t2))
             return TRUE;
         return FALSE;
     }
 
-    if (components_count_type(t1) >= components_count_type(t2))
+    if (hlsl_type_component_count(t1) >= hlsl_type_component_count(t2))
         return TRUE;
     return FALSE;
 }
@@ -137,16 +137,16 @@ static BOOL implicit_compatible_data_types(struct hlsl_type *t1, struct hlsl_typ
 
     if (t1->type == HLSL_CLASS_ARRAY && t2->type == HLSL_CLASS_ARRAY)
     {
-        return components_count_type(t1) == components_count_type(t2);
+        return hlsl_type_component_count(t1) == hlsl_type_component_count(t2);
     }
 
     if ((t1->type == HLSL_CLASS_ARRAY && t2->type <= HLSL_CLASS_LAST_NUMERIC)
             || (t1->type <= HLSL_CLASS_LAST_NUMERIC && t2->type == HLSL_CLASS_ARRAY))
     {
         /* e.g. float4[3] to float4 is allowed */
-        if (t1->type == HLSL_CLASS_ARRAY && compare_hlsl_types(t1->e.array.type, t2))
+        if (t1->type == HLSL_CLASS_ARRAY && hlsl_type_compare(t1->e.array.type, t2))
             return TRUE;
-        if (components_count_type(t1) == components_count_type(t2))
+        if (hlsl_type_component_count(t1) == hlsl_type_component_count(t2))
             return TRUE;
         return FALSE;
     }
@@ -166,13 +166,13 @@ static BOOL implicit_compatible_data_types(struct hlsl_type *t1, struct hlsl_typ
 
         /* Matrix-vector conversion is apparently allowed if they have the same components count */
         if ((t1->type == HLSL_CLASS_VECTOR || t2->type == HLSL_CLASS_VECTOR)
-                && components_count_type(t1) == components_count_type(t2))
+                && hlsl_type_component_count(t1) == hlsl_type_component_count(t2))
             return TRUE;
         return FALSE;
     }
 
     if (t1->type == HLSL_CLASS_STRUCT && t2->type == HLSL_CLASS_STRUCT)
-        return compare_hlsl_types(t1, t2);
+        return hlsl_type_compare(t1, t2);
 
     return FALSE;
 }
@@ -183,7 +183,7 @@ static struct hlsl_ir_node *add_implicit_conversion(struct list *instrs, struct
     struct hlsl_type *src_type = node->data_type;
     struct hlsl_ir_expr *cast;
 
-    if (compare_hlsl_types(src_type, dst_type))
+    if (hlsl_type_compare(src_type, dst_type))
         return node;
 
     if (!implicit_compatible_data_types(src_type, dst_type))
@@ -198,7 +198,7 @@ static struct hlsl_ir_node *add_implicit_conversion(struct list *instrs, struct
 
     TRACE("Implicit conversion from %s to %s.\n", debug_hlsl_type(src_type), debug_hlsl_type(dst_type));
 
-    if (!(cast = new_cast(node, dst_type, loc)))
+    if (!(cast = hlsl_new_cast(node, dst_type, loc)))
         return NULL;
     list_add_tail(instrs, &cast->node.entry);
     return &cast->node;
@@ -220,7 +220,7 @@ static BOOL declare_variable(struct hlsl_ir_var *decl, BOOL local)
         if (invalid)
         {
             hlsl_report_message(decl->loc, HLSL_LEVEL_ERROR,
-                    "modifier '%s' invalid for local variables", debug_modifiers(invalid));
+                    "modifier '%s' invalid for local variables", hlsl_debug_modifiers(invalid));
         }
         if (decl->semantic)
         {
@@ -231,16 +231,16 @@ static BOOL declare_variable(struct hlsl_ir_var *decl, BOOL local)
     }
     else
     {
-        if (find_function(decl->name))
+        if (hlsl_get_function(decl->name))
         {
             hlsl_report_message(decl->loc, HLSL_LEVEL_ERROR, "redefinition of '%s'", decl->name);
             return FALSE;
         }
     }
-    ret = add_declaration(hlsl_ctx.cur_scope, decl, local);
+    ret = hlsl_add_var(hlsl_ctx.cur_scope, decl, local);
     if (!ret)
     {
-        struct hlsl_ir_var *old = get_variable(hlsl_ctx.cur_scope, decl->name);
+        struct hlsl_ir_var *old = hlsl_get_var(hlsl_ctx.cur_scope, decl->name);
 
         hlsl_report_message(decl->loc, HLSL_LEVEL_ERROR, "\"%s\" already declared", decl->name);
         hlsl_report_message(old->loc, HLSL_LEVEL_NOTE, "\"%s\" was previously declared here", old->name);
@@ -253,7 +253,7 @@ static DWORD add_modifiers(DWORD modifiers, DWORD mod, const struct source_locat
 {
     if (modifiers & mod)
     {
-        hlsl_report_message(loc, HLSL_LEVEL_ERROR, "modifier '%s' already specified", debug_modifiers(mod));
+        hlsl_report_message(loc, HLSL_LEVEL_ERROR, "modifier '%s' already specified", hlsl_debug_modifiers(mod));
         return modifiers;
     }
     if ((mod & HLSL_MODIFIERS_MAJORITY_MASK) && (modifiers & HLSL_MODIFIERS_MAJORITY_MASK))
@@ -266,7 +266,7 @@ static DWORD add_modifiers(DWORD modifiers, DWORD mod, const struct source_locat
 
 static BOOL add_type_to_scope(struct hlsl_scope *scope, struct hlsl_type *def)
 {
-    if (get_type(scope, def->name, FALSE))
+    if (hlsl_get_type(scope, def->name, FALSE))
         return FALSE;
 
     rb_put(&scope->types, def->name, &def->scope_entry);
@@ -304,20 +304,20 @@ static void declare_predefined_types(struct hlsl_scope *scope)
             for (x = 1; x <= 4; ++x)
             {
                 sprintf(name, "%s%ux%u", names[bt], y, x);
-                type = new_hlsl_type(vkd3d_strdup(name), HLSL_CLASS_MATRIX, bt, x, y);
+                type = hlsl_new_type(vkd3d_strdup(name), HLSL_CLASS_MATRIX, bt, x, y);
                 add_type_to_scope(scope, type);
 
                 if (y == 1)
                 {
                     sprintf(name, "%s%u", names[bt], x);
-                    type = new_hlsl_type(vkd3d_strdup(name), HLSL_CLASS_VECTOR, bt, x, y);
+                    type = hlsl_new_type(vkd3d_strdup(name), HLSL_CLASS_VECTOR, bt, x, y);
                     add_type_to_scope(scope, type);
                     hlsl_ctx.builtin_types.vector[bt][x - 1] = type;
 
                     if (x == 1)
                     {
                         sprintf(name, "%s", names[bt]);
-                        type = new_hlsl_type(vkd3d_strdup(name), HLSL_CLASS_SCALAR, bt, x, y);
+                        type = hlsl_new_type(vkd3d_strdup(name), HLSL_CLASS_SCALAR, bt, x, y);
                         add_type_to_scope(scope, type);
                         hlsl_ctx.builtin_types.scalar[bt] = type;
                     }
@@ -328,29 +328,29 @@ static void declare_predefined_types(struct hlsl_scope *scope)
 
     for (bt = 0; bt <= HLSL_SAMPLER_DIM_MAX; ++bt)
     {
-        type = new_hlsl_type(vkd3d_strdup(sampler_names[bt]), HLSL_CLASS_OBJECT, HLSL_TYPE_SAMPLER, 1, 1);
+        type = hlsl_new_type(vkd3d_strdup(sampler_names[bt]), HLSL_CLASS_OBJECT, HLSL_TYPE_SAMPLER, 1, 1);
         type->sampler_dim = bt;
         hlsl_ctx.builtin_types.sampler[bt] = type;
     }
 
-    hlsl_ctx.builtin_types.Void = new_hlsl_type(vkd3d_strdup("void"), HLSL_CLASS_OBJECT, HLSL_TYPE_VOID, 1, 1);
+    hlsl_ctx.builtin_types.Void = hlsl_new_type(vkd3d_strdup("void"), HLSL_CLASS_OBJECT, HLSL_TYPE_VOID, 1, 1);
 
     /* DX8 effects predefined types */
-    type = new_hlsl_type(vkd3d_strdup("DWORD"), HLSL_CLASS_SCALAR, HLSL_TYPE_INT, 1, 1);
+    type = hlsl_new_type(vkd3d_strdup("DWORD"), HLSL_CLASS_SCALAR, HLSL_TYPE_INT, 1, 1);
     add_type_to_scope(scope, type);
-    type = new_hlsl_type(vkd3d_strdup("FLOAT"), HLSL_CLASS_SCALAR, HLSL_TYPE_FLOAT, 1, 1);
+    type = hlsl_new_type(vkd3d_strdup("FLOAT"), HLSL_CLASS_SCALAR, HLSL_TYPE_FLOAT, 1, 1);
     add_type_to_scope(scope, type);
-    type = new_hlsl_type(vkd3d_strdup("VECTOR"), HLSL_CLASS_VECTOR, HLSL_TYPE_FLOAT, 4, 1);
+    type = hlsl_new_type(vkd3d_strdup("VECTOR"), HLSL_CLASS_VECTOR, HLSL_TYPE_FLOAT, 4, 1);
     add_type_to_scope(scope, type);
-    type = new_hlsl_type(vkd3d_strdup("MATRIX"), HLSL_CLASS_MATRIX, HLSL_TYPE_FLOAT, 4, 4);
+    type = hlsl_new_type(vkd3d_strdup("MATRIX"), HLSL_CLASS_MATRIX, HLSL_TYPE_FLOAT, 4, 4);
     add_type_to_scope(scope, type);
-    type = new_hlsl_type(vkd3d_strdup("STRING"), HLSL_CLASS_OBJECT, HLSL_TYPE_STRING, 1, 1);
+    type = hlsl_new_type(vkd3d_strdup("STRING"), HLSL_CLASS_OBJECT, HLSL_TYPE_STRING, 1, 1);
     add_type_to_scope(scope, type);
-    type = new_hlsl_type(vkd3d_strdup("TEXTURE"), HLSL_CLASS_OBJECT, HLSL_TYPE_TEXTURE, 1, 1);
+    type = hlsl_new_type(vkd3d_strdup("TEXTURE"), HLSL_CLASS_OBJECT, HLSL_TYPE_TEXTURE, 1, 1);
     add_type_to_scope(scope, type);
-    type = new_hlsl_type(vkd3d_strdup("PIXELSHADER"), HLSL_CLASS_OBJECT, HLSL_TYPE_PIXELSHADER, 1, 1);
+    type = hlsl_new_type(vkd3d_strdup("PIXELSHADER"), HLSL_CLASS_OBJECT, HLSL_TYPE_PIXELSHADER, 1, 1);
     add_type_to_scope(scope, type);
-    type = new_hlsl_type(vkd3d_strdup("VERTEXSHADER"), HLSL_CLASS_OBJECT, HLSL_TYPE_VERTEXSHADER, 1, 1);
+    type = hlsl_new_type(vkd3d_strdup("VERTEXSHADER"), HLSL_CLASS_OBJECT, HLSL_TYPE_VERTEXSHADER, 1, 1);
     add_type_to_scope(scope, type);
 }
 
@@ -365,11 +365,11 @@ static BOOL append_conditional_break(struct list *cond_list)
         return TRUE;
 
     condition = node_from_list(cond_list);
-    if (!(not = new_unary_expr(HLSL_IR_UNOP_LOGIC_NOT, condition, condition->loc)))
+    if (!(not = hlsl_new_unary_expr(HLSL_IR_UNOP_LOGIC_NOT, condition, condition->loc)))
         return FALSE;
     list_add_tail(cond_list, &not->entry);
 
-    if (!(iff = new_if(not, condition->loc)))
+    if (!(iff = hlsl_new_if(not, condition->loc)))
         return FALSE;
     list_add_tail(cond_list, &iff->node.entry);
 
@@ -431,10 +431,10 @@ oom:
     vkd3d_free(loop);
     vkd3d_free(cond_jump);
     vkd3d_free(list);
-    free_instr_list(init);
-    free_instr_list(cond);
-    free_instr_list(iter);
-    free_instr_list(body);
+    hlsl_free_instr_list(init);
+    hlsl_free_instr_list(cond);
+    hlsl_free_instr_list(iter);
+    hlsl_free_instr_list(body);
     return NULL;
 }
 
@@ -444,7 +444,7 @@ static unsigned int initializer_size(const struct parse_initializer *initializer
 
     for (i = 0; i < initializer->args_count; ++i)
     {
-        count += components_count_type(initializer->args[i]->data_type);
+        count += hlsl_type_component_count(initializer->args[i]->data_type);
     }
     TRACE("Initializer size = %u.\n", count);
     return count;
@@ -452,7 +452,7 @@ static unsigned int initializer_size(const struct parse_initializer *initializer
 
 static void free_parse_initializer(struct parse_initializer *initializer)
 {
-    free_instr_list(initializer->instrs);
+    hlsl_free_instr_list(initializer->instrs);
     vkd3d_free(initializer->args);
 }
 
@@ -499,7 +499,7 @@ static struct hlsl_ir_swizzle *get_swizzle(struct hlsl_ir_node *value, const cha
             swiz |= (y << 4 | x) << component * 8;
             component++;
         }
-        return new_swizzle(swiz, component, value, loc);
+        return hlsl_new_swizzle(swiz, component, value, loc);
     }
 
     /* Vector swizzle */
@@ -532,7 +532,7 @@ static struct hlsl_ir_swizzle *get_swizzle(struct hlsl_ir_node *value, const cha
             component++;
         }
         if (valid)
-            return new_swizzle(swiz, component, value, loc);
+            return hlsl_new_swizzle(swiz, component, value, loc);
     }
 
     return NULL;
@@ -551,11 +551,11 @@ static struct hlsl_ir_jump *add_return(struct list *instrs,
         if (!(return_value = add_implicit_conversion(instrs, return_value, return_type, &loc)))
             return NULL;
 
-        if (!(assignment = new_simple_assignment(hlsl_ctx.cur_function->return_var, return_value)))
+        if (!(assignment = hlsl_new_simple_assignment(hlsl_ctx.cur_function->return_var, return_value)))
             return NULL;
         list_add_after(&return_value->entry, &assignment->node.entry);
     }
-    else if (!type_is_void(return_type))
+    else if (!hlsl_type_is_void(return_type))
     {
         hlsl_report_message(loc, HLSL_LEVEL_ERROR, "non-void function must return a value");
         return NULL;
@@ -579,12 +579,12 @@ static struct hlsl_ir_load *add_load(struct list *instrs, struct hlsl_ir_node *v
 
     if (var_node->type == HLSL_IR_LOAD)
     {
-        const struct hlsl_deref *src = &load_from_node(var_node)->src;
+        const struct hlsl_deref *src = &hlsl_ir_load(var_node)->src;
 
         var = src->var;
         if (src->offset.node)
         {
-            if (!(add = new_binary_expr(HLSL_IR_BINOP_ADD, src->offset.node, offset)))
+            if (!(add = hlsl_new_binary_expr(HLSL_IR_BINOP_ADD, src->offset.node, offset)))
                 return NULL;
             list_add_tail(instrs, &add->entry);
             offset = add;
@@ -596,12 +596,12 @@ static struct hlsl_ir_load *add_load(struct list *instrs, struct hlsl_ir_node *v
         char name[27];
 
         sprintf(name, "<deref-%p>", var_node);
-        if (!(var = new_synthetic_var(name, var_node->data_type, var_node->loc)))
+        if (!(var = hlsl_new_synthetic_var(name, var_node->data_type, var_node->loc)))
             return NULL;
 
-        TRACE("Synthesized variable %p for %s node.\n", var, debug_node_type(var_node->type));
+        TRACE("Synthesized variable %p for %s node.\n", var, hlsl_node_type_to_string(var_node->type));
 
-        if (!(assign = new_simple_assignment(var, var_node)))
+        if (!(assign = hlsl_new_simple_assignment(var, var_node)))
             return NULL;
 
         list_add_tail(instrs, &assign->node.entry);
@@ -621,7 +621,7 @@ static struct hlsl_ir_load *add_record_load(struct list *instrs, struct hlsl_ir_
 {
     struct hlsl_ir_constant *c;
 
-    if (!(c = new_uint_constant(field->reg_offset * 4, loc)))
+    if (!(c = hlsl_new_uint_constant(field->reg_offset * 4, loc)))
         return NULL;
     list_add_tail(instrs, &c->node.entry);
 
@@ -657,10 +657,10 @@ static struct hlsl_ir_load *add_array_load(struct list *instrs, struct hlsl_ir_n
         return NULL;
     }
 
-    if (!(c = new_uint_constant(data_type->reg_size * 4, loc)))
+    if (!(c = hlsl_new_uint_constant(data_type->reg_size * 4, loc)))
         return NULL;
     list_add_tail(instrs, &c->node.entry);
-    if (!(mul = new_binary_expr(HLSL_IR_BINOP_MUL, index, &c->node)))
+    if (!(mul = hlsl_new_binary_expr(HLSL_IR_BINOP_MUL, index, &c->node)))
         return NULL;
     list_add_tail(instrs, &mul->entry);
     index = mul;
@@ -681,7 +681,7 @@ static BOOL add_struct_field(struct list *fields, struct hlsl_struct_field *fiel
     return TRUE;
 }
 
-BOOL is_row_major(const struct hlsl_type *type)
+BOOL hlsl_type_is_row_major(const struct hlsl_type *type)
 {
     /* Default to column-major if the majority isn't explicitly set, which can
      * happen for anonymous nodes. */
@@ -713,14 +713,14 @@ static struct hlsl_type *apply_type_modifiers(struct hlsl_type *type,
     if (!default_majority && !(*modifiers & HLSL_TYPE_MODIFIERS_MASK))
         return type;
 
-    if (!(new_type = clone_hlsl_type(type, default_majority)))
+    if (!(new_type = hlsl_type_clone(type, default_majority)))
         return NULL;
 
     new_type->modifiers = add_modifiers(new_type->modifiers, *modifiers, loc);
     *modifiers &= ~HLSL_TYPE_MODIFIERS_MASK;
 
     if (new_type->type == HLSL_CLASS_MATRIX)
-        new_type->reg_size = is_row_major(new_type) ? new_type->dimy : new_type->dimx;
+        new_type->reg_size = hlsl_type_is_row_major(new_type) ? new_type->dimy : new_type->dimx;
     return new_type;
 }
 
@@ -745,7 +745,7 @@ static struct list *gen_struct_fields(struct hlsl_type *type, DWORD modifiers, s
             return list;
         }
         if (v->array_size)
-            field->type = new_array_type(type, v->array_size);
+            field->type = hlsl_new_array_type(type, v->array_size);
         else
             field->type = type;
         field->name = v->name;
@@ -772,9 +772,9 @@ static BOOL add_typedef(DWORD modifiers, struct hlsl_type *orig_type, struct lis
     LIST_FOR_EACH_ENTRY_SAFE(v, v_next, list, struct parse_variable_def, entry)
     {
         if (v->array_size)
-            type = new_array_type(orig_type, v->array_size);
+            type = hlsl_new_array_type(orig_type, v->array_size);
         else
-            type = clone_hlsl_type(orig_type, 0);
+            type = hlsl_type_clone(orig_type, 0);
         if (!type)
             return FALSE;
         vkd3d_free((void *)type->name);
@@ -784,7 +784,7 @@ static BOOL add_typedef(DWORD modifiers, struct hlsl_type *orig_type, struct lis
         if (type->type != HLSL_CLASS_MATRIX)
             check_invalid_matrix_modifiers(type->modifiers, v->loc);
         else
-            type->reg_size = is_row_major(type) ? type->dimy : type->dimx;
+            type->reg_size = hlsl_type_is_row_major(type) ? type->dimy : type->dimx;
 
         if ((type->modifiers & HLSL_MODIFIER_COLUMN_MAJOR)
                 && (type->modifiers & HLSL_MODIFIER_ROW_MAJOR))
@@ -807,22 +807,22 @@ static BOOL add_func_parameter(struct list *list, struct parse_parameter *param,
     if (param->type->type == HLSL_CLASS_MATRIX)
         assert(param->type->modifiers & HLSL_MODIFIERS_MAJORITY_MASK);
 
-    if (!(var = new_var(param->name, param->type, loc, param->semantic, param->modifiers, param->reg_reservation)))
+    if (!(var = hlsl_new_var(param->name, param->type, loc, param->semantic, param->modifiers, param->reg_reservation)))
         return FALSE;
 
-    if (!add_declaration(hlsl_ctx.cur_scope, var, FALSE))
+    if (!hlsl_add_var(hlsl_ctx.cur_scope, var, FALSE))
     {
-        free_declaration(var);
+        hlsl_free_var(var);
         return FALSE;
     }
     list_add_tail(list, &var->param_entry);
     return TRUE;
 }
 
-static struct reg_reservation *parse_reg_reservation(const char *reg_string)
+static struct hlsl_reg_reservation *parse_reg_reservation(const char *reg_string)
 {
     enum vkd3d_shader_register_type type;
-    struct reg_reservation *reg_res;
+    struct hlsl_reg_reservation *reg_res;
     DWORD regnum = 0;
 
     switch (reg_string[0])
@@ -902,7 +902,7 @@ static struct list *make_list(struct hlsl_ir_node *node)
 
     if (!(list = vkd3d_malloc(sizeof(*list))))
     {
-        free_instr(node);
+        hlsl_free_instr(node);
         return NULL;
     }
     list_init(list);
@@ -919,7 +919,7 @@ static unsigned int evaluate_array_dimension(struct hlsl_ir_node *node)
     {
         case HLSL_IR_CONSTANT:
         {
-            struct hlsl_ir_constant *constant = constant_from_node(node);
+            struct hlsl_ir_constant *constant = hlsl_ir_constant(node);
 
             switch (constant->node.data_type->base_type)
             {
@@ -934,7 +934,7 @@ static unsigned int evaluate_array_dimension(struct hlsl_ir_node *node)
                 case HLSL_TYPE_BOOL:
                     return constant->value.b[0];
                 default:
-                    WARN("Invalid type %s.\n", debug_base_type(constant->node.data_type));
+                    WARN("Invalid type %s.\n", hlsl_base_type_to_string(constant->node.data_type));
                     return 0;
             }
         }
@@ -942,12 +942,12 @@ static unsigned int evaluate_array_dimension(struct hlsl_ir_node *node)
         case HLSL_IR_EXPR:
         case HLSL_IR_LOAD:
         case HLSL_IR_SWIZZLE:
-            FIXME("Unhandled type %s.\n", debug_node_type(node->type));
+            FIXME("Unhandled type %s.\n", hlsl_node_type_to_string(node->type));
             return 0;
 
         case HLSL_IR_ASSIGNMENT:
         default:
-            WARN("Invalid node type %s.\n", debug_node_type(node->type));
+            WARN("Invalid node type %s.\n", hlsl_node_type_to_string(node->type));
             return 0;
     }
 }
@@ -970,7 +970,7 @@ static BOOL expr_compatible_data_types(struct hlsl_type *t1, struct hlsl_type *t
            count or the matrix is nx1 or 1xn */
         if (t1->type == HLSL_CLASS_VECTOR || t2->type == HLSL_CLASS_VECTOR)
         {
-            if (components_count_type(t1) == components_count_type(t2))
+            if (hlsl_type_component_count(t1) == hlsl_type_component_count(t2))
                 return TRUE;
 
             return (t1->type == HLSL_CLASS_MATRIX && (t1->dimx == 1 || t1->dimy == 1))
@@ -1031,7 +1031,7 @@ static struct hlsl_type *expr_common_type(struct hlsl_type *t1, struct hlsl_type
         return NULL;
     }
 
-    if (compare_hlsl_types(t1, t2))
+    if (hlsl_type_compare(t1, t2))
         return t1;
 
     if (!expr_compatible_data_types(t1, t2))
@@ -1110,7 +1110,7 @@ static struct hlsl_type *expr_common_type(struct hlsl_type *t1, struct hlsl_type
         return hlsl_ctx.builtin_types.scalar[base];
     if (type == HLSL_CLASS_VECTOR)
         return hlsl_ctx.builtin_types.vector[base][dimx - 1];
-    return new_hlsl_type(NULL, type, base, dimx, dimy);
+    return hlsl_new_type(NULL, type, base, dimx, dimy);
 }
 
 static struct hlsl_ir_expr *add_expr(struct list *instrs, enum hlsl_ir_expr_op op,
@@ -1135,7 +1135,7 @@ static struct hlsl_ir_expr *add_expr(struct list *instrs, enum hlsl_ir_expr_op o
 
         if (!operands[i])
             break;
-        if (compare_hlsl_types(operands[i]->data_type, type))
+        if (hlsl_type_compare(operands[i]->data_type, type))
             continue;
         TRACE("Implicitly converting %s into %s in an expression.\n", debug_hlsl_type(operands[i]->data_type), debug_hlsl_type(type));
         if (operands[i]->data_type->dimx * operands[i]->data_type->dimy != 1
@@ -1144,7 +1144,7 @@ static struct hlsl_ir_expr *add_expr(struct list *instrs, enum hlsl_ir_expr_op o
             hlsl_report_message(operands[i]->loc, HLSL_LEVEL_WARNING, "implicit truncation of vector/matrix type");
         }
 
-        if (!(cast = new_cast(operands[i], type, &operands[i]->loc)))
+        if (!(cast = hlsl_new_cast(operands[i], type, &operands[i]->loc)))
             return NULL;
         list_add_after(&operands[i]->entry, &cast->node.entry);
         operands[i] = &cast->node;
@@ -1257,7 +1257,7 @@ static struct hlsl_ir_node *add_assignment(struct list *instrs, struct hlsl_ir_n
     {
         struct hlsl_ir_node *lhs_inner;
 
-        if (lhs->type == HLSL_IR_EXPR && expr_from_node(lhs)->op == HLSL_IR_UNOP_CAST)
+        if (lhs->type == HLSL_IR_EXPR && hlsl_ir_expr(lhs)->op == HLSL_IR_UNOP_CAST)
         {
             FIXME("Cast on the lhs.\n");
             vkd3d_free(assign);
@@ -1265,7 +1265,7 @@ static struct hlsl_ir_node *add_assignment(struct list *instrs, struct hlsl_ir_n
         }
         else if (lhs->type == HLSL_IR_SWIZZLE)
         {
-            struct hlsl_ir_swizzle *swizzle = swizzle_from_node(lhs);
+            struct hlsl_ir_swizzle *swizzle = hlsl_ir_swizzle(lhs);
             const struct hlsl_type *swizzle_type = swizzle->node.data_type;
             unsigned int width;
 
@@ -1301,15 +1301,15 @@ static struct hlsl_ir_node *add_assignment(struct list *instrs, struct hlsl_ir_n
 
     init_node(&assign->node, HLSL_IR_ASSIGNMENT, lhs_type, lhs->loc);
     assign->writemask = writemask;
-    assign->lhs.var = load_from_node(lhs)->src.var;
-    hlsl_src_from_node(&assign->lhs.offset, load_from_node(lhs)->src.offset.node);
+    assign->lhs.var = hlsl_ir_load(lhs)->src.var;
+    hlsl_src_from_node(&assign->lhs.offset, hlsl_ir_load(lhs)->src.offset.node);
     if (assign_op != ASSIGN_OP_ASSIGN)
     {
         enum hlsl_ir_expr_op op = op_from_assignment(assign_op);
         struct hlsl_ir_node *expr;
 
         TRACE("Adding an expression for the compound assignment.\n");
-        expr = new_binary_expr(op, lhs, rhs);
+        expr = hlsl_new_binary_expr(op, lhs, rhs);
         list_add_after(&rhs->entry, &expr->entry);
         rhs = expr;
     }
@@ -1326,7 +1326,7 @@ static void struct_var_initializer(struct list *list, struct hlsl_ir_var *var,
     struct hlsl_struct_field *field;
     unsigned int i = 0;
 
-    if (initializer_size(initializer) != components_count_type(type))
+    if (initializer_size(initializer) != hlsl_type_component_count(type))
     {
         hlsl_report_message(var->loc, HLSL_LEVEL_ERROR, "structure initializer mismatch");
         free_parse_initializer(initializer);
@@ -1345,13 +1345,13 @@ static void struct_var_initializer(struct list *list, struct hlsl_ir_var *var,
         if (i++ >= initializer->args_count)
             break;
 
-        if (components_count_type(field->type) == components_count_type(node->data_type))
+        if (hlsl_type_component_count(field->type) == hlsl_type_component_count(node->data_type))
         {
-            if (!(c = new_uint_constant(field->reg_offset * 4, node->loc)))
+            if (!(c = hlsl_new_uint_constant(field->reg_offset * 4, node->loc)))
                 break;
             list_add_tail(list, &c->node.entry);
 
-            if (!(assign = new_assignment(var, &c->node, node, 0, node->loc)))
+            if (!(assign = hlsl_new_assignment(var, &c->node, node, 0, node->loc)))
                 break;
             list_add_tail(list, &assign->node.entry);
         }
@@ -1397,11 +1397,11 @@ static struct list *declare_vars(struct hlsl_type *basic_type, DWORD modifiers,
     LIST_FOR_EACH_ENTRY_SAFE(v, v_next, var_list, struct parse_variable_def, entry)
     {
         if (v->array_size)
-            type = new_array_type(basic_type, v->array_size);
+            type = hlsl_new_array_type(basic_type, v->array_size);
         else
             type = basic_type;
 
-        if (!(var = new_var(v->name, type, v->loc, v->semantic, modifiers, v->reg_reservation)))
+        if (!(var = hlsl_new_var(v->name, type, v->loc, v->semantic, modifiers, v->reg_reservation)))
         {
             free_parse_variable_def(v);
             continue;
@@ -1417,7 +1417,7 @@ static struct list *declare_vars(struct hlsl_type *basic_type, DWORD modifiers,
         if (type->modifiers & HLSL_MODIFIER_CONST && !(var->modifiers & HLSL_STORAGE_UNIFORM) && !v->initializer.args_count)
         {
             hlsl_report_message(v->loc, HLSL_LEVEL_ERROR, "const variable without initializer");
-            free_declaration(var);
+            hlsl_free_var(var);
             vkd3d_free(v);
             continue;
         }
@@ -1425,7 +1425,7 @@ static struct list *declare_vars(struct hlsl_type *basic_type, DWORD modifiers,
         ret = declare_variable(var, local);
         if (!ret)
         {
-            free_declaration(var);
+            hlsl_free_var(var);
             vkd3d_free(v);
             continue;
         }
@@ -1450,7 +1450,7 @@ static struct list *declare_vars(struct hlsl_type *basic_type, DWORD modifiers,
                 }
             }
             if ((type->type == HLSL_CLASS_STRUCT || type->type == HLSL_CLASS_ARRAY)
-                    && components_count_type(type) != size)
+                    && hlsl_type_component_count(type) != size)
             {
                 hlsl_report_message(v->loc, HLSL_LEVEL_ERROR,
                         "'%s' initializer does not match", v->name);
@@ -1487,7 +1487,7 @@ static struct list *declare_vars(struct hlsl_type *basic_type, DWORD modifiers,
                 continue;
             }
 
-            load = new_var_load(var, var->loc);
+            load = hlsl_new_var_load(var, var->loc);
             list_add_tail(v->initializer.instrs, &load->node.entry);
             add_assignment(v->initializer.instrs, &load->node, ASSIGN_OP_ASSIGN, v->initializer.args[0]);
             vkd3d_free(v->initializer.args);
@@ -1528,7 +1528,7 @@ static struct list *declare_vars(struct hlsl_type *basic_type, DWORD modifiers,
     struct parse_if_body if_body;
     enum parse_unary_op unary_op;
     enum parse_assign_op assign_op;
-    struct reg_reservation *reg_reservation;
+    struct hlsl_reg_reservation *reg_reservation;
     struct parse_colon_attribute colon_attribute;
 }
 
@@ -1732,7 +1732,7 @@ hlsl_prog:
                             "redefinition of function %s", debugstr_a($2.name));
                     YYABORT;
                 }
-                else if (!compare_hlsl_types(decl->return_type, $2.decl->return_type))
+                else if (!hlsl_type_compare(decl->return_type, $2.decl->return_type))
                 {
                     hlsl_report_message($2.decl->loc, HLSL_LEVEL_ERROR,
                             "redefining function %s with a different return type",
@@ -1744,14 +1744,14 @@ hlsl_prog:
                 }
             }
 
-            if (type_is_void($2.decl->return_type) && $2.decl->semantic)
+            if (hlsl_type_is_void($2.decl->return_type) && $2.decl->semantic)
             {
                 hlsl_report_message($2.decl->loc, HLSL_LEVEL_ERROR,
                         "void function with a semantic");
             }
 
             TRACE("Adding function '%s' to the function list.\n", $2.name);
-            add_function_decl(&hlsl_ctx.functions, $2.name, $2.decl, FALSE);
+            hlsl_add_function(&hlsl_ctx.functions, $2.name, $2.decl, FALSE);
         }
     | hlsl_prog declaration_statement
         {
@@ -1759,7 +1759,7 @@ hlsl_prog:
 
             if (!list_empty($2))
                 FIXME("Uniform initializer.\n");
-            free_instr_list($2);
+            hlsl_free_instr_list($2);
         }
     | hlsl_prog preproc_directive
     | hlsl_prog ';'
@@ -1825,9 +1825,9 @@ named_struct_spec:
             BOOL ret;
 
             TRACE("Structure %s declaration.\n", debugstr_a($2));
-            $$ = new_struct_type($2, $4);
+            $$ = hlsl_new_struct_type($2, $4);
 
-            if (get_variable(hlsl_ctx.cur_scope, $2))
+            if (hlsl_get_var(hlsl_ctx.cur_scope, $2))
             {
                 hlsl_report_message(get_location(&@2), HLSL_LEVEL_ERROR, "redefinition of '%s'", $2);
                 YYABORT;
@@ -1845,7 +1845,7 @@ unnamed_struct_spec:
       KW_STRUCT '{' fields_list '}'
         {
             TRACE("Anonymous structure declaration.\n");
-            $$ = new_struct_type(NULL, $3);
+            $$ = hlsl_new_struct_type(NULL, $3);
         }
 
 any_identifier:
@@ -1899,13 +1899,13 @@ func_declaration:
             TRACE("Function %s parsed.\n", $1.name);
             $$ = $1;
             $$.decl->body = $2;
-            pop_scope(&hlsl_ctx);
+            hlsl_pop_scope(&hlsl_ctx);
         }
     | func_prototype ';'
         {
             TRACE("Function prototype for %s.\n", $1.name);
             $$ = $1;
-            pop_scope(&hlsl_ctx);
+            hlsl_pop_scope(&hlsl_ctx);
         }
 
 func_prototype:
@@ -1918,12 +1918,12 @@ func_prototype:
                         "unexpected modifiers on a function");
                 YYABORT;
             }
-            if (get_variable(hlsl_ctx.globals, $3))
+            if (hlsl_get_var(hlsl_ctx.globals, $3))
             {
                 hlsl_report_message(get_location(&@3), HLSL_LEVEL_ERROR, "redefinition of '%s'\n", $3);
                 YYABORT;
             }
-            if (type_is_void($2) && $7.semantic)
+            if (hlsl_type_is_void($2) && $7.semantic)
             {
                 hlsl_report_message(get_location(&@7), HLSL_LEVEL_ERROR, "void function with a semantic");
             }
@@ -1933,7 +1933,7 @@ func_prototype:
                 FIXME("Unexpected register reservation for a function.\n");
                 vkd3d_free($7.reg_reservation);
             }
-            if (!($$.decl = new_func_decl($2, $5, $7.semantic, get_location(&@3))))
+            if (!($$.decl = hlsl_new_func_decl($2, $5, $7.semantic, get_location(&@3))))
                 YYABORT;
             $$.name = $3;
             hlsl_ctx.cur_function = $$.decl;
@@ -1947,14 +1947,14 @@ compound_statement:
         }
     | '{' scope_start statement_list '}'
         {
-            pop_scope(&hlsl_ctx);
+            hlsl_pop_scope(&hlsl_ctx);
             $$ = $3;
         }
 
 scope_start:
       /* empty */
         {
-            push_scope(&hlsl_ctx);
+            hlsl_push_scope(&hlsl_ctx);
         }
 
 var_identifier:
@@ -2100,7 +2100,7 @@ type:
                 YYABORT;
             }
 
-            $$ = new_hlsl_type(NULL, HLSL_CLASS_VECTOR, $3->base_type, $5, 1);
+            $$ = hlsl_new_type(NULL, HLSL_CLASS_VECTOR, $3->base_type, $5, 1);
         }
     | KW_MATRIX '<' base_type ',' C_INTEGER ',' C_INTEGER '>'
         {
@@ -2123,7 +2123,7 @@ type:
                 YYABORT;
             }
 
-            $$ = new_hlsl_type(NULL, HLSL_CLASS_MATRIX, $3->base_type, $7, $5);
+            $$ = hlsl_new_type(NULL, HLSL_CLASS_MATRIX, $3->base_type, $7, $5);
         }
 
 base_type:
@@ -2153,12 +2153,12 @@ base_type:
         }
     | TYPE_IDENTIFIER
         {
-            $$ = get_type(hlsl_ctx.cur_scope, $1, TRUE);
+            $$ = hlsl_get_type(hlsl_ctx.cur_scope, $1, TRUE);
             vkd3d_free($1);
         }
     | KW_STRUCT TYPE_IDENTIFIER
         {
-            $$ = get_type(hlsl_ctx.cur_scope, $2, TRUE);
+            $$ = hlsl_get_type(hlsl_ctx.cur_scope, $2, TRUE);
             if ($$->type != HLSL_CLASS_STRUCT)
                 hlsl_report_message(get_location(&@1), HLSL_LEVEL_ERROR, "'%s' redefined as a structure\n", $2);
             vkd3d_free($2);
@@ -2278,7 +2278,7 @@ array:
         {
             unsigned int size = evaluate_array_dimension(node_from_list($2));
 
-            free_instr_list($2);
+            hlsl_free_instr_list($2);
 
             if (!size)
             {
@@ -2436,7 +2436,7 @@ selection_statement:
             struct hlsl_ir_node *condition = node_from_list($3);
             struct hlsl_ir_if *instr;
 
-            if (!(instr = new_if(condition, get_location(&@1))))
+            if (!(instr = hlsl_new_if(condition, get_location(&@1))))
                 YYABORT;
             list_move_tail(&instr->then_instrs, $5.then_instrs);
             list_move_tail(&instr->else_instrs, $5.else_instrs);
@@ -2473,7 +2473,7 @@ loop_statement:
     | KW_FOR '(' scope_start expr_statement expr_statement expr ')' statement
         {
             $$ = create_loop(LOOP_FOR, $4, $5, $6, $8, get_location(&@1));
-            pop_scope(&hlsl_ctx);
+            hlsl_pop_scope(&hlsl_ctx);
         }
     | KW_FOR '(' scope_start declaration expr_statement expr ')' statement
         {
@@ -2481,7 +2481,7 @@ loop_statement:
                 hlsl_report_message(get_location(&@4), HLSL_LEVEL_WARNING,
                         "no expressions in for loop initializer");
             $$ = create_loop(LOOP_FOR, $4, $5, $6, $8, get_location(&@1));
-            pop_scope(&hlsl_ctx);
+            hlsl_pop_scope(&hlsl_ctx);
         }
 
 expr_statement:
@@ -2534,12 +2534,12 @@ primary_expr:
             struct hlsl_ir_load *load;
             struct hlsl_ir_var *var;
 
-            if (!(var = get_variable(hlsl_ctx.cur_scope, $1)))
+            if (!(var = hlsl_get_var(hlsl_ctx.cur_scope, $1)))
             {
                 hlsl_report_message(get_location(&@1), HLSL_LEVEL_ERROR, "variable '%s' is not declared\n", $1);
                 YYABORT;
             }
-            if ((load = new_var_load(var, get_location(&@1))))
+            if ((load = hlsl_new_var_load(var, get_location(&@1))))
             {
                 if (!($$ = make_list(&load->node)))
                     YYABORT;
@@ -2565,9 +2565,9 @@ postfix_expr:
                 hlsl_report_message(loc, HLSL_LEVEL_ERROR, "modifying a const expression");
                 YYABORT;
             }
-            inc = new_unary_expr(HLSL_IR_UNOP_POSTINC, node_from_list($1), loc);
+            inc = hlsl_new_unary_expr(HLSL_IR_UNOP_POSTINC, node_from_list($1), loc);
             /* Post increment/decrement expressions are considered const */
-            inc->data_type = clone_hlsl_type(inc->data_type, 0);
+            inc->data_type = hlsl_type_clone(inc->data_type, 0);
             inc->data_type->modifiers |= HLSL_MODIFIER_CONST;
             $$ = append_unop($1, inc);
         }
@@ -2582,9 +2582,9 @@ postfix_expr:
                 hlsl_report_message(loc, HLSL_LEVEL_ERROR, "modifying a const expression");
                 YYABORT;
             }
-            inc = new_unary_expr(HLSL_IR_UNOP_POSTDEC, node_from_list($1), loc);
+            inc = hlsl_new_unary_expr(HLSL_IR_UNOP_POSTDEC, node_from_list($1), loc);
             /* Post increment/decrement expressions are considered const */
-            inc->data_type = clone_hlsl_type(inc->data_type, 0);
+            inc->data_type = hlsl_type_clone(inc->data_type, 0);
             inc->data_type->modifiers |= HLSL_MODIFIER_CONST;
             $$ = append_unop($1, inc);
         }
@@ -2644,13 +2644,13 @@ postfix_expr:
             if (index->data_type->type != HLSL_CLASS_SCALAR)
             {
                 hlsl_report_message(get_location(&@3), HLSL_LEVEL_ERROR, "array index is not scalar");
-                free_instr_list($1);
+                hlsl_free_instr_list($1);
                 YYABORT;
             }
 
             if (!add_array_load($1, array, index, get_location(&@2)))
             {
-                free_instr_list($1);
+                hlsl_free_instr_list($1);
                 YYABORT;
             }
             $$ = $1;
@@ -2690,7 +2690,7 @@ postfix_expr:
                 FIXME("Matrix constructors are not supported yet.\n");
 
             sprintf(name, "<constructor-%x>", counter++);
-            if (!(var = new_synthetic_var(name, $2, get_location(&@2))))
+            if (!(var = hlsl_new_synthetic_var(name, $2, get_location(&@2))))
                 YYABORT;
             for (i = 0; i < $4.args_count; ++i)
             {
@@ -2702,7 +2702,7 @@ postfix_expr:
                     hlsl_report_message(arg->loc, HLSL_LEVEL_ERROR, "invalid constructor argument");
                     continue;
                 }
-                width = components_count_type(arg->data_type);
+                width = hlsl_type_component_count(arg->data_type);
 
                 if (width > 4)
                 {
@@ -2714,14 +2714,14 @@ postfix_expr:
                         hlsl_ctx.builtin_types.vector[$2->base_type][width - 1], &arg->loc)))
                     continue;
 
-                if (!(assignment = new_assignment(var, NULL, arg,
+                if (!(assignment = hlsl_new_assignment(var, NULL, arg,
                         ((1 << width) - 1) << writemask_offset, arg->loc)))
                     YYABORT;
                 writemask_offset += width;
                 list_add_tail($4.instrs, &assignment->node.entry);
             }
             vkd3d_free($4.args);
-            if (!(load = new_var_load(var, get_location(&@2))))
+            if (!(load = hlsl_new_var_load(var, get_location(&@2))))
                 YYABORT;
             $$ = append_unop($4.instrs, &load->node);
         }
@@ -2738,7 +2738,7 @@ unary_expr:
                 hlsl_report_message(loc, HLSL_LEVEL_ERROR, "modifying a const expression");
                 YYABORT;
             }
-            $$ = append_unop($2, new_unary_expr(HLSL_IR_UNOP_PREINC, node_from_list($2), loc));
+            $$ = append_unop($2, hlsl_new_unary_expr(HLSL_IR_UNOP_PREINC, node_from_list($2), loc));
         }
     | OP_DEC unary_expr
         {
@@ -2750,7 +2750,7 @@ unary_expr:
                 hlsl_report_message(loc, HLSL_LEVEL_ERROR, "modifying a const expression");
                 YYABORT;
             }
-            $$ = append_unop($2, new_unary_expr(HLSL_IR_UNOP_PREDEC, node_from_list($2), loc));
+            $$ = append_unop($2, hlsl_new_unary_expr(HLSL_IR_UNOP_PREDEC, node_from_list($2), loc));
         }
     | unary_op unary_expr
         {
@@ -2760,7 +2760,7 @@ unary_expr:
             if ($1 == UNARY_OP_PLUS)
                 $$ = $2;
             else
-                $$ = append_unop($2, new_unary_expr(ops[$1], node_from_list($2), get_location(&@1)));
+                $$ = append_unop($2, hlsl_new_unary_expr(ops[$1], node_from_list($2), get_location(&@1)));
         }
 
     /* var_modifiers is necessary to avoid shift/reduce conflicts. */
@@ -2778,7 +2778,7 @@ unary_expr:
             }
 
             if ($4)
-                dst_type = new_array_type($3, $4);
+                dst_type = hlsl_new_array_type($3, $4);
             else
                 dst_type = $3;
 
@@ -2789,7 +2789,7 @@ unary_expr:
                 YYABORT;
             }
 
-            $$ = append_unop($6, &new_cast(node_from_list($6), dst_type, &loc)->node);
+            $$ = append_unop($6, &hlsl_new_cast(node_from_list($6), dst_type, &loc)->node);
         }
 
 unary_op:
@@ -3011,7 +3011,7 @@ static void dump_function_decl(struct rb_entry *entry, void *context)
     struct hlsl_ir_function_decl *func = RB_ENTRY_VALUE(entry, struct hlsl_ir_function_decl, entry);
 
     if (func->body)
-        debug_dump_ir_function_decl(func);
+        hlsl_dump_function(func);
 }
 
 static void dump_function(struct rb_entry *entry, void *context)
@@ -3032,14 +3032,14 @@ static unsigned int index_instructions(struct list *instrs, unsigned int index)
 
         if (instr->type == HLSL_IR_IF)
         {
-            struct hlsl_ir_if *iff = if_from_node(instr);
+            struct hlsl_ir_if *iff = hlsl_ir_if(instr);
             index = index_instructions(&iff->then_instrs, index);
             index = index_instructions(&iff->else_instrs, index);
         }
         else if (instr->type == HLSL_IR_LOOP)
         {
-            index = index_instructions(&loop_from_node(instr)->body, index);
-            loop_from_node(instr)->next_index = index;
+            index = index_instructions(&hlsl_ir_loop(instr)->body, index);
+            hlsl_ir_loop(instr)->next_index = index;
         }
     }
 
@@ -3062,7 +3062,7 @@ static void compute_liveness_recurse(struct list *instrs, unsigned int loop_firs
         {
         case HLSL_IR_ASSIGNMENT:
         {
-            struct hlsl_ir_assignment *assignment = assignment_from_node(instr);
+            struct hlsl_ir_assignment *assignment = hlsl_ir_assignment(instr);
 
             var = assignment->lhs.var;
             if (!var->first_write)
@@ -3074,7 +3074,7 @@ static void compute_liveness_recurse(struct list *instrs, unsigned int loop_firs
         }
         case HLSL_IR_EXPR:
         {
-            struct hlsl_ir_expr *expr = expr_from_node(instr);
+            struct hlsl_ir_expr *expr = hlsl_ir_expr(instr);
             unsigned int i;
 
             for (i = 0; i < ARRAY_SIZE(expr->operands) && expr->operands[i].node; ++i)
@@ -3083,7 +3083,7 @@ static void compute_liveness_recurse(struct list *instrs, unsigned int loop_firs
         }
         case HLSL_IR_IF:
         {
-            struct hlsl_ir_if *iff = if_from_node(instr);
+            struct hlsl_ir_if *iff = hlsl_ir_if(instr);
 
             compute_liveness_recurse(&iff->then_instrs, loop_first, loop_last);
             compute_liveness_recurse(&iff->else_instrs, loop_first, loop_last);
@@ -3092,7 +3092,7 @@ static void compute_liveness_recurse(struct list *instrs, unsigned int loop_firs
         }
         case HLSL_IR_LOAD:
         {
-            struct hlsl_ir_load *load = load_from_node(instr);
+            struct hlsl_ir_load *load = hlsl_ir_load(instr);
 
             var = load->src.var;
             var->last_read = loop_last ? max(instr->index, loop_last) : instr->index;
@@ -3102,7 +3102,7 @@ static void compute_liveness_recurse(struct list *instrs, unsigned int loop_firs
         }
         case HLSL_IR_LOOP:
         {
-            struct hlsl_ir_loop *loop = loop_from_node(instr);
+            struct hlsl_ir_loop *loop = hlsl_ir_loop(instr);
 
             compute_liveness_recurse(&loop->body, loop_first ? loop_first : instr->index,
                     loop_last ? loop_last : loop->next_index);
@@ -3110,7 +3110,7 @@ static void compute_liveness_recurse(struct list *instrs, unsigned int loop_firs
         }
         case HLSL_IR_SWIZZLE:
         {
-            struct hlsl_ir_swizzle *swizzle = swizzle_from_node(instr);
+            struct hlsl_ir_swizzle *swizzle = hlsl_ir_swizzle(instr);
 
             swizzle->val.node->last_read = instr->index;
             break;
@@ -3170,7 +3170,7 @@ int hlsl_parser_compile(enum vkd3d_shader_type type, DWORD major, DWORD minor, c
     init_functions_tree(&hlsl_ctx.functions);
     list_init(&hlsl_ctx.static_initializers);
 
-    push_scope(&hlsl_ctx);
+    hlsl_push_scope(&hlsl_ctx);
     hlsl_ctx.globals = hlsl_ctx.cur_scope;
     declare_predefined_types(hlsl_ctx.globals);
 
@@ -3185,7 +3185,7 @@ int hlsl_parser_compile(enum vkd3d_shader_type type, DWORD major, DWORD minor, c
         goto out;
     }
 
-    if (!type_is_void(entry_func->return_type)
+    if (!hlsl_type_is_void(entry_func->return_type)
             && entry_func->return_type->type != HLSL_CLASS_STRUCT && !entry_func->semantic)
     {
         hlsl_report_message(entry_func->loc, HLSL_LEVEL_ERROR,
@@ -3214,20 +3214,20 @@ out:
     vkd3d_free(hlsl_ctx.source_files);
 
     TRACE("Freeing functions IR.\n");
-    rb_destroy(&hlsl_ctx.functions, free_function_rb, NULL);
+    rb_destroy(&hlsl_ctx.functions, hlsl_free_function_rb, NULL);
 
     TRACE("Freeing variables.\n");
     LIST_FOR_EACH_ENTRY_SAFE(scope, next_scope, &hlsl_ctx.scopes, struct hlsl_scope, entry)
     {
         LIST_FOR_EACH_ENTRY_SAFE(var, next_var, &scope->vars, struct hlsl_ir_var, scope_entry)
-            free_declaration(var);
+            hlsl_free_var(var);
         rb_destroy(&scope->types, NULL, NULL);
         vkd3d_free(scope);
     }
 
     TRACE("Freeing types.\n");
     LIST_FOR_EACH_ENTRY_SAFE(hlsl_type, next_type, &hlsl_ctx.types, struct hlsl_type, entry)
-        free_hlsl_type(hlsl_type);
+        hlsl_free_type(hlsl_type);
 
     return ret;
 }
-- 
2.30.0




More information about the wine-devel mailing list