From 651d0aff98d28e2db146afa1790e9e22f3ef22db Mon Sep 17 00:00:00 2001 From: "Ralf S. Engelschall" Date: Tue, 22 Dec 1998 15:04:48 +0000 Subject: Various cleanups and fixed by Marc and Ralf to start the OpenTLS project --- crypto/perlasm/f | 19 ------------------- 1 file changed, 19 deletions(-) delete mode 100644 crypto/perlasm/f (limited to 'crypto/perlasm') diff --git a/crypto/perlasm/f b/crypto/perlasm/f deleted file mode 100644 index 80da809107..0000000000 --- a/crypto/perlasm/f +++ /dev/null @@ -1,19 +0,0 @@ -sub out3 - { - local($name,$p1,$p2,$p3)=@_; - - push(@out,"\t$name\t"); - $l=length($p1)+1; - push(@out,$p1.","); - $ll=4-($l+9)/8; - $tmp1=sprintf("\t" x $ll); - push(@out,$tmp1); - - $l=length($p2)+1; - push(@out,$p2.","); - $ll=4-($l+9)/8; - $tmp1=sprintf("\t" x $ll); - push(@out,$tmp1); - - push(@out,&conv($p3)."\n"); - } -- cgit v1.2.3