Skip to content

Commit 28ef070

Browse files
committed
:mips and :linux uses ELF obj header, which is not exists at 'Y. Kuniyoshi (Dec. 20, 1993)'
1 parent 5cf1091 commit 28ef070

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

lisp/l/loader.l

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -107,7 +107,7 @@
107107
(cond ((member :vax *features*) (list #x07 #x01))
108108
((member :irix *features*) (list #x7f #\E #\L #\F))
109109
((member :irix6 *features*) (list #x7f #\E #\L #\F))
110-
((member :mips *features*) (list #x62 #x1))
110+
((and (member :mips *features*) (not (member :linux *features*))) (list #x62 #x1))
111111
((member :Solaris2 *features*) (list #x7f #\E #\L #\F))
112112
((member :darwin *features*) (list '(#xcf #xca #xce) '(#xfa #xfe #xfa) '(#xed #xba #xed) '(#xfe #x #xbe #xfe)))
113113
((member :linux *features*) (list #x7f #\E #\L #\F))

0 commit comments

Comments
 (0)