Andy Kopra
2ba7ceee7a
Curated source subset assembled by klammertext-dev's doc/make_dist.sh: the Klammermachine (mac), the Standard Klammer Set (sks), the commands (com), editor plugins and install guides (doc), a test subset (tst), and lib/bin placeholders. Builds with 'make -C com'. Co-Authored-By: Claude Opus 4.8 (1M context) <noreply@anthropic.com>
21 lines
449 B
C++
21 lines
449 B
C++
#include <string>
|
|
#include <sstream>
|
|
#include <map>
|
|
#include "util.h"
|
|
#include "eval.h"
|
|
#include "machine.h"
|
|
#include "klammer_base.h"
|
|
|
|
using namespace std;
|
|
|
|
extern "C" VISIBLE void set_paragraphs(Machine& M, Text& T)
|
|
{
|
|
cout << "In after_parse:" << M.state.statevars.get("K_program_name").first;
|
|
cout << T.katoms.katoms.size() << "\n";
|
|
for (katom_ptr k : T.katoms.katoms) {
|
|
cout << ktype << *k << " ";
|
|
}
|
|
cout << "\n";
|
|
|
|
}
|