提交: a2bd179d2a8663cbde84481ec3087194853b5978 - nullptr (git)

自作言語nullptrのインタープリターです。

Commit MetaInfo

• 修订版: a2bd179d2a8663cbde84481ec3087194853b5978 (tree)
• 时间: 2015-08-07 23:27:16
• 作者: Diverge <diverge.vosystems@gmai...>
• Commiter: Diverge

Log Message

演算機作成中
一部機能追加

更改概述

• add: module.txt
• modified: nullptr.sdf
• modified: nullptr/BasicModule.cpp
• modified: nullptr/ControlManager.cpp
• modified: nullptr/Debug/nullptr.tlog/CL.command.1.tlog
• modified: nullptr/Debug/nullptr.tlog/CL.read.1.tlog
• modified: nullptr/Debug/nullptr.tlog/CL.write.1.tlog
• add: nullptr/Debug/nullptr.tlog/unsuccessfulbuild
• modified: nullptr/Debug/vc140.idb
• modified: nullptr/int.cpp
• modified: nullptr/nullptr.h
• modified: nullptr/nullptrInterpreter.h

差异

--- /dev/null
+++ b/module.txt
@@ -0,0 +1,26 @@
+using moduleの実装について
+
+モジュールはC/C++が呼び出せるライブラリ形式(動的読み込みが可能なものに限る)で実装する。
+中には必ず
+open(void)
+close(void)
+run関数群(後述)
+を入れる。
+
+
+run関数群
+実行される関数は必ずしも引数が一つづつとは限らないので、ポインタを使い返り値の型の違いで関数を分ける。
+幸いなことに、nullptrには整数型が複数個ないため実装の数を減らすことができる。
+bool runRB(std::string, Int*, String*, bool*);
+Int runRI(std::string, Int*, String*, bool*);
+String runRS(std::string, Int*, String*, bool*);
+最初の引数std::stringは機能の名前になる
+
+モジュールファイルには各機能に必要な引数の個数と返り値の型を書いておく。
+bool func(Int 2, String 0, bool 0);
+上記のような機能定義の場合、呼び出される関数はrunRBとなり
+runRB("func", Int*, nullptr, nullptr);
+となる。
+
+同時に読み込むDLLは一つまでとする。(同じ名前の関数ができてしまうため。)
+読み込んだら初めにopen、終わったらcloseを呼びリンクを解く
\ No newline at end of file

Binary files a/nullptr.sdf and b/nullptr.sdf differ

--- a/nullptr/BasicModule.cpp
+++ b/nullptr/BasicModule.cpp
@@ -59,5 +59,27 @@ void Nullptr::Keyboard(std::string line)
 
 void Nullptr::EScreen(std::string line)
 {
+	vector<string> str=Split(line,"<<<");
 
+	for(size_t C=1; C<str.size(); C++){
+		if(regex_match(str[C],regex("\".+\""))){
+			cerr<<Replace(str[C],"\"","");
+		}else if(str[C]=="endl"){
+			cerr<<endl;
+		}else if(str[C]=="flush"){
+			cerr<<flush;
+		}else if(regex_match(str[C],regex("\\d+"))){
+			cerr<<stoi(str[C]);
+		}else{
+			BasicTypes::Int ull;
+			if(GetInt(str[C],ull)){
+				cerr<<BasicTypes::IntManager(to_string(0),ull)(ull,'d');
+			}else{
+				string s;
+				if(GetStr(str[C],s)){
+					cerr<<s;
+				}
+			}
+		}
+	}
 }
\ No newline at end of file

--- a/nullptr/ControlManager.cpp
+++ b/nullptr/ControlManager.cpp
@@ -58,5 +58,123 @@ bool Nullptr::GetBool(string judge)
 			
 		}
 	}
