diff options
| -rw-r--r-- | simulation.scm | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/simulation.scm b/simulation.scm index d708567..d21aef6 100644 --- a/simulation.scm +++ b/simulation.scm @@ -19,9 +19,6 @@ (let ((now (gettimeofday))) (format #t "~a~a - ~?~%" (car now) (cdr now) f data))) -(define (vector-append! vec value) - (vector-set! vec (vector-length vec) value)) - (define-record-type message (make-message id device-id channel-n body) message? |