lambda-calc-1/expression/error/new.c
2025-01-20 13:40:51 -06:00

28 lines
549 B
C

#include <debug.h>
#include "../new.h"
#include "../inc.h"
#include "inheritance.h"
#include "struct.h"
#include "new.h"
struct expression* new_error_expression(
const wchar_t* message,
struct expression* subexpression)
{
ENTER;
struct error_expression* this = (void*) new_expression(
/* inheritance: */ &error_expression_inheritance,
/* alloc size: */ sizeof(*this));
this->message = message;
this->subexpression = inc_expression(subexpression);
EXIT;
return (void*) this;
}