diff --git a/lib/chibi/net.sld b/lib/chibi/net.sld
index 09542fe7..011d954c 100644
--- a/lib/chibi/net.sld
+++ b/lib/chibi/net.sld
@@ -11,7 +11,7 @@
           address-family/unix address-family/inet address-family/inet6
           address-family/unspecified
           socket-type/stream socket-type/datagram socket-type/raw
-          ip-proto/ip ip-proto/tcp ip-proto/udp
+          ip-proto/ip ip-proto/icmp ip-proto/tcp ip-proto/udp
           ai/passive ai/canonname ai/numeric-host
           get-socket-option set-socket-option! level/socket
           socket-opt/debug socket-opt/broadcast socket-opt/reuseaddr
diff --git a/lib/chibi/net.stub b/lib/chibi/net.stub
index 9e8115a1..35137b48 100644
--- a/lib/chibi/net.stub
+++ b/lib/chibi/net.stub
@@ -87,6 +87,7 @@
 (define-c-const int (socket-type/datagram "SOCK_DGRAM"))
 (define-c-const int (socket-type/raw "SOCK_RAW"))
 (define-c-const int (ip-proto/ip "IPPROTO_IP"))
+(define-c-const int (ip-proto/icmp "IPPROTO_ICMP"))
 (define-c-const int (ip-proto/tcp "IPPROTO_TCP"))
 (define-c-const int (ip-proto/udp "IPPROTO_UDP"))
 (define-c-const int (ai/passive "AI_PASSIVE"))