Destructuring macro for ST-JSON JSO object -


There is another question about JSON encoding in my normal Lisp. I settled on ST-JSON as my tool. I am able to get a JSO object with JSON data and I am using all fields with st-json: getjso . I wanted to write a macro similar to theory in destructuring-bind which would provide local binding to the variable named after the JSON field (since then I suspected that this is a good idea, but it is a Different question). I came up with the following: 

  (defmacro destruct-jso (jso and body body) (let's value values) (st-json: mapjso # '(lambda (key value) (push ) () Value (push value value) jso) `(demolition-dam, keys, value, body))   
 But when I call it the  JSO  object , I get the error  value PARAMS is not the required type structure. Can anyone explain this to me, where is  PARAMS  object?  
 Thank you.   
 
 
 Obviously, you have  destruct-jso  like this:  
  (let's (params (St-Jason: reading-jason-to-string "{\" foo \ ": 42, \" bar \ ": \" baz \ "}"))) ( Rebel-JSO Parameters (List Foo Bar)))   
 However,  destruct-jso , becomes a macro, becomes the macro extension handled over time, long ago JSON parsed  parameters  Your macro has been passed as a symbol without evaluation; And even if an attempt was made to evaluate it, it would be unbound.  
 So, if you want to write  destruct-jso , then you will need a list of keys at the time of macro expansion. You can pass the list in a normal way:  
  & gt; (Defmacro destructure-jso-2 (Works Jason and Body Body) `(, (Map Maker # '(Lamb) (list var` (getjso, (string-downcase), jsn)) Vars ), @Body)) Distinctive-JSO-2 & gt; ((Param (st-jeson: reading-jason-to-string) {\ "foo \": 42, \ "bar \": \ "baz \"}))) (district-jso-2 (foo bar) ) Use the "Template" JSON to create a mapping:   
   
 Parameters (list foo bar)) (42 "punk")   
 pre>  & gt; (Demetrakro Structure - JS-3 (Template Jason and Body Body) (Penalties) (St-Jason: Mapz # '(Lambda (Head Val) (Announce) (Pukara (List) (Push (List (Intern (String- Ups (key)) (`jezo, key, jsno) binding) (ST-JSN: reading-jsn-to-scheme template))` (let's, binding, @ body))) Districts -JSO-3 & gt; (( Mercury (St -Jeson: read-jsn-string "{\" foo "" 42: "\" bar \ ": \" baz \ "}"))) (district-jso-3 "{\" foo " : Nul L, \ "bar \": null} "parameters (list foo bar)) (42" hawk ")   
 Here, variable bindings first (template) JSON, value from second. JSON macroexpansion is parsed at time,  parameter  JSON every time your code is executed.  
 Whether any of these are a useful way for you or not, I do not know.

Comments

Post a Comment

Popular posts from this blog

Java - Error: no suitable method found for add(int, java.lang.String) -

I'm in the middle of homework work and I'm stuck. At this point in my code, I think that I should have a GUI window that opens and allows me to type "inserted text number". Notice is not going anywhere but at this point, If I pass through the problem then it will be in a linked list. I am getting two of the same error for the lines. Add (index, element); And I can not seem to get past it, there is no suitable method for the error "add (int, java. string string)". Code is below, please advise. To clarify - this will not be a method error because it is a linked list. There should not be any way involved. import java.awt. *; Import java.awt.event. *; Import javax.swing. *; Import java.util. *; Import java.util.Scanner; Import java.util.LinkedList; Public class TopTenList JFrame {Private TopTenList tt; See the Private JTextArea list; Private JTextField cmdTextField; Private JTextField resultsTestfield; // This GUI window is the code for the public toptist...
Read more

java - JPA TypedQuery: Parameter value element did not match expected type -

I am using JPA 2.0 and getting the following code in the DAO layer: Public Zero Test () {string key = "status"; String [] Conditions = {"A", "B"}; & Lt; TestTable & gt; Results = Search (Keys, Conditions); } Public listing & lt; TestTable & gt; Search (string key, object value error) {string sql = "test ndf to testlet and jade nand." + Key + "in:" + key; TypedQuery & LT; TestTable & gt; Query = entityManager.createQuery (SQL, TestTable.class); Query.setParameter (key, Arrays.asList (valueArr)) / *** Error Line *** Return query.getResultList (); } In the above error line, it throws the following exception: java.lang.IllegalArgumentException: parameter value element [[Ljava.lang.String; @ cbe5bc] did not match the expected type [java.lang.String] Why is this expected type string while actually this string []? Please help! Note: This is derived from the normal routine and is a simplified code. I can no...
Read more

c++ - static template member variable has internal linkage but is not defined -

Yes, I know, there is a question with almost the same title, but it refers to a different situation. Error message) In my case, I have a .cpp file with a big named designation name (implementation details). There is a property class template with a static data member in that name space, which I need to access from outside the unknown namespace. I give it a little bit of meat: file.hpp namespace Bar {template & lt; Typename A & gt; Struct foo {static_assert (is_same & lt; a, float & gt; :: value} is_same & lt; a, double>: value, ""); Fixed zero set_static_var (a const & x); // ...}; } and file.cpp namespace {template & lt; Typename A & gt; Struct foo_traits {// supports the implementation of several static code bars: foo & lt; & Gt; Fixed A data; }; The template's & lt; & Gt; Float foo_traits & lt; Float & gt; :: datum; // No change if this is in the global namespace template & lt; & Gt; Doub...
Read more