← Back to branch summary

~ubuntu-branches/ubuntu/warty/petsc/warty

« back to all changes in this revision

Viewing changes to src/fortran/auto/aof.c

  • Committer: Bazaar Package Importer
  • Author(s): Adam C. Powell, IV
  • Date: 2004-06-07 13:41:43 UTC
  • mfrom: (1.1.1 upstream)
  • Revision ID: james.westby@ubuntu.com-20040607134143-92p586zrauvie0le
Tags: 2.2.0-2
http://bugs.debian.org/249617
* Upstream patch level 2.
* New PETSC_BOPT_EXTRA option for different BOPT and lib names, with _c++
  symlinks only for plain and single (closes: #249617).
* New DEBIAN_DIST=contrib option to link with hypre, parmetis (closes:
  #249619).
* Combined petsc-c and petsc-fortran substvars into petsc-compilers.
* Extra quote in -dev prerm eliminates "too many arguments" problem.

Show diffs side-by-side

added added

removed removed

Lines of Context:
src/fortran/auto/aof.c
190
190
        (AO)PetscToPointer( (ao) ),
191
191
        (IS)PetscToPointer( (is) ));
192
192
}
193
 
void PETSC_STDCALL aopetsctoapplication_(AO ao,int *n,int *ia, int *ierr ){
 
193
void PETSC_STDCALL aopetsctoapplication_(AO ao,int *n,int ia[], int *ierr ){
194
194
*ierr = AOPetscToApplication(
195
195
        (AO)PetscToPointer( (ao) ),*n,ia);
196
196
}
197
 
void PETSC_STDCALL aoapplicationtopetsc_(AO ao,int *n,int *ia, int *ierr ){
 
197
void PETSC_STDCALL aoapplicationtopetsc_(AO ao,int *n,int ia[], int *ierr ){
198
198
*ierr = AOApplicationToPetsc(
199
199
        (AO)PetscToPointer( (ao) ),*n,ia);
200
200
}
201
 
void PETSC_STDCALL aopetsctoapplicationpermuteint_(AO ao,int *block,int *array, int *ierr ){
 
201
void PETSC_STDCALL aopetsctoapplicationpermuteint_(AO ao,int *block,int array[], int *ierr ){
202
202
*ierr = AOPetscToApplicationPermuteInt(
203
203
        (AO)PetscToPointer( (ao) ),*block,array);
204
204
}
205
 
void PETSC_STDCALL aoapplicationtopetscpermuteint_(AO ao,int *block,int *array, int *ierr ){
 
205
void PETSC_STDCALL aoapplicationtopetscpermuteint_(AO ao,int *block,int array[], int *ierr ){
206
206
*ierr = AOApplicationToPetscPermuteInt(
207
207
        (AO)PetscToPointer( (ao) ),*block,array);
208
208
}
209
 
void PETSC_STDCALL aopetsctoapplicationpermutereal_(AO ao,int *block,double *array, int *ierr ){
 
209
void PETSC_STDCALL aopetsctoapplicationpermutereal_(AO ao,int *block,double array[], int *ierr ){
210
210
*ierr = AOPetscToApplicationPermuteReal(
211
211
        (AO)PetscToPointer( (ao) ),*block,array);
212
212
}
213
 
void PETSC_STDCALL aoapplicationtopetscpermutereal_(AO ao,int *block,double *array, int *ierr ){
 
213
void PETSC_STDCALL aoapplicationtopetscpermutereal_(AO ao,int *block,double array[], int *ierr ){
214
214
*ierr = AOApplicationToPetscPermuteReal(
215
215
        (AO)PetscToPointer( (ao) ),*block,array);
216
216
}