File: normal_json.ads

package info (click to toggle)
polyorb 2.11~20140418-3
  • links: PTS, VCS
  • area: main
  • in suites: jessie, jessie-kfreebsd
  • size: 30,012 kB
  • ctags: 465
  • sloc: ada: 273,015; sh: 4,507; makefile: 4,265; python: 1,332; cpp: 1,213; java: 507; ansic: 274; xml: 30; perl: 23; exp: 6
file content (12 lines) | stat: -rw-r--r-- 347 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
 
with RT_JSON;
with GNATCOLL.JSON;

package Normal_JSON is
   type JSON_Holder is new RT_JSON.JSON_Holder with record
      Value : GNATCOLL.JSON.JSON_Value;
   end record;

   function Wrap (J : GNATCOLL.JSON.JSON_Value) return RT_JSON.JSON_Wrapper;
   function Unwrap (W : RT_JSON.JSON_Wrapper) return GNATCOLL.JSON.JSON_Value;

end Normal_JSON;