2021-08-26 09:57:08 (UTC-03:00)

Marcel Rodrigues <marcelgmr@gmail.com>

shp: add SF:print_summary()

diff --git a/shp.lua b/shp.lua
index 6cf4d1b..e311f7d 100644
--- a/shp.lua
+++ b/shp.lua
@@ -76,6 +76,20 @@ function SF:search(field_name, value)
     end
 end
 
+function SF:print_summary(n)
+    n = n or 5
+    local sep = ":"
+    for i = 1, #self.fields do
+        local field = self.fields[i]
+        local row = {field.name}
+        for j = 1, n do
+            table.insert(row, self.tab[j][i])
+        end
+        print(table.concat(row, sep))
+    end
+    print("records".. sep .. #self.tab)
+end
+
 function SF:tab2csv(sep, fp)
     -- TODO: refactor to use table.concat(str_list, sep)
     sep = sep or ":"