Sign Up
Log In
Log In
or
Sign Up
Places
All Projects
Status Monitor
Collapse sidebar
Please login to access the resource
devel:ARM:Factory:Contrib:ILP32
symmetrica
return-value.patch
Overview
Repositories
Revisions
Requests
Users
Attributes
Meta
File return-value.patch of Package symmetrica
From: Jan Engelhardt <jengelh@inai.de> Date: 2020-10-26 16:57:34.477468291 +0100 hiccup.c:1109:1: error: no return statement in function returning non-void [-Werror=return-type] etc. --- src/hiccup.c | 10 ++++++++++ src/lo.c | 2 +- src/mo.c | 5 +++++ src/mod_dg_sbd.c | 2 ++ src/nc.c | 1 + src/pr.c | 2 ++ src/rest.c | 12 ++++++------ src/rh.c | 32 +++++++++++++++++++++++++++----- 8 files changed, 54 insertions(+), 12 deletions(-) Index: symmetrica-3.0.1/src/hiccup.c =================================================================== --- symmetrica-3.0.1.orig/src/hiccup.c +++ symmetrica-3.0.1/src/hiccup.c @@ -825,6 +825,7 @@ int hecke_action ( tableau, permutation b_sn_l(tab_mo,NULL,list); hecke_action_perm_on_lc(list,perm_cop); /* perm_cop freed in hecke_action_perm_on_lc */ + return 0; } static INT axel_ll,axel_kk; @@ -1106,6 +1107,7 @@ static int standardise_tableau_list ( li set_multiplier(S_MO_K(S_L_S(a))); standardise_tableau(S_MO_S(S_L_S(a)),expression); } + return 0; } @@ -1140,6 +1142,7 @@ static int standardise_tableau ( tableau garnir_juggle(tableau,(INT)0,(INT)((swaps&1) ? -1 : 1)); + return 0; } @@ -1218,6 +1221,7 @@ static int garnir_juggle ( tableau, pow } freeall(store); + return 0; } @@ -1297,6 +1301,7 @@ static int garnir_generate ( head, wag) } garnir_len--; /* restores value */ + return 0; } @@ -1356,6 +1361,7 @@ static int garnir_result ( tableau, mp_ insert(mp_coeff,S_MO_K(S_L_S(a)),add_koeff,NULL); } } + return 0; } @@ -1404,6 +1410,7 @@ INT enter_list_to_matrix ( matrix, colum } while (express!=NULL && empty_listp(S_MO_K(S_L_S(express)))); } } + return 0; } @@ -3064,6 +3071,7 @@ INT remove_mp_qnumber_fac ( mp, qn) C_O_K(accumulate,EMPTY); freeall(accumulate); } + return 0; } @@ -3140,6 +3148,7 @@ INT remove_vec_qnumber ( qn) INT qn; } /* the quotient remains in poly and there are no entries q^root & above */ + return 0; } @@ -3448,6 +3457,7 @@ INT free_cyclotomic_parameters () c_vec=NULL; c_root=0; } + return 0; } Index: symmetrica-3.0.1/src/lo.c =================================================================== --- symmetrica-3.0.1.orig/src/lo.c +++ symmetrica-3.0.1/src/lo.c @@ -30,7 +30,7 @@ static INT longint_speicher_ende(); static INT nofolgezeichen=0; -INT set_lo_nopoint(para) INT para; { nofolgezeichen=para; } +INT set_lo_nopoint(para) INT para; { nofolgezeichen=para; return 0; } static INT ganzadd(); static INT ganzanfang(); Index: symmetrica-3.0.1/src/mo.c =================================================================== --- symmetrica-3.0.1.orig/src/mo.c +++ symmetrica-3.0.1/src/mo.c @@ -1323,6 +1323,7 @@ static struct ak * ak_tmpfile() a->ptr = NULL; #endif init_mat(); + return 0; } static INT ak_rewind(a) struct ak *a; @@ -1396,14 +1397,17 @@ static INT mat_size; INT tl_set_prime(p) INT p; { tl_prime = p; + return 0; } INT tl_set_max_numb(p) INT p; { tl_max_numb = p; + return 0; } INT tl_set_index_inc(p) INT p; { tl_index_inc = p; + return 0; } #ifdef UNDEF #define PRIME 9973 /* 40993 */ @@ -1503,6 +1507,7 @@ TL_2BYTE koeff; } + return 0; } Index: symmetrica-3.0.1/src/mod_dg_sbd.c =================================================================== --- symmetrica-3.0.1.orig/src/mod_dg_sbd.c +++ symmetrica-3.0.1/src/mod_dg_sbd.c @@ -60,6 +60,7 @@ static INT println_bid(a) OP a; } printf("\n");zeilenposition=0; + return 0; } static INT make_basis(e,prim,v) OP e; OP prim; @@ -387,6 +388,7 @@ INT kk_280604 (part,e,prim) OP part,e,pr } freeall(a); close_zero_one(); + return 0; } Index: symmetrica-3.0.1/src/nc.c =================================================================== --- symmetrica-3.0.1.orig/src/nc.c +++ symmetrica-3.0.1/src/nc.c @@ -2038,6 +2038,7 @@ static INT J_matrix(n,q,m) OP n,q,m; FORALL(y,m,{ null_ff_given_q(q,y); }); for (j=0;j<S_M_HI(m);j++) eins_ff_given_q(q,S_M_IJ(m,j,j)); for (j=1;j<S_M_HI(m);j++) eins_ff_given_q(q,S_M_IJ(m,j,j-1)); + return 0; } static INT all_blocks(n,q,v) OP n,q,v; Index: symmetrica-3.0.1/src/pr.c =================================================================== --- symmetrica-3.0.1.orig/src/pr.c +++ symmetrica-3.0.1/src/pr.c @@ -210,6 +210,7 @@ INT prsym(lambda, T_v) OP lambda, T_v; freeall(G); freeall(kk); freeall(gg); + return 0; } typedef INT PR_INTARRAY[PR_RH_MAX]; @@ -316,6 +317,7 @@ static INT rh_ccstka(tab,st,k,um,m,pa,n) } } } + return 0; } Index: symmetrica-3.0.1/src/rest.c =================================================================== --- symmetrica-3.0.1.orig/src/rest.c +++ symmetrica-3.0.1/src/rest.c @@ -5056,12 +5056,12 @@ INT words_jn=0; INT point(a,b,c) OP a,b,c; /* a is a permutation pi c = pi(b) */ -{ COPY(S_P_I(a,S_I_I(b)-1),c); } +{ COPY(S_P_I(a,S_I_I(b)-1),c); return 0; } INT hashv(OP v) { INT erg = OK; return HASH(S_V_I(v,0)); ENDR("hashv"); } INT eqv(OP a,OP b) { INT erg = OK;return EQ(S_V_I(a,0),S_V_I(b,0));ENDR("eqv");} INT orbit_words(erz,root,res,f,sv) OP erz,root,res; INT (*f)(); OP sv; -{ words_jn=1; orbit(erz,root,res,f,sv); words_jn=0; } +{ words_jn=1; orbit(erz,root,res,f,sv); words_jn=0; return 0; } @@ -5196,10 +5196,10 @@ end: static int all_orbits_trace=0; static INT (*all_orbits_rankf)()=NULL; -INT all_orbits_set_trace() { all_orbits_trace=1; } -INT all_orbits_unset_trace() { all_orbits_trace=0; } -INT all_orbits_set_rankf(f) INT (*f)(); { all_orbits_rankf=f; } -INT all_orbits_unset_rankf() { all_orbits_rankf=NULL; } +INT all_orbits_set_trace() { all_orbits_trace=1; return 0; } +INT all_orbits_unset_trace() { all_orbits_trace=0; return 0; } +INT all_orbits_set_rankf(f) INT (*f)(); { all_orbits_rankf=f; return 0; } +INT all_orbits_unset_rankf() { all_orbits_rankf=NULL; return 0; } INT all_orbits(X,erz,bahnen,no,f) OP X,erz,bahnen,no; INT (*f)(); /* berechnet alle bahnen von erz auf der menge X Index: symmetrica-3.0.1/src/rh.c =================================================================== --- symmetrica-3.0.1.orig/src/rh.c +++ symmetrica-3.0.1/src/rh.c @@ -67,6 +67,7 @@ static int del_poly(p) struct REIHE_poly free_eins((char*)*p); *p = NULL; } + return 0; } static int del_mon(m) struct REIHE_mon **m; @@ -81,6 +82,7 @@ static int del_mon(m) struct REIHE_mon * free_zwei((char*)(*m)); *m = NULL; } + return 0; } static int del_var(v) struct REIHE_variablen **v; @@ -92,6 +94,7 @@ static int del_var(v) struct REIHE_varia free_drei((char*)*v); *v = NULL; } + return 0; } static void copy_poly(a,b) struct REIHE_poly **b,*a; @@ -169,11 +172,11 @@ static struct REIHE_variablen *new_drei( { return (struct REIHE_variablen*) SYM_calloc(1,sizeof(struct REIHE_variablen)); } -static int free_drei(a) char *a; { SYM_free(a); } -static int free_zwei(a) char *a; { SYM_free(a); } -static int free_eins(a) char *a; { SYM_free(a); } -static int free_null_debug(a) char *a; { printf("free_null:%p\n",a); SYM_free(a); } -static int free_null(a) char *a; { SYM_free(a); } +static int free_drei(a) char *a; { SYM_free(a); return 0; } +static int free_zwei(a) char *a; { SYM_free(a); return 0; } +static int free_eins(a) char *a; { SYM_free(a); return 0; } +static int free_null_debug(a) char *a; { printf("free_null:%p\n",a); SYM_free(a); return 0; } +static int free_null(a) char *a; { SYM_free(a); return 0; } static struct REIHE_mon *new_zwei() { @@ -237,6 +240,7 @@ INT init_reihe(a) OP a; static int normalisiere_reihe(a) REIHE_zeiger a; { /* entfernen des absoluten Gliedes wegen pletist. Subst. */ a->infozeig->unten=NULL; + return 0; } static int card_reihe(a) REIHE_zeiger a; @@ -259,6 +263,7 @@ static int card_reihe(a) REIHE_zeiger a; zeigpoly=zeigpoly->rechts; } while (zeigpoly!=NULL); } + return 0; } static int card_typ_reihe(a) REIHE_zeiger a; @@ -290,6 +295,7 @@ static int card_typ_reihe(a) REIHE_zeige zeigpoly=zeigpoly->rechts; } while (zeigpoly!=NULL); } + return 0; } @@ -517,6 +523,7 @@ INT Exp_eingabe(root, anzahl) REIHE_zeig freeall(b); freeall(d); freeall(f); + return 0; } @@ -589,6 +596,7 @@ static INT co_261093(root,anzahl,func) R freeall(b); freeall(d); freeall(f); + return 0; } INT Sinus_eingabe(root,anzahl) REIHE_zeiger root; INT anzahl; @@ -882,6 +890,7 @@ static int make_skalar_reihe(a) REIHE_ze scan(scanobjectkind(),(*a)->infozeig->unten->coeff); (*a)->infozeig->unten->zeiger=NULL; (*a)->infozeig->unten->ref=NULL; + return 0; } @@ -987,6 +996,7 @@ static int ausgabe(f, r) REIHE_zeiger r; zeigpoly=zeigpoly->rechts; } while (zeigpoly!=NULL); } + return 0; } static INT reihevergleich (s, r) REIHE_zeiger s,r; @@ -1134,6 +1144,7 @@ static int ableitung_reihe(a,n,c,anzahl } } c->exist+=anzahl; + return 0; } @@ -1197,6 +1208,7 @@ static int copyy_monom(m1,m2) struct REI zvar_eins=zvar_eins->weiter; } while (zvar_eins!=NULL); } + return 0; } @@ -1468,6 +1480,7 @@ static int del_reihe(a) REIHE_zeiger *a; free_null((char*)*a); *a = NULL; } + return 0; } INT copy_reihe(a,b) OP a,b; @@ -1620,6 +1633,7 @@ static int pot_reihe(a,n,c,anzahl) REIH } } c->exist+=anzahl; + return 0; } @@ -1803,6 +1817,7 @@ static int trans_reihe_in_monom(a,m,b,a del_reihe(&help_zwei); *b=help_drei; + return 0; } @@ -1868,6 +1883,7 @@ static int subst_reihe(a,b,c,anzahl) REI (*c)->reihenart=0L; (*c)->exist=anzahl; (*c)->ope='s'; + return 0; } @@ -2045,6 +2061,7 @@ static int transform_reihe(a,n,c,anzahl } } c->exist+=anzahl; + return 0; } INT m_perm_reihe(a) OP a; @@ -2309,6 +2326,7 @@ static int debugprint_rh(a) REIHE_zeiger doffset += 2L; debugprint_rh_poly(a->infozeig); doffset -= 2L; + return 0; } static int debugprint_rh_poly(a) struct REIHE_poly *a; @@ -2333,6 +2351,7 @@ static int debugprint_rh_poly(a) struct doffset += 2L; debugprint_rh_poly(a->rechts); doffset -= 2L; + return 0; } static int debugprint_rh_mon(a) struct REIHE_mon *a; { @@ -2359,6 +2378,7 @@ static int debugprint_rh_mon(a) struct R doffset += 2L; debugprint_rh_mon(a->ref); doffset -= 2L; + return 0; } static int debugprint_rh_var(a) struct REIHE_variablen *a; { @@ -2381,6 +2401,7 @@ static int debugprint_rh_var(a) struct R doffset += 2L; debugprint_rh_var(a->weiter); doffset -= 2L; + return 0; } INT addinvers_reihe(a,b) OP a,b; @@ -2668,6 +2689,7 @@ INT rh_test() freeall(a); freeall(b); freeall(c); freeall(d); freeall(e); freeall(f);freeall(g);freeall(h);freeall(h2); + return 0; } #endif /* REIHETRUE */ #ifdef REIHETRUE
Locations
Projects
Search
Status Monitor
Help
OpenBuildService.org
Documentation
API Documentation
Code of Conduct
Contact
Support
@OBShq
Terms
openSUSE Build Service is sponsored by
The Open Build Service is an
openSUSE project
.
Sign Up
Log In
Places
Places
All Projects
Status Monitor