Removing all need for (scheme inexact)

srfi/60.scm

@@ -125,7 +125,7 @@
 (define first-set-bit log2-binary-factors)
 
 (define (logbit? index n)
-  (logtest (exact (expt 2 index)) n))
+  (logtest (ash 1 index) n))
 
 (define bit-set? logbit?)
 

srfi/60.sld

@@ -10,8 +10,8 @@
 ;;;; doesn't have them yet. This will need to be modified accordingly once 
 ;;;; this support is provided.
 (define-library (srfi 60)
-  (import (scheme base)
-          (scheme inexact))
+  (import 
+    (scheme base))
   (export
     any-bits-set? arithmetic-shift ash
     bit-count bit-field bit-set? bitwise-and bitwise-if bitwise-ior