[dotgnu-pnet-commits] pnet ChangeLog csant/csant_cscc.c

[Klaus Treichel]

CVSROOT:        /cvsroot/dotgnu-pnet
Module name:    pnet
Changes by:     Klaus Treichel <ktreichel>      06/08/14 18:34:36

Modified files:
        .              : ChangeLog 
        csant          : csant_cscc.c 

Log message:
        2006-08-14  Marcus Urban  <address@hidden>
        
                * csant/csant_cscc.c: Change csant to emit csc-style flags in 
several
                cases for mcs. (patch #4720, Klaus)

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/pnet/ChangeLog?cvsroot=dotgnu-pnet&r1=1.3348&r2=1.3349
http://cvs.savannah.gnu.org/viewcvs/pnet/csant/csant_cscc.c?cvsroot=dotgnu-pnet&r1=1.29&r2=1.30

Patches:
Index: ChangeLog
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/ChangeLog,v
retrieving revision 1.3348
retrieving revision 1.3349
diff -u -b -r1.3348 -r1.3349
--- ChangeLog   1 Aug 2006 21:05:37 -0000       1.3348
+++ ChangeLog   14 Aug 2006 18:34:36 -0000      1.3349
@@ -1,3 +1,7 @@
+2006-08-14  Marcus Urban  <address@hidden>
+
+       * csant/csant_cscc.c: Change csant to emit csc-style flags in several
+       cases for mcs. (patch #4720, Klaus)
 
 2006-02-23  Gopal V  <address@hidden>
        

Index: csant/csant_cscc.c
===================================================================
RCS file: /cvsroot/dotgnu-pnet/pnet/csant/csant_cscc.c,v
retrieving revision 1.29
retrieving revision 1.30
diff -u -b -r1.29 -r1.30
--- csant/csant_cscc.c  7 Aug 2004 00:14:24 -0000       1.29
+++ csant/csant_cscc.c  14 Aug 2006 18:34:36 -0000      1.30
@@ -855,33 +855,35 @@
        AddArg(&argv, &argc, FindProgramPath("mcs", "csant.env.MCS"));
 
        /* Set the target and output file */
-       AddArg(&argv, &argc, "--target");
-       AddArg(&argv, &argc, (char *)(args->target));
-       AddArg(&argv, &argc, "-o");
-       AddArg(&argv, &argc, (char *)(args->output));
+       AddValueArg(&argv, &argc, "-target:", (char *)(args->target));
+       AddValueArg(&argv, &argc, "-out:", (char *)(args->output));
 
        /* Enable debugging if necessary */
        if(args->debug == COMP_FLAG_TRUE)
        {
-               AddArg(&argv, &argc, "-g");
+               AddArg(&argv, &argc, "-debug+");
        }
 
        /* Set the checked compilation state */
        if(args->checked == COMP_FLAG_TRUE)
        {
-               AddArg(&argv, &argc, "--checked");
+               AddArg(&argv, &argc, "/checked+");
+       }
+       else if(args->checked == COMP_FLAG_FALSE)
+       {
+               AddArg(&argv, &argc, "/checked-");
        }
 
        /* Set the unsafe compilation state */
        if(args->unsafe == COMP_FLAG_TRUE)
        {
-               AddArg(&argv, &argc, "--unsafe");
+               AddArg(&argv, &argc, "/unsafe");
        }
 
        /* Disable the standard library if necessary */
        if(args->noStdLib == COMP_FLAG_TRUE)
        {
-               AddArg(&argv, &argc, "--nostdlib");
+               AddArg(&argv, &argc, "-nostdlib");
        }
 
        /* Set the optimization level */
@@ -959,33 +961,20 @@
                AddValueArg(&argv, &argc, "-define:", temp);
        }
 
-       /* Add the library references to the command-line */
+       /* Add the references to the command-line */
        numFiles = CSAntFileSetSize(args->references);
+       temp = 0;
        for(file = 0; file < numFiles; ++file)
        {
-               temp = CSAntFileSetFile(args->references, file);
-               len = strlen(temp);
-               while(len > 0 && temp[len - 1] != '/' && temp[len - 1] != '\\')
-               {
-                       --len;
-               }
-               if(len > 0)
-               {
-                       if(len == 1)
-                       {
-                               AddArg(&argv, &argc, "-L");
-                               AddValueLenArg(&argv, &argc, "", temp, 1);
+               temp = SemiColonList(temp,
+                                       CSAntDirCombine 
(CSAntFileSetFile(args->references, file), 0));
                        }
-                       else
+       if(temp != 0)
                        {
-                               AddArg(&argv, &argc, "-L");
-                               AddValueLenArg(&argv, &argc, "", temp, len - 1);
-                       }
-               }
-               AddArg(&argv, &argc, "-r");
-               AddArg(&argv, &argc, temp + len);
+               AddValueArg(&argv, &argc, "-reference:", temp);
        }
 
+
        /* Terminate the command-line */
        AddArg(&argv, &argc, (char *)0);