Rename json.sld to 180.sld, shake things around to make it work.

Author: Amirouche

srfi/json.sld renamed to srfi/180.sld

@@ -1,4 +1,4 @@
-(define-library (json)
+(define-library (srfi 180)
 
   (export json-null?
           json-error?
@@ -20,4 +20,4 @@
           (chibi ast)
           (chibi regexp))
 
-  (include "json.scm"))
+  (include "180/body.scm"))

srfi/json.scm renamed to srfi/180/body.scm

@@ -1,4 +1,4 @@
-(define-library (json-checks)
+(define-library (srfi 180 checks)
 
   (export i_number_double_huge_neg_exp.json
           i_number_huge_exp.json
@@ -335,7 +335,7 @@
 
   (import (scheme base))
   (import (scheme file))
-  (import (json))
+  (import (srfi 180))
   (import (check))
 
   (begin

srfi/json-checks.sld renamed to srfi/180/checks.sld

@@ -1,3 +1,4 @@
+;; test framework
 (define-library (check)
   (export check check-raise skip pk failure? failure-expected failure-actual)
 

srfi/check.sld

@@ -1,2 +1,2 @@
 #!/bin/sh
-chibi-scheme -A $(pwd) run-r7rs-checks.scm json-checks.sld $1
+chibi-scheme -A $(pwd)/.. run-r7rs-checks.scm 180/checks.sld $1

srfi/run-chibi.sh

@@ -14,7 +14,7 @@
 
 (define (filename->library-name filename)
   ;; TODO: try to guess ;)
-  '(json-checks))
+  '(srfi 180 checks))
 
 (define (filename->library-exports filename)
   (define library (call-with-input-file filename read))