diff options
| -rw-r--r-- | bpf-assembler.scm | 4 |
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) |