diff options
Diffstat (limited to 'contrib/gcc/f/intrin.def')
-rw-r--r-- | contrib/gcc/f/intrin.def | 13 |
1 files changed, 7 insertions, 6 deletions
diff --git a/contrib/gcc/f/intrin.def b/contrib/gcc/f/intrin.def index 9451a27..5d712ba 100644 --- a/contrib/gcc/f/intrin.def +++ b/contrib/gcc/f/intrin.def @@ -3102,6 +3102,7 @@ DEFSPEC (NONE, 4 (Twice the size of 2) 6 (Twice the size as 3) A Same as first argument + N Not wider than the default kind <arg-len> is: @@ -3218,10 +3219,10 @@ DEFIMP (ALARM, "ALARM", ALARM,,, "--:-:Seconds=I*,Handler=s*,Status=?I1w") DEFIMP (AND, "AND", ,,, "B=:*:I=B*,J=B*") DEFIMP (BESJ0, "BESJ0", L_BESJ0,,, "R=:0:X=R*") DEFIMP (BESJ1, "BESJ1", L_BESJ1,,, "R=:0:X=R*") -DEFIMP (BESJN, "BESJN", L_BESJN,,, "R=:1:N=I*,X=R*") +DEFIMP (BESJN, "BESJN", L_BESJN,,, "R=:1:N=IN,X=R*") DEFIMP (BESY0, "BESY0", L_BESY0,,, "R=:0:X=R*") DEFIMP (BESY1, "BESY1", L_BESY1,,, "R=:0:X=R*") -DEFIMP (BESYN, "BESYN", L_BESYN,,, "R=:1:N=I*,X=R*") +DEFIMP (BESYN, "BESYN", L_BESYN,,, "R=:1:N=IN,X=R*") DEFIMP (BIT_SIZE, "BIT_SIZE", ,,, "I=:0:I=I*i") DEFIMP (BTEST, "BTEST", ,,, "L1:*:I=I*,Pos=I*") DEFIMP (CDABS, "CDABS", ,CDABS,, "R2:-:A=C2") @@ -3242,10 +3243,10 @@ DEFIMPY (DATE, "DATE", DATE,,, "--:-:Date=A1w", TRUE) DEFIMP (DATE_AND_TIME, "DATE_AND_TIME", DATE_AND_TIME,,, "--:-:Date=A1w,Time=?A1w,Zone=?A1w,Values=?I1(8)w") DEFIMP (DBESJ0, "DBESJ0", L_BESJ0,,, "R2:-:X=R2") DEFIMP (DBESJ1, "DBESJ1", L_BESJ1,,, "R2:-:X=R2") -DEFIMP (DBESJN, "DBESJN", L_BESJN,,, "R2:-:N=I*,X=R2") +DEFIMP (DBESJN, "DBESJN", L_BESJN,,, "R2:-:N=IN,X=R2") DEFIMP (DBESY0, "DBESY0", L_BESY0,,, "R2:-:X=R2") DEFIMP (DBESY1, "DBESY1", L_BESY1,,, "R2:-:X=R2") -DEFIMP (DBESYN, "DBESYN", L_BESYN,,, "R2:-:N=I*,X=R2") +DEFIMP (DBESYN, "DBESYN", L_BESYN,,, "R2:-:N=IN,X=R2") DEFIMP (DCONJG, "DCONJG", ,DCONJG,, "C2:-:Z=C2") DEFIMP (DERF, "DERF", L_ERF,DERF,, "R2:-:X=R2") DEFIMP (DERFC, "DERFC", L_ERFC,DERFC,, "R2:-:X=R2") @@ -3258,7 +3259,7 @@ DEFIMP (ERF, "ERF", L_ERF,ERF,, "R=:0:X=R*") DEFIMP (ERFC, "ERFC", L_ERFC,ERFC,, "R=:0:X=R*") DEFIMP (ETIME_func, "ETIME_func", ETIME,,, "R1:-:TArray=R1(2)w") DEFIMP (ETIME_subr, "ETIME_subr", ETIME,,, "--:-:TArray=R1(2)w,Result=R1w") -DEFIMP (EXIT, "EXIT", EXIT,,, "--:-:Status=?I*") +DEFIMP (EXIT, "EXIT", EXIT,,, "--:-:Status=?IN") DEFIMP (FDATE_func, "FDATE_func", FDATE,,, "A1*:-:") DEFIMP (FDATE_subr, "FDATE_subr", FDATE,,, "--:-:Date=A1w") DEFIMP (FGET_func, "FGET_func", FGET,,, "I1:-:C=A1w") @@ -3277,7 +3278,7 @@ DEFIMP (FSTAT_subr, "FSTAT_subr", FSTAT,,, "--:-:Unit=I*,SArray=I1(13)w,Status=? DEFIMP (FTELL_func, "FTELL_func", FTELL,,, "I1:-:Unit=I*") DEFIMP (FTELL_subr, "FTELL_subr", FTELL,,, "--:-:Unit=I*,Offset=I1w") DEFIMP (GERROR, "GERROR", GERROR,,, "--:-:Message=A1w") -DEFIMP (GETARG, "GETARG", GETARG,,, "--:-:Pos=I*,Value=A1w") +DEFIMP (GETARG, "GETARG", GETARG,,, "--:-:Pos=IN,Value=A1w") DEFIMP (GETCWD_func, "GETCWD_func", GETCWD,,, "I1:-:Name=A1w") DEFIMP (GETCWD_subr, "GETCWD_subr", GETCWD,,, "--:-:Name=A1w,Status=?I1w") DEFIMP (GETGID, "GETGID", GETGID,,, "I1:-:") |