Some bug. I think it may be in routes

[Александр Бокарев]

I really do not know, is it fixed?
I've added many routes like:

(restas:define-route name1 ("/name1:(id)")
  (:requirement #'admin-user-p) ;where admin-user-p is to (compute-user-login-name) and check rights in DB
  (functions here))

(restas:define-route name2 ("/name2:(id)")
  (:requirement #'admin-user-p) ;where admin-user-p is to (compute-user-login-name) and check rights in DB
  (functions here))

(restas:define-route name3 ("/name3:(id)")
  (:requirement #'admin-user-p) ;where admin-user-p is to (compute-user-login-name) and check rights in DB
  (functions here))

All was fine untill:

(restas:define-route name9000 ("/name9000:(id)") ; Where 9000 is some last number in this list of routes
  (:requirement #'admin-user-p)
  (functions here))

Compiling name9000 give me error, that:
The value #<ROUTES:OR-TEMPLATE #{VALUE}> is not of type LIST.

#{VALUE} is something about name8998 and name8999. I mean LAST route with error -1 and LAST -2

recompiling any other route give this error for name8998 and name8999

OK. Stopping SBCL (ubuntu 12.04). Erasing name9000 from source.

Start SBCL, (ql:quickload "my-system") - all is fine again.

Then again.


(restas:define-route name9000 ("/name9000:(id)") ; Where 9000 is some last number in this list of routes
  (:requirement #'admin-user-p)
  (functions here))

Compiling name9000 give me error, that:
The value #<ROUTES:OR-TEMPLATE #{VALUE}> is not of type LIST.

Stopping again, reboot ubuntu, and defining like this:

(restas:define-route name9000 ("/test/name9000:(id)")
  (:requirement #'admin-user-p)
  (functions here))

gives NO error :)

[Orivej Desh]

Would you post a call trace with the error?

1. Delete route 9000 from source.
2. (ql:quickload "my-system")
3. (trace "ROUTES" "RESTAS")
4. Eval define-route name9000 alone to trigger the error.