summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--bpf-assembler.scm4
1 files changed, 4 insertions, 0 deletions
diff --git a/bpf-assembler.scm b/bpf-assembler.scm
index 4cecd88..8741193 100644
--- a/bpf-assembler.scm
+++ b/bpf-assembler.scm
@@ -34,6 +34,8 @@
'?disasm)))
addrmodes)))))
+ ;; XXX TODO: Use the constants from net/bpf.h?
+
;; Ordered by complexity
(defaddrmode no-operands #x80 (() => 0) (_ => ()))
(defaddrmode packet-length #x80 (('len) => 0) (_ => (len)))
@@ -99,6 +101,8 @@
;;; Assembly ;;;
;;;;;;;;;;;;;;;;
+;; XXX TODO: Use the structs from net/bpf.h? bitstring can go, then.
+
(define-syntax assemble-instruction
(ir-macro-transformer
(lambda (e i c)