diff --git a/src/mezz/codec-ssh-key.reb b/src/mezz/codec-ssh-key.reb
index aace2608f9..26607c056f 100644
--- a/src/mezz/codec-ssh-key.reb
+++ b/src/mezz/codec-ssh-key.reb
@@ -145,8 +145,8 @@ wrap [
 				"DH PARAMETERS" [
 					parse data [
 						'SEQUENCE into [
-							'INTEGER set p binary!
-							'INTEGER set g binary!
+							'INTEGER set p: binary!
+							'INTEGER set g: binary!
 						] (
 							return dh-init :g :p
 						)