about summary refs log tree commit diff stats
path: root/cpp/090debug.cc
diff options
context:
space:
mode:
authorKartik K. Agaram <vc@akkartik.com>2015-04-24 22:49:29 -0700
committerKartik K. Agaram <vc@akkartik.com>2015-04-24 22:49:29 -0700
commit6d8ef6b12d37336a92c7a6b20b4b66f3ab424464 (patch)
tree49c4b2b75ebc85540861b2682e3d48fe958c5dc8 /cpp/090debug.cc
parent0b0cfb6f1f4579eef463ffcb41ba782ddbd56035 (diff)
downloadmu-6d8ef6b12d37336a92c7a6b20b4b66f3ab424464.tar.gz
1189 - add extensions to all layers
I'm sick of fighting vim's filetype detection. No modeline and files
highlight in random colors. I add a modeline and it stops highlighting
tangle comments. Even though it read my #$%# vimrc! Fuck this shite.
Diffstat (limited to 'cpp/090debug.cc')
-rw-r--r--cpp/090debug.cc21
1 files changed, 21 insertions, 0 deletions
diff --git a/cpp/090debug.cc b/cpp/090debug.cc
new file mode 100644
index 00000000..d81071e9
--- /dev/null
+++ b/cpp/090debug.cc
@@ -0,0 +1,21 @@
+//: Recipe to look at elements of containers.
+
+:(before "End Primitive Recipe Declarations")
+_PRINT,
+:(before "End Primitive Recipe Numbers")
+Recipe_number["$print"] = _PRINT;
+:(before "End Primitive Recipe Implementations")
+case _PRINT: {
+  if (isa_literal(current_instruction().ingredients[0])) {
+    trace("run") << "$print: " << current_instruction().ingredients[0].name;
+    cout << current_instruction().ingredients[0].name;
+    break;
+  }
+  vector<int> result(read_memory(current_instruction().ingredients[0]));
+  for (size_t i = 0; i < result.size(); ++i) {
+    trace("run") << "$print: " << result[i];
+    if (i > 0) cout << " ";
+    cout << result[i];
+  }
+  break;
+}