#FEATURE by cg
authorClaus Gittinger <cg@exept.de>
Fri, 22 Mar 2019 13:30:55 +0100
changeset 2123 73df3f21c5a8
parent 2122 a9c72db987e7
child 2124 172fbc87434b
#FEATURE by cg class: RegressionTests::StackFrameTest changed: #unlimitedStackTest1:
RegressionTests__StackFrameTest.st
--- a/RegressionTests__StackFrameTest.st	Fri Mar 22 12:52:26 2019 +0100
+++ b/RegressionTests__StackFrameTest.st	Fri Mar 22 13:30:55 2019 +0100
@@ -48,42 +48,44 @@
     OBJ __symbol;
     OBJ __returnCode;
 
-    if (!__isString(__ArrayInstPtr(anArray)->a_element[0])) {
-	printf("OOPS\n");
+    if (!__isStringLike(__ArrayInstPtr(anArray)->a_element[0])) {
+        printf("OOPS\n");
     };
-    if (!__isString(__ArrayInstPtr(anArray)->a_element[1])) {
-	printf("OOPS\n");
+    if (!__isStringLike(__ArrayInstPtr(anArray)->a_element[1])) {
+        printf("OOPS\n");
     };
-    if (!__isString(__ArrayInstPtr(anArray)->a_element[2])) {
-	printf("OOPS\n");
+    if (!__isStringLike(__ArrayInstPtr(anArray)->a_element[2])) {
+        printf("OOPS\n");
     };
-    if (!__isString(__ArrayInstPtr(anArray)->a_element[3])) {
-	printf("OOPS\n");
+    if (!__isStringLike(__ArrayInstPtr(anArray)->a_element[3])) {
+        printf("OOPS\n");
     };
-    if (!__isString(__ArrayInstPtr(anArray)->a_element[4])) {
-	printf("OOPS\n");
+    if (!__isStringLike(__ArrayInstPtr(anArray)->a_element[4])) {
+        printf("OOPS\n");
     };
     __PROTECT__(anArray);
     __scavenge();
     __UNPROTECT__(anArray);
 
 
-    if (!__isString(__ArrayInstPtr(anArray)->a_element[0])) {
-	printf("OOPS2\n");
+    if (!__isStringLike(__ArrayInstPtr(anArray)->a_element[0])) {
+        printf("OOPS2\n");
     };
-    if (!__isString(__ArrayInstPtr(anArray)->a_element[1])) {
-	printf("OOPS2\n");
+    if (!__isStringLike(__ArrayInstPtr(anArray)->a_element[1])) {
+        printf("OOPS2\n");
     };
-    if (!__isString(__ArrayInstPtr(anArray)->a_element[2])) {
-	printf("OOPS2\n");
+    if (!__isStringLike(__ArrayInstPtr(anArray)->a_element[2])) {
+        printf("OOPS2\n");
     };
-    if (!__isString(__ArrayInstPtr(anArray)->a_element[3])) {
-	printf("OOPS2\n");
+    if (!__isStringLike(__ArrayInstPtr(anArray)->a_element[3])) {
+        printf("OOPS2\n");
     };
-    if (!__isString(__ArrayInstPtr(anArray)->a_element[4])) {
-	printf("OOPS2\n");
+    if (!__isStringLike(__ArrayInstPtr(anArray)->a_element[4])) {
+        printf("OOPS2\n");
     };
 %}.
+
+    "Modified: / 22-03-2019 / 03:01:38 / Claus Gittinger"
 ! !
 
 !StackFrameTest class methodsFor:'documentation'!