Skip to content

Commit

Permalink
Source cleaned from trailing spaces, tabs, and special characters
Browse files Browse the repository at this point in the history 
OBJECT file lists sorted


svn-origin-rev: 12197
  • Loading branch information
@mkrack
mkrack committed Mar 21, 2012
1 parent 241d9f1 commit b22f3ea
Show file tree
Hide file tree
Showing 797 changed files with 31,137 additions and 31,136 deletions.
130 changes: 65 additions & 65 deletions src/OBJECTDEFS
View file

Large diffs are not rendered by default.

42 changes: 21 additions & 21 deletions src/_el_typename__list_types.template
View file
Original file line number Diff line number Diff line change
Expand Up @@ -6,26 +6,26 @@
! *****************************************************************************
!> \brief represent a simple array based list of the given type
!> \note
!> ____ _ _ __ __ _ _ __ _____ _ _ _____ _ _ _
!> ____ _ _ __ __ _ _ __ _____ _ _ _____ _ _ _
!> | _ \ ___ _ __ ( ) |_ | \/ | ___ __| (_)/ _|_ _ |_ _| |__ (_)___ | ___(_) | ___| |
!> | | | |/ _ \| '_ \|/| __| | |\/| |/ _ \ / _` | | |_| | | | | | | '_ \| / __| | |_ | | |/ _ \ |
!> | |_| | (_) | | | | | |_ | | | | (_) | (_| | | _| |_| | | | | | | | \__ \ | _| | | | __/_|
!> |____/ \___/|_| |_| \__| |_| |_|\___/ \__,_|_|_| \__, | |_| |_| |_|_|___/ |_| |_|_|\___(_)
!> |___/
!> ____ _ ___ _ _ _ _
!> / ___| | ___ ___ ___ |_ _|_ __ ___ _ __ ___ ___ __| (_) __ _| |_ ___| |_ _
!> |___/
!> ____ _ ___ _ _ _ _
!> / ___| | ___ ___ ___ |_ _|_ __ ___ _ __ ___ ___ __| (_) __ _| |_ ___| |_ _
!> | | | |/ _ \/ __|/ _ \ | || '_ ` _ \| '_ ` _ \ / _ \/ _` | |/ _` | __/ _ \ | | | |
!> | |___| | (_) \__ \ __/ | || | | | | | | | | | | __/ (_| | | (_| | || __/ | |_| |
!> \____|_|\___/|___/\___| |___|_| |_| |_|_| |_| |_|\___|\__,_|_|\__,_|\__\___|_|\__, |
!> |___/
!> _____ _ _ _____ _ _ _
!> |___/
!> _____ _ _ _____ _ _ _
!> |_ _| |__ (_)___ | ___(_) | ___| |
!> | | | '_ \| / __| | |_ | | |/ _ \ |
!> | | | | | | \__ \ | _| | | | __/_|
!> |_| |_| |_|_|___/ |_| |_|_|\___(_)
!>
!>
!> This is a template
!>
!>
!> **** DO NOT MODIFY THE .F FILES ****
!> modify the .template and .instantition instead
!> \par History
Expand All @@ -49,7 +49,7 @@ MODULE [el_typename]_list_types
PUBLIC :: [el_typename]_list_type, [el_typename]_list_p_type
PUBLIC :: [el_typename]_list_create, [el_typename]_list_retain,&
[el_typename]_list_release

!***

! *****************************************************************************
Expand Down Expand Up @@ -93,8 +93,8 @@ CONTAINS
!> will deallocate it (defaults to true)
!> \param n_els number of elements in the list (at least one els_ptr or
!> n_els should be given)
!> \param error variable to control error logging, stopping,...
!> see module cp_error_handling
!> \param error variable to control error logging, stopping,...
!> see module cp_error_handling
!> \par History
!> 08.2003 created [fawzi]
!> \author Fawzi Mohamed
Expand All @@ -106,7 +106,7 @@ SUBROUTINE [el_typename]_list_create(list, els_ptr, &
LOGICAL, INTENT(in), OPTIONAL :: owns_els
INTEGER, INTENT(in), OPTIONAL :: n_els
TYPE(cp_error_type), INTENT(inout) :: error

LOGICAL :: failure
CHARACTER(len=*), PARAMETER :: routineN='[el_typename]_list_create',&
routineP=moduleN//':'//routineN
Expand Down Expand Up @@ -146,22 +146,22 @@ END SUBROUTINE [el_typename]_list_create
! *****************************************************************************
!> \brief retains a list (see doc/ReferenceCounting.html)
!> \param list the list to retain
!> \param error variable to control error logging, stopping,...
!> see module cp_error_handling
!> \param error variable to control error logging, stopping,...
!> see module cp_error_handling
!> \par History
!> 08.2003 created [fawzi]
!> \author Fawzi Mohamed
! *****************************************************************************
SUBROUTINE [el_typename]_list_retain(list, error)
TYPE([el_typename]_list_type), POINTER :: list
TYPE(cp_error_type), INTENT(inout) :: error

LOGICAL :: failure
CHARACTER(len=*), PARAMETER :: routineN='[el_typename]_list_retain',&
routineP=moduleN//':'//routineN

failure=.FALSE.

CPPrecondition(ASSOCIATED(list),cp_failure_level,routineP,error,failure)
IF (.NOT. failure) THEN
CPPrecondition(list%ref_count>0,cp_failure_level,routineP,error,failure)
Expand All @@ -172,23 +172,23 @@ END SUBROUTINE [el_typename]_list_retain
! *****************************************************************************
!> \brief releases a list (see doc/ReferenceCounting.html)
!> \param list the list to release
!> \param error variable to control error logging, stopping,...
!> see module cp_error_handling
!> \param error variable to control error logging, stopping,...
!> see module cp_error_handling
!> \par History
!> 08.2003 created [fawzi]
!> \author Fawzi Mohamed
! *****************************************************************************
SUBROUTINE [el_typename]_list_release(list, error)
TYPE([el_typename]_list_type), POINTER :: list
TYPE(cp_error_type), INTENT(inout) :: error

LOGICAL :: failure
CHARACTER(len=*), PARAMETER :: routineN='[el_typename]_list_release',&
routineP=moduleN//':'//routineN
INTEGER :: stat

failure=.FALSE.

IF (ASSOCIATED(list)) THEN
CPPrecondition(list%ref_count>0,cp_failure_level,routineP,error,failure)
list%ref_count=list%ref_count-1
Expand All @@ -206,7 +206,7 @@ SUBROUTINE [el_typename]_list_release(list, error)
NULLIFY(list)
END SUBROUTINE [el_typename]_list_release

! template def put here so that line numbers in template and derived
! template def put here so that line numbers in template and derived
! files are almost the same (multi-line use change it a bit)
! [template(el_typename,el_type,USE,deallocate_els_code)]

Expand Down
Loading

0 comments on commit b22f3ea

Please sign in to comment.