GUI-demo DLL friendly

[HPW]

Could it be possible to make the demo-lsp DLL friendly?



Needed changes:

Code Select Expand


(if (=(>>(sys-info -1)6)1) ;DLL
    (gs:init nil nil true)
    (gs:init)
)


(if (=(>>(sys-info -1)6)1) ;DLL
    (gs:listen true)
    (gs:listen)
)


Of cource the gs:init change need the new suggested third parameter.