fix Dict syntax deprecation warnings

somehow the one for `[a=>b]` stopped working entirely

src/julia-parser.scm

@@ -1508,8 +1508,9 @@
  (take-token s)
  (parse-dict-comprehension s first closer))
  (else
- (if (and (pair? isdict) (car isdict))
- (syntax-deprecation-warning s "[a=>b, ...]" "Dict(a=>b, ...)"))
+ (if (or (and (pair? isdict) (not (car isdict)))
+ (null? isdict))
+ (syntax-deprecation-warning s "[a=>b, ...]" "Dict(a=>b, ...)"))
  (parse-dict s first closer)))
  (case (peek-token s)
  ((#\,)
@@ -1784,15 +1785,13 @@
  ((eqv? t #\{ )
  (take-token s)
  (if (eqv? (require-token s) #\})
- (begin 
- (syntax-deprecation-warning s "{}" "[]")
- (take-token s) 
+ (begin (syntax-deprecation-warning s "{}" "[]")
+ (take-token s)
  '(cell1d))
- (let ((vex (parse-cat s #\})))
+ (let ((vex (parse-cat s #\} #t)))
  (if (null? vex)
- (begin
- (syntax-deprecation-warning s "{}" "[]")
- '(cell1d))
+ (begin (syntax-deprecation-warning s "{}" "[]")
+ '(cell1d))
  (case (car vex)
  ((comprehension)
  (syntax-deprecation-warning s "{a for a in b}" "Any[a for a in b]")