~ chicken-core (chicken-5) 04ac34aba2cb6580f28c9162860373a57a2c31f1

commit 04ac34aba2cb6580f28c9162860373a57a2c31f1
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Sun Mar 11 21:39:50 2018 +0100
Commit:     Evan Hanson <evhan@foldling.org>
CommitDate: Mon Mar 12 14:04:20 2018 +1300

    Remove obsolete feature identifiers
    
    Signed-off-by: Evan Hanson <evhan@foldling.org>

diff --git a/expand.scm b/expand.scm
index 337bcf2f..accfdd4a 100644
--- a/expand.scm
+++ b/expand.scm
@@ -65,8 +65,7 @@
 	  ?se))))
 
 (set! ##sys#features
-  (append '(#:hygienic-macros #:syntax-rules
-	    #:srfi-0 #:srfi-2 #:srfi-6 #:srfi-9 #:srfi-46 #:srfi-55 #:srfi-61) 
+  (append '(#:srfi-0 #:srfi-2 #:srfi-6 #:srfi-9 #:srfi-46 #:srfi-55 #:srfi-61)
 	  ##sys#features))
 
 (define-alias dd d)
diff --git a/library.scm b/library.scm
index cd71a216..eaa2ce05 100644
--- a/library.scm
+++ b/library.scm
@@ -6502,9 +6502,7 @@ static C_word C_fcall C_setenv(C_word x, C_word y) {
 
 (define ##sys#features
   '(#:chicken
-    #:srfi-6 #:srfi-12 #:srfi-17 #:srfi-23 #:srfi-30 #:srfi-39 #:srfi-62
-    ;; TODO: consider removing at least irregex-is-core-unit
-    #:irregex-is-core-unit #:full-numeric-tower #:manyargs))
+    #:srfi-6 #:srfi-12 #:srfi-17 #:srfi-23 #:srfi-30 #:srfi-39 #:srfi-62 #:full-numeric-tower))
 
 ;; Add system features:
 
diff --git a/modules.scm b/modules.scm
index f113a875..2d72e36f 100644
--- a/modules.scm
+++ b/modules.scm
@@ -1124,8 +1124,6 @@
  '((get-environment-variable . chicken.process-context#get-environment-variable)
    (get-environment-variables . chicken.process-context#get-environment-variables)))
 
-(register-feature! 'module-environments)
-
 (define (chicken.module#module-environment mname #!optional (ename mname))
   (let ((mod (find-module/import-library mname 'module-environment)))
     (if (not mod)
diff --git a/tests/apply-test.scm b/tests/apply-test.scm
index 9c05e1c4..c6f48a54 100644
--- a/tests/apply-test.scm
+++ b/tests/apply-test.scm
@@ -22,9 +22,6 @@
 	(car lst)
 	(loop (cdr lst)))))
 
-;; Non-manyarg CHICKENs are no longer made
-(assert (feature? 'manyargs))
-
 (define (foo . args)
   (when (pair? args)
     (assert (= (length args) (last args)))))