cl-rw

commit 6ebd3cbd560dd4397cdfcb9c43485e82ef2ed1cc
parent 91686d2cf6f38c9960dc59b68e268fa09285557a
Author: Tomas Hlavaty <tom@logand.com>
Date:   Sun, 12 Oct 2014 15:32:30 +0200

code in the right order

Diffstat:
M
tls.lisp
 | 
8
++++----

1 file changed, 4 insertions(+), 4 deletions(-)
diff --git a/tls.lisp b/tls.lisp
@@ -417,15 +417,15 @@
   ($ECParameters curve_params)
   ($ECPoint public))
 
+(defstruc %$SignatureHashAlgorithm ()
+  ($HashAlgorithm hash)
+  (%$SignatureHashAlgorithmSignature signature))
+
 (defstruc %$ECSASignature () ;; digitally-signed
   (%$SignatureHashAlgorithm algorithm)
   (u16 length #+nil :compute #+nil(ShaSize))
   (u8 sha_hash :size length))
 
-(defstruc %$SignatureHashAlgorithm ()
-  ($HashAlgorithm hash)
-  (%$SignatureHashAlgorithmSignature signature))
-
 (defstruc $Signature ()
   (computed algorithm :compute (SignatureAlgorithm))
   ((ecase algorithm