Added math font functions (set/inq)

src/GR.jl

@@ -185,6 +185,8 @@ export
   setscientificformat,
   setresizebehaviour,
   inqprojectiontype,
+  setmathfont,
+  inqmathfont,
   # Convenience functions
   jlgr,
   colormap,
@@ -4340,6 +4342,22 @@ function moveselection(x, y)
         x, y)
 end
 
+function setmathfont(font::Int)
+  ccall( libGR_ptr(:gr_setmathfont),
+        Nothing,
+        (Int32, ),
+        font)
+end
+
+function inqmathfont()
+  _font = Cint[0]
+  ccall( libGR_ptr(:gr_inqmathfont),
+        Nothing,
+        (Ptr{Cint}, ),
+        _font)
+  return _font[1]
+end
+
 # JS functions
 include("js.jl")
 

src/libgr_syms.jl

@@ -159,4 +159,6 @@
 :gr_beginselection
 :gr_endselection
 :gr_moveselection
+:gr_setmathfont
+:gr_inqmathfont
 ]