use cstring(Ptr) to make a string from a C string, instead of string()

Author: JeffBezanson

j/env.j

@@ -10,7 +10,7 @@ function getenv(var::String)
     if val == C_NULL
         error("getenv: Undefined variable: ", var)
     end
-    string(val)
+    cstring(val)
 end
 
 function setenv(var::String, val::String)

j/libc.j

@@ -16,7 +16,7 @@ function gethostname()
     hn = Array(Uint8, 128)
     ccall(dlsym(libc,:gethostname), Int32, (Ptr{Uint8}, Ulong),
           hn, ulong(length(hn)))
-    string(convert(Ptr{Uint8},hn))
+    cstring(convert(Ptr{Uint8},hn))
 end
 
 ## file and directory ##
@@ -28,7 +28,7 @@ function getcwd()
     if p == C_NULL
         error("path too long")
     end
-    string(p)
+    cstring(p)
 end
 
 function setcwd(p::String)

j/regex.j

@@ -2,7 +2,7 @@ load("pcre_h.j")
 
 libpcre = dlopen("libpcre")
 
-PCRE_VERSION = string(ccall(dlsym(libpcre, :pcre_version), Ptr{Uint8}, ()))
+PCRE_VERSION = cstring(ccall(dlsym(libpcre, :pcre_version), Ptr{Uint8}, ()))
 
 ## masks for supported sets of options ##
 

j/string.j

@@ -308,15 +308,15 @@ lcfirst(s::String) = TransformedString((c,i)->i==1 ? lc(c) : c, s)
 
 ## conversion of general objects to strings ##
 
-function string(p::Ptr{Uint8})
-    p == C_NULL ? error("cannot convert NULL to string") :
-    ccall(:jl_cstr_to_string, Any, (Ptr{Uint8},), p)::String
-end
-
 string(x) = print_to_string(show, x)
 
 cstring(args...) = print_to_string(print, args...)
 
+function cstring(p::Ptr{Uint8})
+    p == C_NULL ? error("cannot convert NULL to string") :
+    ccall(:jl_cstr_to_string, Any, (Ptr{Uint8},), p)::String
+end
+
 ## printing literal quoted string data ##
 
 # TODO: this is really the inverse of print_unbackslashed