Changeset 6747182 in tol

Timestamp:

Oct 5, 2015, 10:03:38 AM (11 years ago)

Author:

Pedro Gea <pgea@…>

Branches:

1941-docker-image-to-test, devel, master

Children:

0710f17

Parents:

abe7b0d

Message:

Refs #1881
El chequeo se hacía sólo para Windows.
Ahora se deja sólo para Win32 compilado con MSVC.
La función puede ampliarse a otras plataformas posteriormente.

git-svn-id: ​https://www.tol-project.org/svn/tolp/trunk@6907 be4846ae-f051-483a-831f-b64e7d08527f

File:

• tol/stdlib/system/_geturl.tol (modified) (1 diff)

tol/stdlib/system/_geturl.tol

@@ -125 +125 @@
 //////////////////////////////////////////////////////////////////////////////
 {
-  If(Or(OSUnix,ToLower(GetFilePrefix(TOLSessionPath))!="tolbase"),1,
+  Set platInfo = PlatformInfo(?);
+  Real isWin32MSVC = (platInfo[3]=="MSVC" & platInfo[1]==4);
+  If(Or(!isWin32MSVC, ToLower(GetFilePrefix(TOLSessionPath))!="tolbase"), 1,
   {
     Date tol_release_check = If(FileExist("tol_release_check.tol"),