Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

cosdebug remove multiple definition cosdebug defined and used in scic…

…os.c

Change-Id: I1b1d1d08179acd6a916d6f3a80f9cc8956cfa1e8
  • Loading branch information...
commit 5e969d42431f4db154a1b5b9224781e0df17dbc9 1 parent 581b790
Allan CORNET authored Vincent COUVERT committed
Showing with 0 additions and 10 deletions.
  1. +0 −10 scilab/modules/core/src/fortran/inisci.f
View
10 scilab/modules/core/src/fortran/inisci.f
@@ -22,12 +22,6 @@ subroutine inisci( ini1, vsizr, ierr)
include 'stack.h'
parameter (nz1=nsiz-1,nz2=nsiz-2)
c
-c
-c common for scicos debug mode
-
- common /cosdebug/ cosd
- integer cosd
-
c common for Control-C interruptions
logical iflag,interruptible
common /basbrk/ iflag,interruptible
@@ -147,10 +141,6 @@ subroutine inisci( ini1, vsizr, ierr)
c . ------------------
ddt = 0
-c
-c . scicos initial debug mode
- cosd = 0
-c
c . initial type names
c . ------------------
call inittypenames()
Please sign in to comment.
Something went wrong with that request. Please try again.