be more struct; better support fir encodings.
This commit is contained in:
parent
fb966536a9
commit
05a978ce82
2
C/save.c
2
C/save.c
@ -1460,7 +1460,7 @@ OpenRestore(char *inpf, char *YapLibDir, CELL *Astate, CELL *ATrail, CELL *AStac
|
||||
}
|
||||
|
||||
FILE *
|
||||
Yap_OpenRestore(char *inpf, char *YapLibDir)
|
||||
Yap_OpenRestore(const char *inpf, char *YapLibDir)
|
||||
{
|
||||
FILE *stream = NULL;
|
||||
|
||||
|
@ -422,7 +422,8 @@ stream_position_data(Prop, Term, Value) :-
|
||||
'$stream_position_field'(line_position, 3).
|
||||
'$stream_position_field'(byte_count, 4).
|
||||
|
||||
|
||||
'$set_encoding'(Enc) :-
|
||||
stream_property(loop_stream, Enc).
|
||||
|
||||
%! @}
|
||||
|
||||
|
Reference in New Issue
Block a user