Changeset 37f527b in mainline for uspace/app/sbi/src/p_expr.c

Timestamp:

2010-03-26T21:55:23Z (14 years ago)

Author:

Jiri Svoboda <jiri@…>

Branches:

lfn, master, serial, ticket/834-toolchain-update, topic/msim-upgrade, topic/simplify-dev-export

Children:

4204ad9

Parents:

b535aeb

Message:

Update SBI to rev. 144.

File:

• uspace/app/sbi/src/p_expr.c (modified) (4 diffs)

uspace/app/sbi/src/p_expr.c

@@ -49 +49 @@
 static stree_expr_t *parse_pf_call(parse_t *parse, stree_expr_t *a);
 static stree_expr_t *parse_pf_index(parse_t *parse, stree_expr_t *a);
+static stree_expr_t *parse_pf_as(parse_t *parse, stree_expr_t *a);
 static stree_expr_t *parse_primitive(parse_t *parse);
 static stree_expr_t *parse_nameref(parse_t *parse);
@@ -206 +207 @@
 
         while (lcur_lc(parse) == lc_period || lcur_lc(parse) == lc_lparen ||
-            lcur_lc(parse) == lc_lsbr) {
+            lcur_lc(parse) == lc_lsbr || lcur_lc(parse) == lc_as) {
 
                 switch (lcur_lc(parse)) {
@@ -218 +219 @@
                         tmp = parse_pf_index(parse, a);
                         break;
+                case lc_as:
+                        tmp = parse_pf_as(parse, a);
+                        break;
                 default:
                         assert(b_false);
@@ -316 +320 @@
 }
 
+/** Parse @c as operator. */
+static stree_expr_t *parse_pf_as(parse_t *parse, stree_expr_t *a)
+{
+        stree_expr_t *expr;
+        stree_texpr_t *texpr;
+        stree_as_t *as_op;
+
+        lmatch(parse, lc_as);
+        texpr = parse_texpr(parse);
+
+        as_op = stree_as_new();
+        as_op->arg = a;
+        as_op->dtype = texpr;
+        expr = stree_expr_new(ec_as);
+        expr->u.as_op = as_op;
+
+        return expr;
+}
+
 /** Parse primitive expression. */
 static stree_expr_t *parse_primitive(parse_t *parse)