25/4/12

Rebol: Grabar lista de objetos y recuperarla

REBOL[title: "Grabar y recuperar lista de objetos"]

obj1: make object![
 id: 1
 nomb: "Uno"
]

obj2: make object![
 id: 2
 nomb: "Dos"
]

lObj: copy []

append/only :lObj to-block obj1 ; only para que inserte como bloque y to-block para que haga un bloque del objeto.
        ; no mola nada esta forma de hacer las cosas
        ; ¿Qué diferencia hay entre un bloque y un objeto en realidad?
append/only :lObj to-block obj2

print mold lObj ; para ver lo que rebol grabaría

fich: %ListaObjectos.r 

save :fich :lObj

listaRecuperada: load :fich

print :listaRecuperada/1 ; imprimir primer elemento
print :listaRecuperada/2

Mercurial

* hg init <--Para crear el repositorio. Se ejecuta en el directorio a controlar.
* hg add <-- Para añadir la primera vez.
* hg ci -u ivancruz <-- Para hacer un commit
* hg log <-- Para ver las versiones
* hg update  <-- Para volver a una versión anterior