blob: 33560a9de587405570b13537135f5ca176acf9a5 (
plain) (
tree)
224474d7 ^-- undo/redo by managing the sequence of events in the current session
-- based on https://github.com/akkartik/mu1/blob/master/edit/012-editor-undo.mu
-- Incredibly inefficient; we make a copy of lines on every single keystroke.
-- The hope here is that we're either editing small files or just reading large files.
-- TODO: highlight stuff inserted by any undo/redo operation
-- TODO: coalesce multiple similar operations
function record_undo_event(State, data)
State.history[State.next_history] = data
State.next_history = State.next_history+1
for i=State.next_history,#State.history do
State.history[i] = nil
end
end
function undo_event(State)
if State.next_history > 1 then
--? print('moving to history', State.next_history-1)
State.next_history = State.next_history-1
local//: A simple test harness. To create new tests, define functions starting with
//: 'test_'. To run all tests so defined, run:
//: $ ./mu test
//:
//: Every layer should include tests, and can reach into previous layers.
//: However, it seems like a good idea never to reach into tests from previous
//: layers. Every test should be a contract that always passes as originally
//: written, regardless of any later layers. Avoid writing 'temporary' tests
//: that are only meant to work until some layer.
:(before "End Types")
typedef void (*test_fn)(void);
:(before "Globals")
// move a global ahead into types that we can't generate an extern declaration for
const test_fn Tests[] = {
#include "test_list" // auto-generated; see 'build' script
};
:(before "End Globals")
bool Run_tests = false;
bool Passed = true; // set this to false inside any test to indicate failure
:(before "End Includes")
#define CHECK(X) \
if (Passed && !(X)) { \
cerr << "\nF - " << __FUNCTION__ << "(" << __FILE__ << ":" << __LINE__ << "): " << #X << '\n'; \
Passed = false; \
return; /* Currently we stop at the very first failure. */ \
}
#define CHECK_EQ(X, Y) \
if (Passed && (X) != (Y)) { \
cerr << "\nF - " << __FUNCTION__ << "(" << __FILE__ << ":" << __LINE__ << "): " << #X << " == " << #Y << '\n'; \
cerr << " got " << (X) << '\n'; /* BEWARE: multiple eval */ \
Passed = false; \
return; /* Currently we stop at the very first failure. */ \
}
:(before "End Reset")
Passed = true;
:(before "End Commandline Parsing")
if (argc > 1 && is_equal(argv[1], "test")) {
Run_tests = true; --argc; ++argv; // shift 'test' out of commandline args
}
:(before "End Main")
if (Run_tests) {
// Test Runs
// we run some tests and then exit; assume no state need be maintained afterward
long num_failures = 0;
// End Test Run Initialization
time_t t; time(&t);
cerr << "C tests: " << ctime(&t);
for (size_t i=0; i < sizeof(Tests)/sizeof(Tests[0]); ++i) {
//? cerr << "running .build/test_list line " << (i+1) << '\n';
run_test(i);
if (Passed) cerr << '.';
else ++num_failures;
}
cerr << '\n';
// End Tests
if (num_failures > 0) {
cerr << num_failures << " failure"
<< (num_failures > 1 ? "s" : "")
<< '\n';
return 1;
}
return 0;
}
:(code)
void run_test(size_t i) {
if (i >= sizeof(Tests)/sizeof(Tests[0])) {
cerr << "no test " << i << '\n';
return;
}
reset();
// End Test Setup
(*Tests[i])();
// End Test Teardown
}
:(before "End Includes")
#include <stdlib.h>
|