diff --git a/lib/chibi/json-test.sld b/lib/chibi/json-test.sld index 3402d6ab..835c9867 100644 --- a/lib/chibi/json-test.sld +++ b/lib/chibi/json-test.sld @@ -30,20 +30,20 @@ (string->json "{ \"glossary\": { \"title\": \"example glossary\", - \"GlossDiv\": { + \"GlossDiv\": { \"title\": \"S\", - \"GlossList\": { + \"GlossList\": { \"GlossEntry\": { \"ID\": \"SGML\", - \"SortAs\": \"SGML\", - \"GlossTerm\": \"Standard Generalized Markup Language\", - \"Acronym\": \"SGML\", - \"Abbrev\": \"ISO 8879:1986\", - \"GlossDef\": { + \"SortAs\": \"SGML\", + \"GlossTerm\": \"Standard Generalized Markup Language\", + \"Acronym\": \"SGML\", + \"Abbrev\": \"ISO 8879:1986\", + \"GlossDef\": { \"para\": \"A meta-markup language, used to create markup languages such as DocBook.\", - \"GlossSeeAlso\": [\"GML\", \"XML\"] + \"GlossSeeAlso\": [\"GML\", \"XML\"] }, - \"GlossSee\": \"markup\" + \"GlossSee\": \"markup\" } } } diff --git a/lib/srfi/95/qsort.c b/lib/srfi/95/qsort.c index 64ee13a9..028eddd5 100644 --- a/lib/srfi/95/qsort.c +++ b/lib/srfi/95/qsort.c @@ -156,7 +156,7 @@ static int sexp_object_compare (sexp ctx, sexp a, sexp b, int depth) { #if SEXP_USE_HUFF_SYMS } else if (sexp_isymbolp(b) && sexp_lsymbolp(a)) { res = strcmp(sexp_lsymbol_data(a), - sexp_string_data(sexp_write_to_string(ctx, b))); + sexp_string_data(sexp_write_to_string(ctx, b))); #endif } else { res = 1; @@ -170,7 +170,7 @@ static int sexp_object_compare (sexp ctx, sexp a, sexp b, int depth) { #if SEXP_USE_HUFF_SYMS if (sexp_isymbolp(a) && sexp_lsymbolp(b)) res = strcmp(sexp_string_data(sexp_write_to_string(ctx, a)), - sexp_lsymbol_data(b)); + sexp_lsymbol_data(b)); else #endif res = -1;