vala r1708 - in trunk: . vala

[juergbi svn gnome org]

Author: juergbi
Date: Thu Jul 17 08:45:35 2008
New Revision: 1708
URL: http://svn.gnome.org/viewvc/vala?rev=1708&view=rev

Log:
2008-07-17  JÃrg Billeter  <j bitron ch>

	* vala/valaparser.vala:
	* vala/valascanner.vala:
	* vala/valatokentype.vala:

	Add parser support for internal symbol accessibility


Modified:
   trunk/ChangeLog
   trunk/vala/valaparser.vala
   trunk/vala/valascanner.vala
   trunk/vala/valatokentype.vala

Modified: trunk/vala/valaparser.vala
==============================================================================
--- trunk/vala/valaparser.vala	(original)
+++ trunk/vala/valaparser.vala	Thu Jul 17 08:45:35 2008
@@ -199,6 +199,7 @@
 		case TokenType.IN:
 		case TokenType.INLINE:
 		case TokenType.INTERFACE:
+		case TokenType.INTERNAL:
 		case TokenType.IS:
 		case TokenType.LOCK:
 		case TokenType.NAMESPACE:
@@ -1811,6 +1812,7 @@
 			case TokenType.EXTERN:
 			case TokenType.INLINE:
 			case TokenType.INTERFACE:
+			case TokenType.INTERNAL:
 			case TokenType.NAMESPACE:
 			case TokenType.OVERRIDE:
 			case TokenType.PRIVATE:
@@ -2573,6 +2575,9 @@
 		case TokenType.PROTECTED:
 			next ();
 			return SymbolAccessibility.PROTECTED;
+		case TokenType.INTERNAL:
+			next ();
+			return SymbolAccessibility.INTERNAL;
 		case TokenType.PUBLIC:
 			next ();
 			return SymbolAccessibility.PUBLIC;
@@ -2867,6 +2872,7 @@
 		case TokenType.EXTERN:
 		case TokenType.INLINE:
 		case TokenType.INTERFACE:
+		case TokenType.INTERNAL:
 		case TokenType.NAMESPACE:
 		case TokenType.OVERRIDE:
 		case TokenType.PRIVATE:

Modified: trunk/vala/valascanner.vala
==============================================================================
--- trunk/vala/valascanner.vala	(original)
+++ trunk/vala/valascanner.vala	Thu Jul 17 08:45:35 2008
@@ -279,6 +279,9 @@
 			case 'd':
 				if (matches (begin, "delegate")) return TokenType.DELEGATE;
 				break;
+			case 'i':
+				if (matches (begin, "internal")) return TokenType.INTERNAL;
+				break;
 			case 'o':
 				if (matches (begin, "override")) return TokenType.OVERRIDE;
 				break;

Modified: trunk/vala/valatokentype.vala
==============================================================================
--- trunk/vala/valatokentype.vala	(original)
+++ trunk/vala/valatokentype.vala	Thu Jul 17 08:45:35 2008
@@ -80,6 +80,7 @@
 	INLINE,
 	INTEGER_LITERAL,
 	INTERFACE,
+	INTERNAL,
 	INTERR,
 	IS,
 	LAMBDA,
@@ -195,6 +196,7 @@
 		case INLINE: return "`inline'";
 		case INTEGER_LITERAL: return "integer literal";
 		case INTERFACE: return "`interface'";
+		case INTERNAL: return "`internal'";
 		case INTERR: return "`?'";
 		case IS: return "`is'";
 		case LAMBDA: return "`=>'";