/[gcl]/gcl/o/fasdump.c
ViewVC logotype

Diff of /gcl/o/fasdump.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.5 by camm, Mon Jul 29 23:33:41 2002 UTC revision 1.6 by camm, Tue Sep 10 03:35:15 2002 UTC
# Line 1494  read_fasl_vector(object in) Line 1494  read_fasl_vector(object in)
1494                         d->pn.pn_version);                         d->pn.pn_version);
1495       d = coerce_to_namestring(d);       d = coerce_to_namestring(d);
1496       in = open_stream(d,smm_input,Cnil,Cnil);       in = open_stream(d,smm_input,Cnil,Cnil);
1497       if (in == Cnil)       if (in == Cnil)
1498         FEerror("Can't open file ~s",1,d);         FEerror("Can't open file ~s",1,d);
1499     }     }
1500   else if (tem != EOF)   else if (tem != EOF)

Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26