Merge pull request #297 from Shad7ows/main

تعديل ملف إرشادات اللغة

Author: Shad7ows

documents/إرشادات إستعمال ألف.md

@@ -730,11 +730,11 @@
 # ['السلام', ' عليكم', ' ورحمة, الله']
 ```
 
-15- إضافة دالة اقسم() للنص حيث تقوم بتقسيم النص إلى ثلاث اجزاء بالنسبة للمعامل الممرر.
+15- إضافة دالة قسم() للنص حيث تقوم بتقسيم النص إلى ثلاث اجزاء بالنسبة للمعامل الممرر.
 مثال:
 ```
 نص = "ملف.لاحقة"
-اطبع(نص.اقسم("."))
+اطبع(نص.قسم("."))
 # ('ملف', '.', 'لاحقة')
 ```
 

documents/ما الجديد.md

@@ -8,6 +8,6 @@
 		الوقت.غفوة(0.07)
 	اطبع()
 
-اطبع("جاري تحميل الملف ...")		
+اطبع("جاري تحميل الملف ...")
 شريط_التقدم(السابقة="التقدم:", اللاحقة="اكتمل", الطول=51)
 اطبع("إكتمل التحميل بنجاح.")

examples/شريط_التقدم.alif

@@ -87,6 +87,7 @@ class SymTableEntry { // 89
 	unsigned compInlined : 1; 
 	unsigned compIterTarget : 1; 
 	unsigned canSeeClassScope : 1;
+	unsigned hasDocstring : 1;
 
 	AlifIntT compIterExpr{};
 	AlifSourceLocation loc{};

source/AlifCore/Include/Core/AlifCore_SymTable.h

@@ -123,11 +123,12 @@ class AlifCodeObject ALIFCODE_DEF(1); // 140
 
 #define CO_NO_MONITORING_EVENTS 0x2000000
 
+#define CO_HAS_DOCSTRING 0x4000000 // 180
 
 
 #define MAXBLOCKS 21
 
-extern AlifTypeObject _alifCodeType_; // 179
+extern AlifTypeObject _alifCodeType_; // 189
 #define ALIFCODE_CHECK(_op) ALIF_IS_TYPE((_op), &_alifCodeType_)
 
 

source/AlifCore/Include/Main/Code.h

@@ -241,32 +241,32 @@ const unsigned char _ALIF_M__GetPath[] = {
     99,1,0,0,0,0,0,0,0,1,0,0,0,4,0,0,
     0,7,0,0,0,115,108,0,0,0,92,0,92,1,149,0,
     80,0,37,0,0,0,0,0,0,0,95,42,0,0,87,1,
-    0,0,0,0,0,0,0,0,81,1,81,0,48,2,79,1,
+    0,0,0,0,0,0,0,0,81,1,81,0,48,2,79,0,
     23,0,103,8,81,2,16,0,49,0,0,0,0,0,0,0,
     49,1,0,0,0,0,0,0,37,0,0,0,0,0,0,0,
     95,2,0,0,80,0,33,0,87,3,0,0,0,0,0,0,
     0,0,80,0,49,1,0,0,0,0,0,0,106,0,72,49,
-    0,0,79,0,33,0,40,2,0,0,0,78,99,1,0,0,
-    0,0,0,0,0,0,0,0,0,7,0,0,0,51,0,0,
-    0,115,74,0,0,0,58,2,32,0,29,0,149,0,81,0,
-    16,0,67,23,0,0,107,1,80,2,31,0,87,1,0,0,
-    0,0,0,0,0,0,80,3,81,1,49,2,0,0,0,0,
-    0,0,49,1,0,0,0,0,0,0,115,0,149,5,29,0,
-    72,25,0,0,9,0,29,0,79,0,33,0,51,3,100,1,
-    40,1,0,0,0,78,40,1,0,0,0,117,17,0,0,0,
-    216,182,217,133,95,216,167,217,132,217,133,216,179,216,167,216,
-    177,40,4,0,0,0,117,2,0,0,0,46,48,117,2,0,
-    0,0,216,182,117,10,0,0,0,216,167,216,174,216,170,216,
-    168,216,177,117,10,0,0,0,216,179,216,167,216,168,217,130,
-    216,169,115,4,0,0,0,32,32,128,128,117,16,0,0,0,
-    60,216,172,216,177,216,175,32,71,101,116,80,97,116,104,62,
-    117,9,0,0,0,60,103,101,110,101,120,112,114,62,117,38,
-    0,0,0,216,168,216,173,216,171,95,216,170,216,181,216,167,
-    216,185,216,175,217,138,46,60,108,111,99,97,108,115,62,46,
-    60,103,101,110,101,120,112,114,62,34,0,0,0,115,35,0,
-    0,0,248,233,0,128,0,208,22,95,210,84,94,200,66,145,
-    122,212,34,51,176,74,192,2,211,34,67,215,23,68,208,23,
-    68,211,84,94,249,115,4,0,0,0,131,32,35,1,40,2,
+    0,0,79,1,33,0,40,2,0,0,0,99,1,0,0,0,
+    0,0,0,0,0,0,0,0,7,0,0,0,51,0,0,0,
+    115,74,0,0,0,58,2,32,0,29,0,149,0,81,0,16,
+    0,67,23,0,0,107,1,80,2,31,0,87,1,0,0,0,
+    0,0,0,0,0,80,3,81,1,49,2,0,0,0,0,0,
+    0,49,1,0,0,0,0,0,0,115,0,149,5,29,0,72,
+    25,0,0,9,0,29,0,79,0,33,0,51,3,100,1,40,
+    1,0,0,0,78,40,1,0,0,0,117,17,0,0,0,216,
+    182,217,133,95,216,167,217,132,217,133,216,179,216,167,216,177,
+    40,4,0,0,0,117,2,0,0,0,46,48,117,2,0,0,
+    0,216,182,117,10,0,0,0,216,167,216,174,216,170,216,168,
+    216,177,117,10,0,0,0,216,179,216,167,216,168,217,130,216,
+    169,115,4,0,0,0,32,32,128,128,117,16,0,0,0,60,
+    216,172,216,177,216,175,32,71,101,116,80,97,116,104,62,117,
+    9,0,0,0,60,103,101,110,101,120,112,114,62,117,38,0,
+    0,0,216,168,216,173,216,171,95,216,170,216,181,216,167,216,
+    185,216,175,217,138,46,60,108,111,99,97,108,115,62,46,60,
+    103,101,110,101,120,112,114,62,34,0,0,0,115,35,0,0,
+    0,248,233,0,128,0,208,22,95,210,84,94,200,66,145,122,
+    212,34,51,176,74,192,2,211,34,67,215,23,68,208,23,68,
+    211,84,94,249,115,4,0,0,0,131,32,35,1,78,40,2,
     0,0,0,117,13,0,0,0,216,170,216,173,217,130,217,130,
     95,216,167,217,138,117,19,0,0,0,216,167,216,179,217,133,
     95,216,167,217,132,217,133,216,172,217,132,216,175,40,3,0,

source/AlifCore/Include/Main/FrozenModules/GetPath.h

@@ -788,6 +788,9 @@ ExprTy alifParserEngine_collectCallSeqs(AlifParser* _p, ASDLExprSeq* _a, ASDLSeq
 	if (stars) totalLen += ASDL_SEQ_LEN(stars);
 
 	ASDLExprSeq* args = alifNew_exprSeq(totalLen, _astMem);
+	if (args == nullptr) {
+		return nullptr;
+	}
 
 	AlifSizeT i = 0;
 	for (i = 0; i < argsLen; i++) {
@@ -895,6 +898,9 @@ static ASDLExprSeq* unpackTopLevel_joinedStrs(AlifParser* _p, ASDLExprSeq* _rawE
 	}
 
 	ASDLExprSeq* expressions = alifNew_exprSeq(reqSize, _p->astMem);
+	if (expressions == nullptr) {
+		return nullptr;
+	}
 
 	AlifSizeT rawIndex{}, reqIndex = 0;
 	for (rawIndex = 0; rawIndex < rawSize; rawIndex++) {

source/AlifCore/Objects/ActionHelpers.cpp

@@ -1295,6 +1295,8 @@ static AlifIntT compute_codeFlags(AlifCompiler* _c) {
 			flags |= CO_VARARGS;
 		if (ste->varKeywords)
 			flags |= CO_VARKEYWORDS;
+		if (ste->hasDocstring)
+			flags |= CO_HAS_DOCSTRING;
 	}
 
 	if (ste->coroutine and !ste->generator) {

source/AlifCore/Objects/AlifCompile.cpp

@@ -1229,37 +1229,36 @@ static AlifIntT codegen_functionBody(AlifCompiler* _c, StmtTy _s,
 	RETURN_IF_ERROR(
 		codegen_enterScope(_c, name, scopeType, (void*)_s, _firstLineNo, nullptr, &umd));
 
-	AlifSizeT first_instr = 0;
+	AlifSizeT firstInstr = 0;
 	AlifObject* docstring = alifAST_getDocString(body);
 	if (docstring) {
-		first_instr = 1;
+		firstInstr = 1;
 		/* add docstring */
 		//docstring = _alifCompile_cleanDoc(docstring);
 		//if (docstring == nullptr) {
 		//	compiler_exitScope(_c);
 		//	return ERROR;
 		//}
+		AlifSizeT idx = _alifCompiler_addConst(_c, docstring);
+		ALIF_DECREF(docstring);
+		RETURN_IF_ERROR_IN_SCOPE(_c, idx < 0 ? ERROR : SUCCESS);
 	}
 
-	AlifSizeT idx = _alifCompiler_addConst(_c, docstring ? docstring : ALIF_NONE);
-	ALIF_XDECREF(docstring);
-	RETURN_IF_ERROR_IN_SCOPE(_c, idx < 0 ? ERROR : SUCCESS);
-
 	NEW_JUMP_TARGET_LABEL(_c, start);
 	USE_LABEL(_c, start);
 	SymTableEntry* ste = SYMTABLE_ENTRY(_c);
-	bool add_stopiteration_handler = ste->coroutine or ste->generator;
-	if (add_stopiteration_handler) {
+	bool addStopIterationHandler = ste->coroutine or ste->generator;
+	if (addStopIterationHandler) {
 		RETURN_IF_ERROR(
 			_alifCompiler_pushFBlock(_c, _noLocation_,
 				AlifCompileFBlockType::Compiler_FBlock_Stop_Iteration,
 				start, NO_LABEL, nullptr));
 	}
 
-	for (AlifSizeT i = first_instr; i < ASDL_SEQ_LEN(body); i++) {
+	for (AlifSizeT i = firstInstr; i < ASDL_SEQ_LEN(body); i++) {
 		VISIT_IN_SCOPE(_c, Stmt, (StmtTy)ASDL_SEQ_GET(body, i));
 	}
-	if (add_stopiteration_handler) {
+	if (addStopIterationHandler) {
 		RETURN_IF_ERROR_IN_SCOPE(_c, codegen_wrapInStopIterationHandler(_c));
 		_alifCompiler_popFBlock(_c, AlifCompileFBlockType::Compiler_FBlock_Stop_Iteration, start);
 	}

source/AlifCore/Objects/Codegen.cpp

@@ -100,7 +100,7 @@ AlifObject* alifFunction_newWithQualName(AlifObject* _code,
 
 	AlifObject* consts = codeObj->consts;
 	AlifObject* doc{};
-	if (alifTuple_size(consts) >= 1) {
+	if (codeObj->flags & CO_HAS_DOCSTRING) {
 		doc = alifTuple_getItem(consts, 0);
 		if (!ALIFUSTR_CHECK(doc)) {
 			doc = ALIF_NONE;