zongor
/
mmo-project
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix db comments

This commit is contained in:
zongor 2023-10-14 09:55:50 -04:00
parent 7b7ec7d1de
commit cd803751d9
2 changed files with 0 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
fortran/server/src/db.f90
View File

@ -119,7 +119,6 @@ contains
end function db_add_user end function db_add_user
integer function db_delete_user(db, username) result(rc) integer function db_delete_user(db, username) result(rc)
!! Adds student to database.
type(db_type), intent(inout) :: db type(db_type), intent(inout) :: db
character(len=*), intent(in) :: username character(len=*), intent(in) :: username
type(c_ptr) :: stmt type(c_ptr) :: stmt
@ -141,7 +140,6 @@ contains
end function db_delete_user end function db_delete_user
integer function db_get_logged_in_users(db, connection) result(rc) integer function db_get_logged_in_users(db, connection) result(rc)
!! Prints number of courses per student to standard output.
type(db_type), intent(inout) :: db type(db_type), intent(inout) :: db
integer(c_int), intent(inout) :: connection integer(c_int), intent(inout) :: connection
character(len=*), parameter :: TCP_SUFFIX = c_carriage_return // c_new_line // c_null_char character(len=*), parameter :: TCP_SUFFIX = c_carriage_return // c_new_line // c_null_char
@ -274,7 +272,6 @@ contains
end function db_move_user end function db_move_user
subroutine db_error(code, proc, err_msg) subroutine db_error(code, proc, err_msg)
!! Prints error message.
integer, intent(in) :: code integer, intent(in) :: code
character(len=*), intent(in), optional :: proc character(len=*), intent(in), optional :: proc
character(len=*), intent(in), optional :: err_msg character(len=*), intent(in), optional :: err_msg

4
fortran/www/src/db.f90
View File

@ -72,7 +72,6 @@ contains
integer function db_add_user(db, username, password, apperance_r, apperance_g, apperance_b, & integer function db_add_user(db, username, password, apperance_r, apperance_g, apperance_b, &
x_pos, y_pos, logged_in, created) result(rc) x_pos, y_pos, logged_in, created) result(rc)
!! Adds student to database.
type(db_type), intent(inout) :: db type(db_type), intent(inout) :: db
character(len=*), intent(in) :: username character(len=*), intent(in) :: username
character(len=*), intent(in) :: password character(len=*), intent(in) :: password
@ -120,7 +119,6 @@ contains
integer function db_delete_user(db, username) result(rc) integer function db_delete_user(db, username) result(rc)
!! Adds student to database.
type(db_type), intent(inout) :: db type(db_type), intent(inout) :: db
character(len=*), intent(in) :: username character(len=*), intent(in) :: username
type(c_ptr) :: stmt type(c_ptr) :: stmt
@ -142,7 +140,6 @@ contains
end function db_delete_user end function db_delete_user
integer function db_count_logged_in_users(db) result(rc) integer function db_count_logged_in_users(db) result(rc)
!! Prints number of courses per student to standard output.
type(db_type), intent(inout) :: db type(db_type), intent(inout) :: db
type(c_ptr) :: stmt type(c_ptr) :: stmt
@ -173,7 +170,6 @@ contains
end function db_count_logged_in_users end function db_count_logged_in_users
integer function db_get_logged_in_users(db) result(rc) integer function db_get_logged_in_users(db) result(rc)
!! Prints number of courses per student to standard output.
type(db_type), intent(inout) :: db type(db_type), intent(inout) :: db
type(c_ptr) :: stmt type(c_ptr) :: stmt