diff --git a/include/xo/expression/pretty_expression.hpp b/include/xo/expression/pretty_expression.hpp index a4e07a84..066ce379 100644 --- a/include/xo/expression/pretty_expression.hpp +++ b/include/xo/expression/pretty_expression.hpp @@ -26,5 +26,6 @@ namespace xo { return x.pretty_print(ppii); } }; + } } diff --git a/include/xo/expression/pretty_localenv.hpp b/include/xo/expression/pretty_localenv.hpp index 275ec095..7a09b187 100644 --- a/include/xo/expression/pretty_localenv.hpp +++ b/include/xo/expression/pretty_localenv.hpp @@ -8,6 +8,13 @@ namespace xo { namespace print { + template <> + struct ppdetail { + static bool print_pretty(const ppindentinfo & ppii, const xo::scm::Environment & x) { + return x.pretty_print(ppii); + } + }; + template <> struct ppdetail { static bool print_pretty(const ppindentinfo & ppii, const xo::scm::LocalEnv & x) { diff --git a/include/xo/expression/pretty_variable.hpp b/include/xo/expression/pretty_variable.hpp index d0440b8e..c53c11a3 100644 --- a/include/xo/expression/pretty_variable.hpp +++ b/include/xo/expression/pretty_variable.hpp @@ -12,9 +12,16 @@ namespace xo { namespace print { template <> struct ppdetail { - static bool print_pretty(const ppindentinfo & ppii, const xo::scm::Expression & x) { + static bool print_pretty(const ppindentinfo & ppii, const xo::scm::Variable & x) { return x.pretty_print(ppii); } }; + + template <> + struct ppdetail { + static bool print_pretty(const ppindentinfo & ppii, const xo::scm::Variable * x) { + return x->pretty_print(ppii); + } + }; } }