-TrueEnd:
+}
+
+vector<string> Nullptr::Lex(string formula)
+{
+	vector<string> form;
+	formula=Replace(formula," ","");
+	smatch result;
+
+	for(size_t C=0; C<formula.size(); C++){
+		if(regex_search(formula,result,regex("\\d+"))){
+			size_t diff=result.end()-result.begin();
+			string num(result.begin(),result.end());
+			form.push_back(num);
+			C+=diff;
+		}else{
+			switch(formula[C]){
+			case '+':
+			case '-':
+				if(C+1<formula.size()){
+					if(formula[C+1]==formula[C]){
+						form.push_back({formula[C++],formula[C],'\0'});
+						break;
+					}
+				}
+			case '*':
+			case '/':
+			case '%':
+				form.push_back({formula[C],'\0'});
+				break;
+
+			default:
+				char* varname=new char[formula.size()];
+				varname[0]=formula[C];
+				for(size_t varpoint=0; varpoint<formula.size(); varpoint++){
+					if(isalnum(formula[C+varpoint])){
+						varname[varpoint]=formula[C+varpoint];
+					}else{
+						C+=varpoint;
+						break;
+					}
+				}
+				form.push_back(varname);
+				break;
+			}
+		}
+		
+	}
+}
+
+vector<std::string> Nullptr::ReplaceVar2Num(vector<string> formula)
+{
+	BasicTypes::Int intb;
+	vector<string> lex;
+
+	for(size_t C=0; C<formula.size(); C++){
+		if(isalpha(formula[C][0])){
+			GetInt(formula[C],intb);
+			lex.push_back(BasicTypes::IntManager()(intb,'d'));
+		}else{
+			lex.push_back(formula[C]);
+		}
+	}
+	return lex;
+}
+
+BasicTypes::Int Nullptr::Calc(vector<string> lex)
+{
+	BasicTypes::Int intd;
+}
+
+std::vector<std::string> Nullptr::ProcBrackets(std::vector<std::string> lex)
+{
+	vector<string>::iterator open,close;
+	vector<string> lexed;
+
+	for(size_t C=0; C<lex.size(); C++){
+		if(lex[C]=="("){
+			open=lex.begin()+C;
+		}else if(lex[C]==")"){
+			close=lex.begin()+C;
+			lexed.push_back(CalcBracket(string(open,close)));
+		}else{
+			lexed.push_back(lex[C]);
+		}
+	}
+}
+
+std::string Nullptr::CalcBracket(std::string inBracket)
+{
+	vector<BasicTypes::Int> num;
+	bool minus=false;
+	for(size_t C=0; C<inBracket.size(); C++){
+		switch(inBracket[C]){
+		case '+':
+
+			break;
+		case '-':
+
+			break;
+		case '*':
+
+			break;
+		case '/':
+
+			break;
+		case '%':
+
+			break;
+
+		default:
+			char* n=new char[inBracket.size()-C];
+			for(size_t c=C; c<inBracket.size(); c++){
+				if(!isdigit(inBracket[c]))break;
+				n[c-C]=inBracket[c];
+			}
+			num.push_back({!minus,stoull(n)});
+			break;
+		}
+	}
 }
\ No newline at end of file

Binary files a/nullptr/Debug/nullptr.tlog/CL.command.1.tlog and b/nullptr/Debug/nullptr.tlog/CL.command.1.tlog differ

Binary files a/nullptr/Debug/nullptr.tlog/CL.read.1.tlog and b/nullptr/Debug/nullptr.tlog/CL.read.1.tlog differ

Binary files a/nullptr/Debug/nullptr.tlog/CL.write.1.tlog and b/nullptr/Debug/nullptr.tlog/CL.write.1.tlog differ

Binary files a/nullptr/Debug/vc140.idb and b/nullptr/Debug/vc140.idb differ

--- a/nullptr/int.cpp
+++ b/nullptr/int.cpp
@@ -16,16 +16,7 @@ void IntManager::operator=(Int data)
 
 Int IntManager::operator+(Int i)
 {
-	Int tmp;
-
-	if(i.positive==this->m_data.positive){
-		tmp.data=i.data + this->m_data.data;
-		tmp.positive=i.positive;
-	}else{
-		tmp.data=(i.data > this->m_data.data ? +1 : -1)*(i.data - this->m_data.data);
-		tmp.positive=(i.data > this->m_data.data ? true : false);
-	}
-	return tmp;
+	return m_data+i;
 }
 
 std::string IntManager::operator()(Int i, char type)
