[v4 beta 4] Import [Corrigé]
Publié : dim. 26/févr./2006 21:47
Bonsoir à tous.
Je viens de télécharger la version 4 Béta 4 et j'ai un code qui fonctionnait avec la béta 3 et qui ne fonctionne plus avec celle-ci.
J'obtiens un message d'erreur sur la première ligne après Import "swedll32.lib"
"Garbage to the end of the line"
Alors que ça fonctionnait avant.
Je viens de télécharger la version 4 Béta 4 et j'ai un code qui fonctionnait avec la béta 3 et qui ne fonctionne plus avec celle-ci.

Code : Tout sélectionner
Import "swedll32.lib"
JulDay.d(annee.l,mois.l,jour.l,heure.d,flag.l) As "_swe_julday@24"
RevJul(juliandate.d,flag.l,*annee.l,*mois.l,*jour.l,*heure.l) As "_swe_revjul@28"
Day_Of_Week.l(juliandate.d) As "_swe_day_of_week@8"
DegNorm.d(angle.d) As "_swe_degnorm@8"
Date_conversion.l(annee.l,mois.l,jour.l,heure.d,cal.b,tjd.d) As "_swe_date_conversion@28"
Calc_ut.l(tjd.d,ipl.l,Iflag.l,*x,serr.s) As "_swe_calc_ut@24"
get_planet_name(ipl.l,pname.s) As "_swe_get_planet_name@8"
deltat.d(tjd.d) As "_swe_deltat@8"
pheno.l(tjd.d,ipl.l,Iflag.l,*attr,serr.s) As "_swe_pheno@24"
rise_trans.l(tjd.d,ipl.l,starname.s,epheflag.l,rsmi.l,*geopos,atpress.d,attemp.d,*tret,serr.s) As "_swe_rise_trans@52"
houses_ex.l(tjd.d,Iflag.l,geolat.d,geolon.d,ihsy.l,*cusp,*ascmc) As "_swe_houses_ex@40"
sidtime.d(tjd.d) As "_swe_sidtime@8"
houses_armc.l(armc.d,geolat.d,eps.d,ihsy.l,*cusp,*ascmc) As "_swe_houses_armc@36"
EndImport
"Garbage to the end of the line"
Alors que ça fonctionnait avant.