forked from ikarus, a scheme implementation