| … | … | @@ -25,7 +25,7 @@ |
| 25 | 25 | (cog-set-value! (Concept "a") (Predicate "blo") (FloatValue 4 5 6)) |
| 26 | 26 | |
| 27 | 27 | ; Take a look at it: |
| 28 | (cog-keys->alist (Concept "a")) | |
| 28 | (cog-keys (Concept "a")) | |
| 29 | 29 | |
| 30 | 30 | ; Save it: |
| 31 | 31 | (store-atom (Concept "a")) |
| … | … | @@ -42,7 +42,7 @@ |
| 42 | 42 | (fetch-value (Concept "a") (Predicate "blo")) |
| 43 | 43 | |
| 44 | 44 | ; Take a look at it: |
| 45 | (cog-keys->alist (Concept "a")) | |
| 45 | (cog-keys (Concept "a")) | |
| 46 | 46 | |
| 47 | 47 | ; Change the value (but don't store it) |
| 48 | 48 | (cog-set-value! (Concept "a") (Predicate "blo") (StringValue "a" "b" "c")) |
| … | … | @@ -53,7 +53,7 @@ |
| 53 | 53 | ; Verify that all of the keys arrived. Notice that the "new" Value |
| 54 | 54 | ; on (Predicate "blo") was clobbered by the one fetched from the |
| 55 | 55 | ; database. |
| 56 | (cog-keys->alist (Concept "a")) | |
| 56 | (cog-keys (Concept "a")) | |
| 57 | 57 | |
| 58 | 58 | ; Optionally close the connection. |
| 59 | 59 | ; Not strictly required; cleanup happens anyway, on exit. |
| … | … | @@ -33,7 +33,7 @@ |
| 33 | 33 | ; ------------- |
| 34 | 34 | ; Erase everything in the AtomSpace. Do this to avoid confusion in |
| 35 | 35 | ; the next steps. Alternately, quit guile, and restart guile. |
| 36 | (clear) | |
| 36 | (cog-atomspace-clear) | |
| 37 | 37 | |
| 38 | 38 | ; ------------- |
| 39 | 39 | ; Loading Atoms |
| … | … | @@ -170,7 +170,7 @@ |
| 170 | 170 | ; the entire incoming set of (Concept "B"). More info about JoinLinks |
| 171 | 171 | ; can be found on the wiki page https://wiki.opencog.org/w/JoinLink |
| 172 | 172 | |
| 173 | (define b-holders (MaximalJoin (Present (Concept "B")))) | |
| 173 | (define b-holders (MaximalJoin (Concept "B"))) | |
| 174 | 174 | |
| 175 | 175 | ; Just like before... |
| 176 | 176 | (fetch-query b-holders results-key) |
| … | … | @@ -80,8 +80,8 @@ |
| 80 | 80 | (store-atom (Concept "bar")) |
| 81 | 81 | |
| 82 | 82 | (cog-set-atomspace! mid2-space) |
| 83 | (cog-set-value! (ListLink (Concept "foo") (Concept "bar") | |
| 84 | (Predicate "key") (FloatValue 1 0 5))) | |
| 83 | (cog-set-value! (ListLink (Concept "foo") (Concept "bar")) | |
| 84 | (Predicate "key") (FloatValue 1 0 5)) | |
| 85 | 85 | (store-atom (ListLink (Concept "foo") (Concept "bar"))) |
| 86 | 86 | |
| 87 | 87 | ; Change the ctv on `foo`. This will hade the earlier value. |