Inserting a statement between BEGIN and END

[trevarj]

Hi,

I'm trying to create a trigger using sqlite, which requires a semi-colon to be after each statement between BEGIN and END. Is there a way to do this with the DSL?

(emacsql nil
           [:create-trigger
            trigger_name
            :after :insert :on foo
            :begin
            :update
            events
            :set (= bar 1) 
            :end])

which gives the SQL:

CREATE TRIGGER trigger_name AFTER INSERT ON foo 
BEGIN 
    UPDATE events 
    SET bar = 1 -- <-- need semi-colon here
END;

Thanks

[trevarj]

Turns out you can do this:

(emacsql nil
           [:create-trigger
            trigger_name
            :after :insert :on foo
            :begin
            :update
            events
            :set (= bar 1) 
            :\;
            :end])