updates for MPB 0.4; drop Julia 0.3

.travis.yml

@@ -3,7 +3,6 @@ os:
   - linux
   - osx
 julia:
-  - 0.3
   - 0.4
   - nightly
 env:

REQUIRE

@@ -1,4 +1,3 @@
-julia 0.3
+julia 0.4
 GLPK 0.2.8
-MathProgBase 0.3.0 0.4.0-
-Compat 0.7.1
+MathProgBase 0.4.0 0.5.0-

src/GLPKInterfaceBase.jl

@@ -1,7 +1,5 @@
 module GLPKInterfaceBase
 
-using Compat
-
 import GLPK
 
 importall MathProgBase.SolverInterface
@@ -31,7 +29,7 @@ export
     getrawsolver
 
 
-abstract GLPKMathProgModel <: AbstractMathProgModel
+abstract GLPKMathProgModel <: AbstractLinearQuadraticModel
 
 function loadproblem!(lpm::GLPKMathProgModel, filename::AbstractString)
     if endswith(filename, ".mps") || endswith(filename, ".mps.gz")

src/GLPKInterfaceLP.jl

@@ -1,14 +1,11 @@
 module GLPKInterfaceLP
 
-using Compat
-
 import GLPK
 importall MathProgBase.SolverInterface
 importall ..GLPKInterfaceBase
 
 export
     GLPKSolverLP,
-    model,
     optimize!,
     loadproblem!,
     writeproblem,
@@ -39,7 +36,7 @@ export
     getinfeasibilityray,
     getunboundedray
 
-@compat type GLPKMathProgModelLP <: GLPKMathProgModel
+type GLPKMathProgModelLP <: GLPKMathProgModel
     inner::GLPK.Prob
     method::Symbol
     param::Union{GLPK.SimplexParam, GLPK.InteriorParam}
@@ -61,7 +58,7 @@ type GLPKSolverLP <: AbstractMathProgSolver
     end
 end
 
-function model(s::GLPKSolverLP)
+function LinearQuadraticModel(s::GLPKSolverLP)
     if s.method == :Simplex || s.method == :Exact
         param = GLPK.SimplexParam()
         if s.presolve

src/GLPKInterfaceMIP.jl

@@ -4,12 +4,9 @@ import GLPK
 importall MathProgBase.SolverInterface
 importall ..GLPKInterfaceBase
 
-using Compat
-
 export
     GLPKSolverMIP,
     GLPKCallbackData,
-    model,
     optimize!,
     loadproblem!,
     writeproblem,
@@ -51,7 +48,7 @@ export
     cbaddcut!,
     cbaddsolution
 
-@compat type GLPKMathProgModelMIP <: GLPKMathProgModel
+type GLPKMathProgModelMIP <: GLPKMathProgModel
     inner::GLPK.Prob
     param::GLPK.IntoptParam
     smplxparam::GLPK.SimplexParam
@@ -168,7 +165,7 @@ function _internal_callback(tree::Ptr{Void}, info::Ptr{Void})
     return
 end
 
-function model(s::GLPKSolverMIP)
+function LinearQuadraticModel(s::GLPKSolverMIP)
     lpm = GLPKMathProgModelMIP()
     lpm.param.msg_lev = GLPK.MSG_ERR
     lpm.smplxparam.msg_lev = GLPK.MSG_ERR
@@ -203,10 +200,10 @@ function model(s::GLPKSolverMIP)
     return lpm
 end
 
-@compat setlazycallback!(m::GLPKMathProgModel, f::Union{Function,Void}) = (m.lazycb = f)
-@compat setcutcallback!(m::GLPKMathProgModel, f::Union{Function,Void}) = (m.cutcb = f)
-@compat setheuristiccallback!(m::GLPKMathProgModel, f::Union{Function,Void}) = (m.heuristiccb = f)
-@compat setinfocallback!(m::GLPKMathProgModel, f::Union{Function,Void}) = (m.infocb = f)
+setlazycallback!(m::GLPKMathProgModel, f::Union{Function,Void}) = (m.lazycb = f)
+setcutcallback!(m::GLPKMathProgModel, f::Union{Function,Void}) = (m.cutcb = f)
+setheuristiccallback!(m::GLPKMathProgModel, f::Union{Function,Void}) = (m.heuristiccb = f)
+setinfocallback!(m::GLPKMathProgModel, f::Union{Function,Void}) = (m.infocb = f)
 
 _check_tree(d::GLPKCallbackData, funcname::AbstractString) =
     (d.tree != C_NULL && d.reason != -1) || error("$funcname can only be called from within a callback")
@@ -396,7 +393,7 @@ function setvartype!(lpm::GLPKMathProgModelMIP, vartype::Vector{Symbol})
     end
 end
 
-@compat const vartype_map = Dict(
+const vartype_map = Dict(
     GLPK.CV => :Cont,
     GLPK.IV => :Int,
     GLPK.BV => :Bin

src/GLPKMathProgInterface.jl

@@ -13,4 +13,9 @@ include("GLPKInterfaceMIP.jl")
 const GLPKSolverLP = GLPKInterfaceLP.GLPKSolverLP
 const GLPKSolverMIP = GLPKInterfaceMIP.GLPKSolverMIP
 
+# Enables GLPK to act as a conic solver
+import MathProgBase
+MathProgBase.ConicModel(s::Union{GLPKSolverLP,GLPKSolverMIP}) = MathProgBase.LPQPtoConicBridge(MathProgBase.LinearQuadraticModel(s))
+MathProgBase.supportedcones(::Union{GLPKSolverLP,GLPKSolverMIP}) = [:Free,:Zero,:NonNeg,:NonPos]
+
 end

test/runtests.jl

@@ -11,9 +11,13 @@ linprogsolvertest(GLPKSolverLP())
 include(joinpath(mathprogbase_test, "mixintprog.jl"))
 mixintprogtest(GLPKSolverMIP())
 
-lpm = GLPKInterfaceLP.model(GLPKSolverLP(it_lim=9513, tol_bnd=4.149))
+include(joinpath(mathprogbase_test,"conicinterface.jl"))
+coniclineartest(GLPKSolverLP())
+coniclineartest(GLPKSolverMIP())
+
+lpm = GLPKInterfaceLP.LinearQuadraticModel(GLPKSolverLP(it_lim=9513, tol_bnd=4.149))
 @test lpm.param.it_lim == 9513
 @test lpm.param.tol_bnd == 4.149
-mipm = GLPKInterfaceMIP.model(GLPKSolverMIP(it_lim=5910, tol_obj=1.52e-3))
+mipm = GLPKInterfaceMIP.LinearQuadraticModel(GLPKSolverMIP(it_lim=5910, tol_obj=1.52e-3))
 @test mipm.smplxparam.it_lim == 5910
 @test mipm.param.tol_obj == 1.52e-3