@@ -56,36 +47,22 @@ std::string IntManager::operator()(Int i, char type)
 
 Int IntManager::operator-(Int i)
 {
-	Int tmp;
-	tmp=this->operator+({i.data,!i.positive});
-	return tmp;
+	return m_data-i;
 }
 
 Int IntManager::operator*(Int i)
 {
-	Int tmp;
-
-	tmp.data=i.data*this->m_data.data;
-	tmp.positive=(i.positive==false || this->m_data.positive==false ? false : true);
-	return tmp;
+	return m_data*i;
 }
 
 Int IntManager::operator/(Int i)
 {
-	Int tmp;
-
-	tmp.data=this->m_data.data/i.data;
-	tmp.positive=(i.positive==false || this->m_data.positive==false ? false : true);
-	return tmp;
+	return m_data/i;
 }
 
 Int IntManager::operator%(Int i)
 {
-	Int tmp;
-
-	tmp.data=this->m_data.data%i.data;
-	tmp.positive=(i.positive==false || this->m_data.positive==false ? false : true);
-	return tmp;
+	return m_data%i;
 }
 
 Int IntManager::operator()(void)
@@ -95,7 +72,7 @@ Int IntManager::operator()(void)
 
 std::string IntManager::operator()(char type)
 {
-	string str=IntManager("tmp",this->m_data)(this->m_data,type);
+	string str=IntManager()(this->m_data,type);
 	return str;
 }
 
@@ -137,4 +114,53 @@ Int IntManager::GetValue(void)
 std::string IntManager::GetName(void)
 {
 	return m_name;
-}
\ No newline at end of file
+}
+
+
+Int VOSystemsNullptr::BasicTypes::operator+(Int p1,Int p2)
+{
+	Int tmp;
+
+	if(p2.positive==p1.positive){
+		tmp.data=p2.data + p1.data;
+		tmp.positive=p2.positive;
+	}else{
+		tmp.data=(p2.data > p1.data ? +1 : -1)*(p2.data - p1.data);
+		tmp.positive=(p2.data > p1.data ? true : false);
+	}
+	return tmp;
+}
+
+Int VOSystemsNullptr::BasicTypes::operator-(Int p1, Int p2)
+{
+	Int tmp={p2.data,!p2.positive};
+	tmp=p1+tmp;
+	return tmp;
+}
+
+Int VOSystemsNullptr::BasicTypes::operator*(Int p1, Int p2)
+{
+	Int tmp;
+
+	tmp.data=p1.data*p2.data;
+	tmp.positive=(p1.positive==false || p2.positive==false ? false : true);
+	return tmp;
+}
+
+Int VOSystemsNullptr::BasicTypes::operator/(Int p1, Int p2)
+{
+	Int tmp;
+
+	tmp.data=p1.data/p2.data;
+	tmp.positive=(p1.positive==false || p2.positive==false ? false : true);
+	return tmp;
+}
+
+Int VOSystemsNullptr::BasicTypes::operator%(Int p1, Int p2)
+{
+	Int tmp;
+
+	tmp.data=p1.data%p2.data;
+	tmp.positive=(p1.positive==false || p2.positive==false ? false : true);
+	return tmp;
+}

--- a/nullptr/nullptr.h
+++ b/nullptr/nullptr.h
@@ -28,7 +28,7 @@ namespace VOSystemsNullptr
 			
 		public:
 			IntManager(std::string name, Int data) :m_name(name),m_data(data) {};
-
+			IntManager(void){};
 			void operator=(Int data);
 
 			BasicTypes::Int operator+(BasicTypes::Int i);
@@ -50,6 +50,12 @@ namespace VOSystemsNullptr
 			std::string GetName(void);
 		};
 
+		BasicTypes::Int operator+(BasicTypes::Int,BasicTypes::Int);
+		BasicTypes::Int operator-(BasicTypes::Int,BasicTypes::Int);
+		BasicTypes::Int operator*(BasicTypes::Int,BasicTypes::Int);
+		BasicTypes::Int operator/(BasicTypes::Int,BasicTypes::Int);
+		BasicTypes::Int operator%(BasicTypes::Int,BasicTypes::Int);
+
 		typedef struct _String{
 			std::string name;
 			std::string data;

--- a/nullptr/nullptrInterpreter.h
+++ b/nullptr/nullptrInterpreter.h
@@ -57,6 +57,11 @@ namespace VOSystemsNullptr
 		bool Goto(std::string line);
 		bool GetBool(std::string judge);
 
+		std::vector<std::string> Lex(std::string formula);
+		std::vector<std::string> ReplaceVar2Num(std::vector<std::string> formula);
+		BasicTypes::Int Calc(std::vector<std::string> lex);
+		std::vector<std::string> ProcBrackets(std::vector<std::string> lex);
+		std::string CalcBracket(std::string inBracket);
 		/*バージョン*/
 		unsigned int 
 			m_major=0,