add option to disable binary form

coin-or · May 3, 2022 · d1013c7 · d1013c7
1 parent 4b8ba1e
commit d1013c7
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 1 deletion.
diff --git a/src/amplsolver/amplsolver.c b/src/amplsolver/amplsolver.c
@@ -38,6 +38,7 @@ typedef struct
    /* length of nl filename without extension */
    int  stublen;
    char solver[GMS_SSSIZE];
+   int  nlbinary;
 
 } amplsolver;
 
@@ -161,6 +162,8 @@ int processOptions(
          gevLogStatPChar(as->gev, "Warning: Failed to pass solver options.\n");
    }
 
+   as->nlbinary = optGetIntStr(opt, "nlbinary");
+
    rc = 0;
 
  TERMINATE:
@@ -187,7 +190,7 @@ void writeNL(
    as->stublen = strlen(as->filename) - 3;
 
    writeopts.filename = as->filename;
-   writeopts.binary = 1;
+   writeopts.binary = as->nlbinary;
 
    if( convertWriteNL(as->gmo, writeopts) == RETURN_ERROR )
    {

diff --git a/src/amplsolver/optamplsolver.cpp b/src/amplsolver/optamplsolver.cpp
@@ -24,6 +24,8 @@ int main(int argc, char** argv)
       "", -2);
    gmsopt.collect("options", "Options string to pass to solver", "", "", -2);
 
+   gmsopt.collect("nlbinary", "Whether .nl file should be written in binary form", "", true);
+
    gmsopt.finalize();
 
    gmsopt.writeDef();