Subversion Repositories wimsdev

Rev

Rev 17465 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 17465 Rev 17616
Line 86... Line 86...
86 
  exam_currscore(t1);
 86 
  exam_currscore(t1);
87 
  if(exam_scoredata[t2-1]!=-1000) {
 87 
  if(exam_scoredata[t2-1]!=-1000) {
88 
    snprintf(dbuf,sizeof(dbuf),"%.1f",exam_scoredata[t2-1]);
 88 
    snprintf(dbuf,sizeof(dbuf),"%.1f",exam_scoredata[t2-1]);
89 
    setvar("wims_exo_lastscore",dbuf);
 89 
    setvar("wims_exo_lastscore",dbuf);
90 
    /* Do we need to erase subsession? */
 90 
    /* Do we need to erase subsession? */
- 
 
 91 
    /* cannot see the page of the statement because of the user_error */
91 
    user_error("exam_exo_finished");
 92 
    user_error("exam_exo_finished");
92 
  }
 93 
  }
93 
  skipped:
 94 
  skipped:
94 
  snprintf(session_prefix,sizeof(session_prefix),"%s/%s",session_dir,ps);
 95 
  snprintf(session_prefix,sizeof(session_prefix),"%s/%s",session_dir,ps);
95 
  snprintf(vbuf,sizeof(vbuf),"%s/var",session_prefix);
 96 
  snprintf(vbuf,sizeof(vbuf),"%s/var",session_prefix);
Line 186... Line 187...
186 
  }
 187 
  }
187 
  else { /* First time call: register starting time */
 188 
  else { /* First time call: register starting time */
188 
    char *p1, tbuf[MAX_LINELEN+1];
 189 
    char *p1, tbuf[MAX_LINELEN+1];
189 
    snprintf(dbuf,sizeof(dbuf),"%u",(unsigned int) nowtime);
 190 
    snprintf(dbuf,sizeof(dbuf),"%u",(unsigned int) nowtime);
190 
    accessfile(dbuf,"w","%s",vbuf); start=nowtime;
 191 
    accessfile(dbuf,"w","%s",vbuf); start=nowtime;
191 
/*  variable initializing before
 192 
/*  variable initializing before
192 
    if(pc==NULL) pc=getvar("wims_class");
 193 
    if(pc==NULL) pc=getvar("wims_class");
193 
    if(pc==NULL) pc="";
 194 
    if(pc==NULL) pc="";
194 
    pu=getvar("wims_user"); if(pu==NULL) pu="";*/
 195 
    pu=getvar("wims_user"); if(pu==NULL) pu="";*/
195 
    snprintf(vbuf,sizeof(vbuf),"%s/%s/.parmreg", class_base, pc);
 196 
    snprintf(vbuf,sizeof(vbuf),"%s/%s/.parmreg", class_base, pc);
196 
    mkdirs(vbuf);
 197 
    mkdirs(vbuf);