Re: [Artanis] "Invalid keyword" Error when Trying to `create-table`

[Jonathan Schmeling]

Hey; sorry about just dropping off, like that. Life crept up on me.

But I've had some free time! And tried picking back up where I'd been 
before.

I'm still pointing to Artanis's master branch and did a rebuild and 
tried running the create migration, again, but I ran into an error, once 
more; on the upside, it does seem to be different from last time, as 
opposed to being exactly the same. It's:

[Migrating PEOPLE_20180910180518.scm]
;;; note: auto-compilation is enabled, set GUILE_AUTO_COMPILE=0
;;;       or pass the --no-auto-compile argument to disable.
;;; compiling /myapp/db/migration/PEOPLE_20180910180518.scm
;;; compiled 
/root/.cache/guile/ccache/2.2-LE-8-3.A/myapp/db/migration/PEOPLE_20180910180518.scm.go
Creating table `PEOPLE'......Backtrace:
           14 (apply-smob/1 #<catch-closure 562c90468260>)
In ice-9/boot-9.scm:
     705:2 13 (call-with-prompt _ _ #<procedure default-prompt-handle…>)
In ice-9/eval.scm:
     619:8 12 (_ #(#(#<directory (guile-user) 562c904c9140>)))
In /usr/local/bin/art:
     42:12 11 (_ _ _)
In artanis/mvc/migration.scm:
      89:4 10 (create-table PEOPLE (ID auto (#:primary-key)) (# # #) # …)
In artanis/fprm.scm:
    377:18  9 (_ PEOPLE ((ID serial (#:no-edit #:not-null #)) (# …) …) …)
In ice-9/boot-9.scm:
    222:29  8 (map1 ((ID serial (#:no-edit #:not-null #)) (# # 32 …) …))
    222:29  7 (map1 ((USERNAME varchar 32 (#:not-null #:unique)) (…) …))
    222:29  6 (map1 ((PASSWORD varchar 500 (#:not-null)) (SALT # …) …))
    222:29  5 (map1 ((SALT varchar 500 (#:not-null)) (NAME # 32 #) #))
    222:17  4 (map1 ((NAME varchar 32 (#:default "")) (SUMMARY # # …)))
In artanis/fprm.scm:
    369:19  3 (->types _)
     355:7  2 (->type/opts _)
In srfi/srfi-1.scm:
    501:18  1 (fold-right #<procedure 562c909a19e0 at artanis/fprm…> . #)
In artanis/fprm.scm:
    357:19  0 (_ "" ())

artanis/fprm.scm:357:19: Throw to key `artanis-err' with args `(500 
#<procedure ->mysql-opts (x opts)> "Invalid opts `~a' for MySQL table 
definition!" "")'.

My migration is pretty much the same as last time:

(migrate-create
   (create-table
     'PEOPLE
     '(ID       auto       (#:primary-key))
     '(USERNAME char-field (#:maxlen  32  #:not-null #:unique))
     '(PASSWORD char-field (#:maxlen 500  #:not-null))
     '(SALT     char-field (#:maxlen 500  #:not-null))
     '(NAME     char-field (#:maxlen  32  #:default  ""))
     '(SUMMARY  char-field (#:maxlen 500  #:default ""))))

Let me know if there's anything else you need or will help with figuring 
out what's going on and I'm happy to do so. Thanks!

Jonathan

On 10/2/18 12:21 AM, Nala Ginrut wrote:
> Hi Jonathan!
> Sorry for late reply.
> This bug has been fixed:
> https://gitlab.com/NalaGinrut/artanis/commit/15f5cc1f1584ef02908cce21eb6f9f4aaeda3ac8
>
> Please update and try.
>
> Best regards.
>
>
> Jonathan Schmeling writes:
>
>> Sorry to E-mail, again, so soon but I may've found another bug.
>>
>> After updating to the latest in the master branch from the previous
>> stable release, I noticed that trying to create a table with the call I
>> had been using no longer worked.
>>
>> The call I'd been using was:
>>
>> (migrate-create
>>    (create-table
>>    'PEOPLE
>>    '(ID auto (#:primary-key))
>>    '(USERNAME char-field (#:maxlen 32 #:not-null #:unique))
>>    '(PASSWORD char-field (#:maxlen 500 #:not-null))
>>    '(SALT char-field (#:maxlen 500 #:not-null))
>>    '(NAME char-field (#:maxlen 32))
>>    '(SUMMARY char-field (#:maxlen 500))))
>>
>> After updating to get the session fix, it now throws the error:
>>
>> Creating table `PEOPLE'......Backtrace:
>>    5 (apply-smob/1 #<catch-closure 55c8442c0b80>)
>> In ice-9/boot-9.scm:
>>    705:2 4 (call-with-prompt _ _ #<procedure default-prompt-handle…>)
>> In ice-9/eval.scm:
>>    619:8 3 (_ #(#(#<directory (guile-user) 55c844356140>)))
>> In /usr/local/bin/art:
>>    42:12 2 (_ _ _)
>> In artanis/mvc/migration.scm:
>>    89:4 1 (create-table PEOPLE (ID auto (#:primary-key)) (# # #) # …)
>> In artanis/fprm.scm:
>>    375:2 0 (_ _ _ #:if-exists? _ #:engine _ #:dump _ #:primary-keys …)
>>
>> artanis/fprm.scm:375:2: Invalid keyword: (USERNAME varchar 32
>> (#:not-null #:unique))
>>
>> Trying to isolate the error to a particular keyword, I tried removing
>> the #:unique keyword and then the #:not-null keywords but I still got
>> the same error. I didn't bother removing the #:maxlens since, if I
>> remember correctly, that caused an error in the last stable release.
>>
>> Jonathan
>
> --
> GNU Powered it
> GPL Protected it
> GOD Blessed it
> HFG - NalaGinrut
> Fingerprint F53B 4C56 95B5 E4D5 6093 4324 8469 6772 846A 0058