Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
7
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
a1c89c0a
Commit
a1c89c0a
authored
Jul 16, 2002
by
Ken Raeburn
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
* lread.c (Fload): Use SDATA, SSET.
parent
bba772ab
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
3 additions
and
3 deletions
+3
-3
src/lread.c
src/lread.c
+3
-3
No files found.
src/lread.c
View file @
a1c89c0a
...
...
@@ -778,7 +778,7 @@ Return t if file exists. */)
Vloads_in_progress
=
Fcons
(
found
,
Vloads_in_progress
);
}
if
(
!
bcmp
(
&
(
SREF
(
found
,
SBYTES
(
found
)
-
4
))
,
if
(
!
bcmp
(
SDATA
(
found
)
+
SBYTES
(
found
)
-
4
,
".elc"
,
4
))
/* Load .elc files directly, but not when they are
remote and have no handler! */
...
...
@@ -807,9 +807,9 @@ Return t if file exists. */)
fmode
=
"rb"
;
#endif
/* DOS_NT */
stat
((
char
*
)
SDATA
(
efound
),
&
s1
);
S
REF
(
efound
,
SBYTES
(
efound
)
-
1
)
=
0
;
S
SET
(
efound
,
SBYTES
(
efound
)
-
1
,
0
)
;
result
=
stat
((
char
*
)
SDATA
(
efound
),
&
s2
);
S
REF
(
efound
,
SBYTES
(
efound
)
-
1
)
=
'c'
;
S
SET
(
efound
,
SBYTES
(
efound
)
-
1
,
'c'
)
;
UNGCPRO
;
if
(
result
>=
0
&&
(
unsigned
)
s1
.
st_mtime
<
(
unsigned
)
s2
.
st_mtime
)
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment