Roland Conybeare
0ae98c211d
git-subtree-dir: xo-reader git-subtree-mainline:dacdeb2cd7git-subtree-split:c46c0f1cc4
85 lines
2.4 KiB
C++
85 lines
2.4 KiB
C++
/* file expect_formal_xs.hpp
|
|
*
|
|
* author: Roland Conybeare, Aug 2024
|
|
*/
|
|
|
|
#pragma once
|
|
|
|
#include "exprstate.hpp"
|
|
#include "formal_arg.hpp"
|
|
|
|
namespace xo {
|
|
namespace scm {
|
|
/**
|
|
* name : type
|
|
* ^ ^ ^
|
|
* | | formal_2
|
|
* | formal_1
|
|
* formal_0
|
|
*
|
|
* formal_0 --on_symbol()--> formal_1
|
|
* formal_1 --on_colon_token()--> formal_2
|
|
* formal_2 --on_typedescr()--> (done)
|
|
**/
|
|
enum class formalstatetype {
|
|
invalid = -1,
|
|
|
|
formal_0,
|
|
formal_1,
|
|
formal_2,
|
|
|
|
n_formalstatetype,
|
|
};
|
|
|
|
extern const char *
|
|
formalstatetype_descr(formalstatetype x);
|
|
|
|
inline std::ostream &
|
|
operator<< (std::ostream & os, formalstatetype x) {
|
|
os << formalstatetype_descr(x);
|
|
return os;
|
|
}
|
|
|
|
/** @class expect_formal_xs
|
|
* @brief parser state-machine for a typed formal parameter
|
|
**/
|
|
class expect_formal_xs : public exprstate {
|
|
public:
|
|
expect_formal_xs();
|
|
|
|
static void start(parserstatemachine * p_psm);
|
|
|
|
virtual void on_symbol(const std::string & symbol_name,
|
|
parserstatemachine * p_psm) override;
|
|
|
|
virtual void on_colon_token(const token_type & tk,
|
|
parserstatemachine * p_psm) override;
|
|
|
|
// virtual void on_comma_token(...) override;
|
|
|
|
#ifdef PROBABLY_NOT
|
|
virtual void on_rightparen_token(const token_type & tk,
|
|
exprstatestack * p_stack,
|
|
rp<Expression> * p_emit_expr) override;
|
|
#endif
|
|
|
|
virtual void on_typedescr(TypeDescr td,
|
|
parserstatemachine * p_psm) override;
|
|
|
|
virtual void print(std::ostream & os) const override;
|
|
|
|
private:
|
|
static std::unique_ptr<expect_formal_xs> make();
|
|
|
|
private:
|
|
/** parsing state-machine state **/
|
|
formalstatetype formalxs_type_ = formalstatetype::formal_0;
|
|
/** populate with {parameter-name, parameter-type}
|
|
* as they're encountered
|
|
**/
|
|
formal_arg result_;
|
|
};
|
|
} /*namespace scm*/
|
|
} /*namespace xo*/
|
|
|
|
/* end expect_formal_xs.hpp */
|