[LON-CAPA-cvs] cvs: capa /capa51/pProj capaFunction.c

albertel lon-capa-cvs@mail.lon-capa.org
Tue, 24 Sep 2002 15:10:40 -0000


albertel		Tue Sep 24 11:10:40 2002 EDT

  Modified files:              
    /capa/capa51/pProj	capaFunction.c 
  Log:
  - should be looking for a , when setting the seed
  
  
  
Index: capa/capa51/pProj/capaFunction.c
diff -u capa/capa51/pProj/capaFunction.c:1.14 capa/capa51/pProj/capaFunction.c:1.15
--- capa/capa51/pProj/capaFunction.c:1.14	Tue Apr 23 18:23:46 2002
+++ capa/capa51/pProj/capaFunction.c	Tue Sep 24 11:10:40 2002
@@ -773,7 +773,7 @@
                 case R_VAR: case R_CONSTANT: break;
                 case S_VAR: case S_CONSTANT: 
                        leng = strlen(FIRST_ARGSTR(argp));
-		       if( (index(FIRST_ARGSTR(argp), ' ') != NULL) ) {
+		       if( (index(FIRST_ARGSTR(argp), ',') != NULL) ) {
 			 sscanf(FIRST_ARGSTR(argp),"%ld,%ld", &seed1, &seed2);
                          setall(seed1,seed2);
                        }