diff --git a/embddr/common.scm b/embddr/common.scm
index dc09abd..48eacce 100644
--- a/embddr/common.scm
+++ b/embddr/common.scm
@@ -5,8 +5,8 @@
   (import (srfi srfi-1)
           (srfi srfi-60))
 
-  (export log2
-          clog2 one?
+  (export log2 clog2
+          one? power-of-two?
           curry curry-r
           transpose
           number->string-binary