1696b92bb8
Sprints 46-58 implement the cross-language porting foundation: language-to-IR adapters, equivalence checking, gate validation, legacy ingestion, managed/dynamic families, low-level/logic-actor semantics, debug workflow tooling, AST-native family tools, Rust/CPP raising tools, system-level orchestration, query family, and porting gates. Sprint 59 adds the governance layer (policy packs, review boards, waiver packets, ambiguity triage, decision ledger) with the whetstone_review_porting_decision MCP tool. Also includes: sprint plans 46-130, MCP taskitem pipeline scripts, CLAUDE.md, docs, and full test matrix (steps 689-828). Co-Authored-By: Claude Sonnet 4.6 <noreply@anthropic.com>
31 lines
934 B
C++
31 lines
934 B
C++
#pragma once
|
|
// Step 773: Smalltalk lowering/raising adapters.
|
|
|
|
#include <string>
|
|
|
|
#include <nlohmann/json.hpp>
|
|
|
|
#include "SExpressionCanonicalLowering.h"
|
|
|
|
class SmalltalkAdapterV1 {
|
|
public:
|
|
static ASTNativeLoweringPacket lower(const std::string& source) {
|
|
auto p = SExpressionCanonicalLowering::lower(source, "smalltalk");
|
|
p.messageSendLike = true;
|
|
p.listDepth = source.empty() ? 0 : 1;
|
|
return p;
|
|
}
|
|
|
|
static ASTNativeRaisingPacket raise(const std::string& ir, const std::string& profile) {
|
|
return SExpressionCanonicalLowering::raise(ir, "smalltalk", profile == "strict" ? "message_safe" : "message_friendly");
|
|
}
|
|
|
|
static nlohmann::json toJson(const ASTNativeLoweringPacket& p) {
|
|
return SExpressionCanonicalLowering::toJson(p);
|
|
}
|
|
|
|
static nlohmann::json toJson(const ASTNativeRaisingPacket& p) {
|
|
return SExpressionCanonicalLowering::toJson(p);
|
|
}
|
|
};
|