Data update

Task/Parallel-calculations/FreeBASIC/parallel-calculations.basic

@@ -0,0 +1,46 @@
+#ifdef __FB_WIN32__
+    ' ... instructions only for Win ...
+    #Include "windows.bi"
+
+    Function ThreadFunc As Dword Cdecl Alias "ThreadFunc"(param As Any Ptr) Export
+        Print "Thread running"
+        Function = 0
+    End Function
+
+    Dim As HANDLE thread
+    Dim As Dword threadId
+
+    thread = CreateThread(NULL, 0, @ThreadFunc, NULL, 0, @threadId)
+
+    If thread = NULL Then
+        Print "Error creating thread"
+        Sleep
+        End 1
+    End If
+
+    WaitForSingleObject(thread, INFINITE)
+#endif
+
+#ifdef __FB_LINUX__
+    ' ... instructions only for Linux ...
+    #Include "crt/pthread.bi"
+
+    Function ThreadFunc As Any Ptr Cdecl Alias "ThreadFunc"(param As Any Ptr) Export
+        Print "Thread running"
+        Function = 0
+    End Function
+
+    Dim As pthread_t thread
+
+    If pthread_create(@thread, NULL, @ThreadFunc, NULL) <> 0 Then
+        Print "Error creating thread"
+        Sleep
+        End 1
+    End If
+
+    pthread_join(thread, NULL)
+#endif
+
+Print "Thread finished"
+
+Sleep

Task/Parallel-calculations/Wren/parallel-calculations-1.wren

@@ -1,4 +1,4 @@
-/* parallel_calculations.wren */
+/* Parallel_calculations.wren */
 
 import "./math" for Int
 

Task/Parallel-calculations/Wren/parallel-calculations-2.wren

@@ -107,7 +107,7 @@ int main(int argc, char **argv) {
     config.errorFn = &errorFn;
     config.loadModuleFn = &loadModule;
     const char* module = "main";
-    const char* fileName = "parallel_calculations.wren";
+    const char* fileName = "Parallel_calculations.wren";
     char *script = readFile(fileName);
 
     // config the VMs and interpret the script