Changeset 8b655705 in mainline for uspace/app/sbi/src/parse.c

Timestamp:

2011-04-15T19:38:07Z (13 years ago)

Author:

Jakub Jermar <jakub@…>

Branches:

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

Children:

9dd730d1

Parents:

6b9e85b (diff), b2fb47f (diff)
Note: this is a merge changeset, the changes displayed below correspond to the merge itself.
Use the (diff) links above to see all the changes relative to each parent.

Message:

Merge mainline changes.

File:

• uspace/app/sbi/src/parse.c (modified) (8 diffs)

uspace/app/sbi/src/parse.c

@@ -1 +1 @@
 /*
- * Copyright (c) 2010 Jiri Svoboda
+ * Copyright (c) 2011 Jiri Svoboda
  * All rights reserved.
  *
@@ -82 +82 @@
 static stree_vdecl_t *parse_vdecl(parse_t *parse);
 static stree_if_t *parse_if(parse_t *parse);
+static stree_switch_t *parse_switch(parse_t *parse);
 static stree_while_t *parse_while(parse_t *parse);
 static stree_for_t *parse_for(parse_t *parse);
@@ -667 +668 @@
         stree_prop_t *prop;
         stree_symbol_t *symbol;
-        bool_t body_expected;
 
         stree_ident_t *ident;
@@ -720 +720 @@
         /* Parse attributes. */
         parse_symbol_attrs(parse, symbol);
-
-        body_expected = (outer_csi->cc != csi_interface);
 
         lmatch(parse, lc_is);
@@ -1070 +1068 @@
         stree_vdecl_t *vdecl_s;
         stree_if_t *if_s;
+        stree_switch_t *switch_s;
         stree_while_t *while_s;
         stree_for_t *for_s;
@@ -1092 +1091 @@
                 stat->u.if_s = if_s;
                 break;
+        case lc_switch:
+                switch_s = parse_switch(parse);
+                stat = stree_stat_new(st_switch);
+                stat->u.switch_s = switch_s;
+                break;
         case lc_while:
                 while_s = parse_while(parse);
@@ -1214 +1218 @@
         lmatch(parse, lc_end);
         return if_s;
+}
+
+/** Parse @c switch statement.
+ *
+ * @param parse         Parser object.
+ * @return              New syntax tree node.
+ */
+static stree_switch_t *parse_switch(parse_t *parse)
+{
+        stree_switch_t *switch_s;
+        stree_when_t *when_c;
+        stree_expr_t *expr;
+
+#ifdef DEBUG_PARSE_TRACE
+        printf("Parse 'switch' statement.\n");
+#endif
+        lmatch(parse, lc_switch);
+
+        switch_s = stree_switch_new();
+        list_init(&switch_s->when_clauses);
+
+        switch_s->expr = parse_expr(parse);
+        lmatch(parse, lc_is);
+
+        /* Parse @c when clauses. */
+        while (lcur_lc(parse) == lc_when) {
+                lskip(parse);
+                when_c = stree_when_new();
+                list_init(&when_c->exprs);
+                while (b_true) {
+                        expr = parse_expr(parse);
+                        list_append(&when_c->exprs, expr);
+                        if (lcur_lc(parse) != lc_comma)
+                                break;
+                        lskip(parse);
+                }
+
+                lmatch(parse, lc_do);
+                when_c->block = parse_block(parse);
+
+                list_append(&switch_s->when_clauses, when_c);
+        }
+
+        /* Parse @c else clause. */
+        if (lcur_lc(parse) == lc_else) {
+                lskip(parse);
+                lmatch(parse, lc_do);
+                switch_s->else_block = parse_block(parse);
+        } else {
+                switch_s->else_block = NULL;
+        }
+
+        lmatch(parse, lc_end);
+        return switch_s;
 }
 
@@ -1654 +1712 @@
         case lc_except:
         case lc_finally:
+        case lc_when:
                 return b_true;
         default: