view src/config.sml.in @ 2142:3288e3c9948b

Fix XML indentation in Emacs mode The return value of MATCH-STRING is a string. At least on Emacs 25, the comparisons between string and character with EQUAL could never succeed, and so the cases for matching braces were never triggered. GET-TEXT-PROPERTY may return a list rather than an atom (for example, on long lines with whitespace-mode turned on), and this broke the heuristic of looking for the tag face in previous text.
author Julian Squires <julian@cipht.net>
date Mon, 04 May 2015 14:35:07 -0400
parents c414850f206f
children
line wrap: on
line source
structure Config :> CONFIG = struct

val builddir = "@abs_top_builddir@"

val bin = "@BIN@"
val srclib = "@SRCLIB@"
val lib = "@LIB@"
val includ = "@INCLUDE@"
val sitelisp = "@SITELISP@"

val ccompiler = "@CC@"
val ccArgs = "@CCARGS@"

val openssl = "@OPENSSL_LDFLAGS@ @OPENSSL_LIBS@"

(* Something is rotten in the state of Ubuntu 11.10, so here's a manual fix that I hope doesn't break other platforms. *)
val openssl =
    let
        val tokens = String.tokens Char.isSpace openssl
    in
        if List.exists (fn s => s = "-lssl") tokens then
            String.concatWith " " (List.filter (fn s => s <> "-lssl") tokens @ ["-lssl"])
        else
            openssl
    end

val pgheader = "@PGHEADER@"
val msheader = "@MSHEADER@"
val sqheader = "@SQHEADER@"

val versionNumber  = "@VERSION@"
val versionString  = "The Ur/Web compiler, version " ^ versionNumber

val pthreadCflags = "@PTHREAD_CFLAGS@"
val pthreadLibs = "@PTHREAD_LIBS@"

end