ini-sections, ini-keys, ini-for-each added.

class.rkt

@@ -12,7 +12,6 @@
      (set! a b))))
 
 
-
 (define ini%
   (class object%
     (init-field [file #f] [fail #f] [private? #f])
@@ -40,11 +39,14 @@
       (i-set! private? p)
       this)
 
-    (define/public (get-contents)
-      content)
+    (define/public (sections)
+      (ini-sections content))
 
-    (define/public (contents)
-      content)
+    (define/public (keys section)
+      (ini-keys content section))
+
+    (define/public (for-each f)
+      (ini-for-each f content))
 
     (define/public (reload)
       (i-set! content (if (eq? file #f)