$ IF (patchlevel_h.NES."")
$ THEN
$ SEARCH 'patchlevel_h "define","PERL_VERSION","epoch"/match=and/out=[]ver.out
-$ IF .NOT. usedevel
+$ IF .NOT. usedevel .AND. usedevel .NES. "define"
$ THEN
$ OPEN/READ CONFIG []ver.out
$ READ CONFIG line
$ IF use64bitint .OR. use64bitint .EQS. "define"
$ THEN
$ d_PRId64 = "define"
+$ d_PRIEldbl_cap = "define"
+$ d_PRIFldbl_cap = "define"
+$ d_PRIGldbl_cap = "define"
+$ d_PRIeldbl = "define"
$ d_PRIfldbl = "define"
$ d_PRIgldbl = "define"
$ d_PRIu64 = "define"
$ d_PRIo64 = "define"
$ d_PRIx64 = "define"
$ sPRId64 = """Ld"""
-$! sPRIeldbl = """Lf"""
+$ sPRIEldbl_cap = """LE"""
+$ sPRIFldbl_cap = """LF"""
+$ sPRIGldbl_cap = """LG"""
+$ sPRIX64_cap = """LX"""
+$ sPRIeldbl = """Le"""
$ sPRIfldbl = """Lf"""
$ sPRIgldbl = """Lg"""
-$! sPRIi64 = """Li"""
+$ sPRIi64 = """Li"""
$ sPRIo64 = """Lo"""
$ sPRIu64 = """Lu"""
$ sPRIx64 = """Lx"""
$ d_modfl = "define"
$ ELSE
$ d_PRId64 = "undef"
+$ d_PRIEldbl_cap = "define"
+$ d_PRIFldbl_cap = "define"
+$ d_PRIGldbl_cap = "define"
+$ d_PRIX64_cap = "undef"
+$ d_PRIeldbl = "define"
$ d_PRIfldbl = "undef"
$ d_PRIgldbl = "undef"
$ d_PRIu64 = "undef"
$ d_PRIo64 = "undef"
$ d_PRIx64 = "undef"
$ sPRId64 = ""
-$! sPRIeldbl = ""
-$ sPRIfldbl = ""
-$ sPRIgldbl = ""
-$! sPRIi64 = ""
+$ sPRIEldbl_cap = """E"""
+$ sPRIFldbl_cap = """F"""
+$ sPRIGldbl_cap = """G"""
+$ sPRIX64_cap = """lX"""
+$ sPRIeldbl = """e"""
+$ sPRIfldbl = """f"""
+$ sPRIgldbl = """g"""
+$ sPRIi64 = ""
$ sPRIo64 = ""
$ sPRIu64 = ""
$ sPRIx64 = ""
$ WC "crosscompile='undef'"
$ WC "d_Gconvert='my_gconvert(x,n,t,b)'"
$ WC "d_PRId64='" + d_PRId64 + "'"
+$ WC "d_PRIEldbl='" + d_PRIEldbl_cap + "'"
+$ WC "d_PRIFldbl='" + d_PRIFldbl_cap + "'"
+$ WC "d_PRIGldbl='" + d_PRIGldbl_cap + "'"
+$ WC "d_PRIX64='" + d_PRIX64_cap + "'"
+$ WC "d_PRIeldbl='" + d_PRIeldbl + "'"
$ WC "d_PRIfldbl='" + d_PRIfldbl + "'"
$ WC "d_PRIgldbl='" + d_PRIgldbl + "'"
$ WC "d_PRIo64='" + d_PRIo64 + "'"
$ WC "malloctype='void *'"
$ WC "man1ext='rno'"
$ WC "man3ext='rno'"
-$ WC "mmaptype='" + "'"
+$ WC "mmaptype=' " + "'"
$ WC "modetype='unsigned int'"
$ WC "multiarch='undef'"
$ WC "mydomain='" + mydomain + "'"
$ WC "ranlib='" + "'"
$ WC "rd_nodata=' '"
$ WC "revision='" + revision + "'"
-$! WC "sPRIEldbl='$sPRIEldbl'
-$! WC "sPRIFldbl='$sPRIFldbl'
-$! WC "sPRIGldbl='$sPRIGldbl'
-$! WC "sPRIX64='$sPRIX64'
$ WC "sPRId64='" + sPRId64 + "'"
-$! WC "sPRIeldbl='" + sPRIeldbl + "'"
+$ WC "sPRIEldbl='" + sPRIEldbl_cap + "'"
+$ WC "sPRIFldbl='" + sPRIFldbl_cap + "'"
+$ WC "sPRIGldbl='" + sPRIGldbl_cap + "'"
+$ WC "sPRIX64='" + sPRIX64_cap + "'"
+$ WC "sPRIeldbl='" + sPRIeldbl + "'"
$ WC "sPRIfldbl='" + sPRIfldbl + "'"
$ WC "sPRIgldbl='" + sPRIgldbl + "'"
$! WC "sPRIi64='" + sPRIi64 + "'"
$ WC "stdio_bufsiz='((*fp)->_cnt + (*fp)->_ptr - (*fp)->_base)'"
$ WC "stdio_cnt='((*fp)->_cnt)'"
$ WC "stdio_ptr='((*fp)->_ptr)'"
-$ WC "stdio_stream_array='" + "'"
+$ WC "stdio_stream_array=' " + "'"
$ WC "subversion='" + subversion + "'"
$ WC "timetype='" + timetype + "'"
$ WC "u16size='" + u16size + "'"