diff options
author | Ken Raeburn <[email protected]> | 2002-07-16 15:49:38 +0000 |
---|---|---|
committer | Ken Raeburn <[email protected]> | 2002-07-16 15:49:38 +0000 |
commit | a1c89c0a12b0c7e516e8b87253f1bb160795efd6 (patch) | |
tree | c26a82abb75a235208e4219f8d7c2ceca9336a8a /src | |
parent | bba772ab93b877c524745e63cab4e05832975c7d (diff) |
* lread.c (Fload): Use SDATA, SSET.
Diffstat (limited to 'src')
-rw-r--r-- | src/lread.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/lread.c b/src/lread.c index 3b06968e08..6fd967da45 100644 --- a/src/lread.c +++ b/src/lread.c @@ -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); - SREF (efound, SBYTES (efound) - 1) = 0; + SSET (efound, SBYTES (efound) - 1, 0); result = stat ((char *)SDATA (efound), &s2); - SREF (efound, SBYTES (efound) - 1) = 'c'; + SSET (efound, SBYTES (efound) - 1, 'c'); UNGCPRO; if (result >= 0 && (unsigned) s1.st_mtime < (unsigned) s2.st_mtime) |