fix Cr2p having Inplace but a type-spec - PDLPorters/pdl#511

PDLPorters · Dec 27, 2024 · 4467298 · 4467298
1 parent ecc0789
commit 4467298
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 1 deletion.
diff --git a/Changes b/Changes
@@ -1,2 +1,4 @@
+- fix Cr2p having Inplace but a type-spec (https://github.com/PDLPorters/pdl/issues/511)
+
 2.010 2024-11-26
 - split out from PDL 2.095
diff --git a/complex.pd b/complex.pd
@@ -492,8 +492,9 @@ pp_def 'i2C',
 ;
 
 pp_def 'Cr2p',
-       Pars => 'r(m=2); float+ [o]p(m=2)',
+       Pars => 'r(m=2); [o]p(m=2)',
        Inplace => 1,
+       GenericTypes => $F,
        Doc => 'convert complex numbers in rectangular form to polar (mod,arg) form. Works inplace',
        Code => q!
           $GENERIC() x = $r(m=>0);