stage4/generate_cc/generate_cc_st.cc
changeset 62 7955adc445b8
parent 42 b45c7f34dec1
child 64 ab704568fa25
--- a/stage4/generate_cc/generate_cc_st.cc	Mon Sep 17 17:57:50 2007 +0200
+++ b/stage4/generate_cc/generate_cc_st.cc	Fri Sep 28 07:44:45 2007 +0200
@@ -142,6 +142,21 @@
   return NULL;
 }
 
+/********************************************/
+/* B.1.4.1   Directly Represented Variables */
+/********************************************/
+// direct_variable: direct_variable_token   {$$ = new direct_variable_c($1);};
+void *visit(direct_variable_c *symbol) {
+  TRACE("direct_variable_c");
+  /* Do not use print_token() as it will change everything into uppercase */
+  if (strlen(symbol->value) == 0) ERROR;
+  s4o.print("*(");
+  this->print_variable_prefix();
+  s4o.printlocation(symbol->value + 1);
+  s4o.print(")");
+  return NULL;
+}
+
 /***************************************/
 /* B.3 - Language ST (Structured Text) */
 /***************************************/