improve

br-bf/main.rkt

@@ -45,7 +45,7 @@
 ;; bf implementation
 
 ;; state: one vector, one pointer
-(define bf-vector (make-vector 1000 0))
+(define bf-vector (make-vector 30000 0))
 (define bf-pointer 0)
 
 ;; gets and sets

br-bf/tokenizer.rkt

@@ -14,6 +14,8 @@
      ;; todo: try adding support for line comments
      #;[(:: "#" (:* (complement "\n")) "\n") (token 'comment #:skip? #t)]
      [whitespace (token 'white #:skip? #t)]
+     ;; treat other characters as comments
+     [(char-range #\nul #\~) (token 'ascii #:skip? #t)]
      [(eof) eof]))
   
   (define (next-token) (get-token ip))