tutorial & demo

Author: lukaszcz

Makefile

@@ -110,10 +110,11 @@ ALLPASFILES := $(patsubst %.pas.mcp, %.pas, $(wildcard *.pas.mcp))
 ADTUNITS := $(patsubst %.pas, %$(obj_suffix), $(ALLPASFILES))
 TESTPROGS := $(patsubst %.pas, %$(prog_suffix), $(wildcard tests/*.pas))
 TESTUNITS := $(patsubst %.pas, %$(obj_suffix), $(wildcard tests/units/*.pas))
+DEMOPROGS := $(patsubst %.pas, %$(prog_suffix), $(wildcard demo/customer/*.pas))
 
 TOOLSDEPS := $(wildcard tools/*.pas tools/*.c tools/*.h)
 
-.PHONY : test install static dynamic smart all units tests debug windows docs clean cleandocs cleanprogs fastclean tools check
+.PHONY : test install static dynamic smart all units tests debug demo windows docs clean cleandocs cleanprogs fastclean tools check
 
 all : units tests
 
@@ -138,6 +139,8 @@ tests : units $(TESTPROGS) $(TESTUNITS)
 
 debug : units tests
 
+demo : units $(DEMOPROGS)
+
 windows : units
 
 tools : tools.dep

README.md

@@ -1,5 +1,6 @@
-PascalAdt is a library of data structures and algorithms for Free
-Pascal and Delphi, inspired by the C++ STL library.
+[PascalAdt](https://pascaladt.github.io) is a library of data
+structures and algorithms for Free Pascal inspired by the C++ STL
+library.
 
 Features
 --------
@@ -28,12 +29,15 @@ Installation and usage
 ----------------------
 * Compilation: `make`
 * Tests: `make test`
-* Installation `make install`
+* Installation: `make install`
+* [Demo](demo/customer/customer.pas) compilation: `make demo`
 
 Documentation
 -------------
 
-See [docsrc/tutorial.txt](docsrc/tutorial.txt) and [demo/customer/customer.pas](demo/customer/customer.pas).
+[PascalAdt documentation](https://pascaladt.github.io/pascaladt-docs/index.html) is available at the [PascalAdt webpage](https://pascaladt.github.io/). It includes a tutorial and the API documentation auto-generated from sources with the [SrcDoc](https://github.com/lukaszcz/srcdoc/) program.
+
+See also [docsrc/tutorial.txt](docsrc/tutorial.txt) and [demo/customer/customer.pas](demo/customer/customer.pas).
 
 Copyright and license
 ---------------------

adtstralgs.pas.mcp

@@ -392,6 +392,7 @@ begin
    tab := KmpReverseComputeTable(str2);
 
    len := Length(str2);
+   Result := nil;
    SetLength(Result, len + 2);
    filler := len + 2;
    for i := 0 to len do

cleanup.sh

@@ -42,10 +42,7 @@ if [ "$REPLY" = "yes" ]; then
     cd units
     rm -f `ls -1 | grep '~'`
     rm -f `ls -1 | egrep -v "${FILES_TO_RETAIN}"'|(cpu)'`;
-    cd cpu
-    rm -f `ls -1 | grep '~'`
-    rm -f `ls -1 | egrep -v "${FILES_TO_RETAIN}"'|(license.txt)'`;
-    cd ../../../demo
+    cd ../../demo
     rm -f `ls -1 | grep '~'`
     rm -f `ls -1 | egrep -v "${FILES_TO_RETAIN}"'|(customer)|(Makefile)'`;
     cd customer