Add class, public, private and protected keywords

oscar64/Declaration.h

@@ -79,6 +79,8 @@ static const uint64 DTF_ZEROPAGE		= (1ULL << 22);
 static const uint64 DTF_PREVENT_INLINE  = (1ULL << 23);
 static const uint64 DTF_STRIPED			= (1ULL << 24);
 static const uint64 DTF_DYNSTACK		= (1ULL << 25);
+static const uint64 DTF_PRIVATE			= (1ULL << 26);
+static const uint64 DTF_PROTECTED		= (1ULL << 27);
 
 static const uint64 DTF_FUNC_VARIABLE	= (1ULL << 32);
 static const uint64 DTF_FUNC_ASSEMBLER	= (1ULL << 33);

oscar64/Parser.cpp

@@ -127,9 +127,29 @@ Declaration* Parser::ParseStructDeclaration(uint64 flags, DecType dt)
 		mScanner->NextToken();
 		Declaration* mlast = nullptr;
 		for (;;)
+		{
+			if (ConsumeTokenIf(TK_PUBLIC))
+			{
+				flags &= ~(DTF_PRIVATE | DTF_PROTECTED);
+				ConsumeToken(TK_COLON);
+			}
+			else if (ConsumeTokenIf(TK_PROTECTED))
+			{
+				flags &= ~DTF_PRIVATE;
+				flags |= DTF_PROTECTED;
+				ConsumeToken(TK_COLON);
+			}
+			else if (ConsumeTokenIf(TK_PRIVATE))
+			{
+				flags |= DTF_PRIVATE | DTF_PROTECTED;
+				ConsumeToken(TK_COLON);
+			}
+			else
 			{
 				Declaration* mdec = ParseDeclaration(nullptr, false, false, pthis);
 
+				mdec->mFlags |= flags & (DTF_PRIVATE | DTF_PROTECTED);
+
 				mdec->mQualIdent = dec->mScope->Mangle(mdec->mIdent);
 
 				int	offset = dec->mSize;
@@ -197,6 +217,7 @@ Declaration* Parser::ParseStructDeclaration(uint64 flags, DecType dt)
 					break;
 				}
 			}
+		}
 
 		if (mlast)
 			mlast->mNext = nullptr;
@@ -470,6 +491,9 @@ Declaration* Parser::ParseBaseTypeDeclaration(uint64 flags)
 	case TK_STRUCT:
 		dec = ParseStructDeclaration(flags, DT_TYPE_STRUCT);
 		break;
+	case TK_CLASS:
+		dec = ParseStructDeclaration(flags | DTF_PRIVATE, DT_TYPE_STRUCT);
+		break;
 	case TK_UNION:
 		dec = ParseStructDeclaration(flags, DT_TYPE_UNION);
 		break;
@@ -3331,6 +3355,9 @@ Declaration* Parser::ParseDeclaration(Declaration * pdec, bool variable, bool ex
 
 				ndec->mValue = ParseFunction(ndec->mBase);
 
+				if (pthis)
+					ndec->mFlags |= DTF_REQUEST_INLINE;
+
 				ndec->mFlags |= DTF_DEFINED;
 				ndec->mNumVars = mLocalIndex;
 
@@ -3537,6 +3564,7 @@ Expression* Parser::ParseSimpleExpression(bool lhs)
 	case TK_CONST:
 	case TK_VOLATILE:
 	case TK_STRUCT:
+	case TK_CLASS:
 	case TK_UNION:
 	case TK_TYPEDEF:
 	case TK_STATIC:
@@ -3872,6 +3900,12 @@ Expression* Parser::ParseQualify(Expression* exp)
 
 			if (mdec)
 			{
+				if (mdec->mFlags & DTF_PROTECTED)
+				{ 
+					if (!mThisPointer || mThisPointer->mBase->IsConstSame(dtype))
+						mErrors->Error(mScanner->mLocation, EERR_OBJECT_NOT_FOUND, "Struct member identifier not visible", mScanner->mTokenIdent);
+				}
+
 				mScanner->NextToken();
 				if (mdec->mType == DT_ELEMENT)
 				{

oscar64/Scanner.cpp

@@ -153,7 +153,11 @@ const char* TokenNames[] =
 	"'namespace'",
 	"'using'",
 	"'this'",
-	"'::'"
+	"'::'",
+	"'class'",
+	"'public'",
+	"'protected'",
+	"'private'",
 };
 
 
@@ -1394,6 +1398,14 @@ void Scanner::NextRawToken(void)
 					mToken = TK_USING;
 				else if ((mCompilerOptions & COPT_CPLUSPLUS) && !strcmp(tkident, "this"))
 					mToken = TK_THIS;
+				else if ((mCompilerOptions & COPT_CPLUSPLUS) && !strcmp(tkident, "class"))
+					mToken = TK_CLASS;
+				else if ((mCompilerOptions & COPT_CPLUSPLUS) && !strcmp(tkident, "public"))
+					mToken = TK_PUBLIC;
+				else if ((mCompilerOptions & COPT_CPLUSPLUS) && !strcmp(tkident, "protected"))
+					mToken = TK_PROTECTED;
+				else if ((mCompilerOptions & COPT_CPLUSPLUS) && !strcmp(tkident, "private"))
+					mToken = TK_PRIVATE;
 				else if ((mCompilerOptions & COPT_CPLUSPLUS) && !strcmp(tkident, "operator"))
 				{
 					NextRawToken();

oscar64/Scanner.h

@@ -153,6 +153,10 @@ enum Token
 	TK_USING,
 	TK_THIS,
 	TK_COLCOLON,
+	TK_CLASS,
+	TK_PUBLIC,
+	TK_PROTECTED,
+	TK_PRIVATE,
 
 	NUM_TOKENS
 };