Jens Axel Søgaard

You are right. Is it possible to generate a better error message? tor. 26. sep. 2019 kl. 18.10 skrev Bogdan Popa : > I think the issue is that you...

Actually for the `user` table I can do: ``` (define (get-user/id id) (lookup db (~> (from user #:as u) (where (= id ,id))))) ``` That is, it works even when...

2015-07-11 23:26 GMT+02:00 Leif Andersen [email protected]: > Yes, I am all up for adding these properties. > > Although this does lead to the question of do we want to...

@LeifAndersen Is it time to close it?

The language definition is here: https://gist.github.com/soegaard/b52cb97f65c608251d60 2015-07-02 22:26 GMT+02:00 Andy Keep [email protected]: > What is you're language definition? If you don't have a (let (x M) M* > ...) in...

The example was: ``` (let ([M (parse '(let (y 5) 6))]) (nanopass-case (LCS Term) M [(let (,x ,M) ,M1 ...) (list M M1)] [else 'huh])) ``` For some reason I...

Should this be closed?

Here is a file that provokes a the error: ``` https://gist.github.com/soegaard/0a351e4d2be4f3b19c37 ```

The stack trace highlights this part of pass.rkt ``` (let f ([pclause* pclause*] [alt-tree alt-tree] [rcond-rec-cl* '()] [rcond-case-cl* '()]) #;(printf "length pclause*: ~s\n" (length pclause*)) (if (null? pclause*) (values (reverse...

Also: It would be nice if unquote were printed as , in the error message.