diff --git a/ChangeLog b/ChangeLog
index f6788a4..6654ea7 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2019-01-05  Ben Elliston  <bje@gnu.org>
+
+	* config.sub (shl): Recognise.
+	* testsuite/config-sub.data: Add a test case.
+
 2019-01-05  Ben Elliston  <bje@gnu.org>
 
 	* config.sub: Move v70, w65 and others into sort order.
diff --git a/config.sub b/config.sub
index 037baec..3b4c762 100755
--- a/config.sub
+++ b/config.sub
@@ -1231,7 +1231,8 @@ case $cpu-$vendor in
 			| riscv | riscv32 | riscv64 \
 			| rl78 | romp | rs6000 | rx \
 			| score \
-			| sh | sh[1234] | sh[24]a | sh[24]ae[lb] | sh[23]e | she[lb] | sh[lb]e \
+			| sh | shl \
+			| sh[1234] | sh[24]a | sh[24]ae[lb] | sh[23]e | she[lb] | sh[lb]e \
 			| sh[1234]e[lb] |  sh[12345][lb]e | sh[23]ele | sh64 | sh64le \
 			| sparc | sparc64 | sparc64b | sparc64v | sparc86x | sparclet \
 			| sparclite \
diff --git a/testsuite/config-sub.data b/testsuite/config-sub.data
index 5cdd872..0aa3e8f 100644
--- a/testsuite/config-sub.data
+++ b/testsuite/config-sub.data
@@ -526,6 +526,8 @@ sheb						sheb-unknown-none
 sh-elf						sh-unknown-elf
 sh-elf						sh-unknown-elf
 sh-hms						sh-hitachi-hms
+shl						shl-unknown-none
+shl-elf						shl-unknown-elf
 shle-elf					shle-unknown-elf
 shle						shle-unknown-none
 sh						sh-unknown-none