From: Kenneth Graunke <kenneth@whitecape.org>
Date: Wed, 26 May 2010 22:20:59 +0000 (-0700)
Subject: ir_reader: Read record_refs.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=13e1b6b725def5a22952ecd4e2e8b1e61cb3bcfa;p=mesa.git

ir_reader: Read record_refs.

Also changes the print visitor to not emit extraneous parenthesis.
---

diff --git a/ir_print_visitor.cpp b/ir_print_visitor.cpp
index e507a0ebf99..84edad5dfac 100644
--- a/ir_print_visitor.cpp
+++ b/ir_print_visitor.cpp
@@ -181,7 +181,7 @@ void ir_print_visitor::visit(ir_dereference_record *ir)
 {
    printf("(record_ref ");
    ir->record->accept(this);
-   printf("(%s)) ", ir->field);
+   printf(" %s) ", ir->field);
 }
 
 
diff --git a/ir_reader.cpp b/ir_reader.cpp
index 072842e83b7..f4b9967d449 100644
--- a/ir_reader.cpp
+++ b/ir_reader.cpp
@@ -862,6 +862,22 @@ read_array_ref(_mesa_glsl_parse_state *st, s_list *list)
 static ir_dereference *
 read_record_ref(_mesa_glsl_parse_state *st, s_list *list)
 {
-   ir_read_error(st, list, "FINISHME: record refs not yet supported.");
-   return NULL;
+   if (list->length() != 3) {
+      ir_read_error(st, list, "expected (record_ref <rvalue> <field>)");
+      return NULL;
+   }
+
+   s_expression *subj_expr = (s_expression*) list->subexpressions.head->next;
+   ir_rvalue *subject = read_rvalue(st, subj_expr);
+   if (subject == NULL) {
+      ir_read_error(st, NULL, "when reading the subject of a record_ref");
+      return NULL;
+   }
+
+   s_symbol *field = SX_AS_SYMBOL(subj_expr->next);
+   if (field == NULL) {
+      ir_read_error(st, list, "expected (record_ref ... <field name>)");
+      return NULL;
+   }
+   return new ir_dereference_record(subject, field->value());
 }