Loading Makefile.in +1 −1 Original line number Diff line number Diff line Loading @@ -119,7 +119,7 @@ float.fm: float.fb forthker.fi $(SYSSRC) -@$(MV) $@ $@~ ./bigforth -e "$(WARNING) use x.fs use glconst.fs include float.fb m' float savemod float $(BYE)" CPYDIST = bigforth/{README,COPYING,CREDITS} CPYDIST = bigforth/{README,COPYING,CREDITS,LGPLv3} DOSDIST = bigforth/{forthker,bigforth,xbigforth}$(EXE) bigforth/{forthker,bigforth}.fi bigforth/{version.h,minos-version.h} Loading gpl-about.m +22 −5 Original line number Diff line number Diff line Loading @@ -10,7 +10,10 @@ public: early open early dialog early open-app | topindex ptr (topindex-00) | topindex ptr (topindex-01) stredit ptr COPYING stredit ptr LGPL button ptr gpl-ok ( [varstart] ) ( [varend] ) how: Loading Loading @@ -48,6 +51,11 @@ gpl-about implements 0 copying edifile ! 1 $10 dpy geometry ELSE drop THEN s" LGPLv3" r/o open-file 0= IF lgpl assign lgpl resized 0 lgpl edifile ! 1 $10 dpy geometry ELSE drop THEN [ previous ] ; ( [methodend] ) : widget ( [dumpstart] ) X" bigFORTH is a native code Forth system, MINOS is a GUI library." text-label new Loading @@ -70,11 +78,20 @@ gpl-about implements X" You should have received a copy of the GNU General Public License" text-label new X" along with this program. If not, see <http://www.gnu.org/licenses/>." text-label new &2 vabox new vfixbox 0 -1 flipper X" GPL" topindex new ^^bind (topindex-00) 0 0 flipper X" LGPL" topindex new ^^bind (topindex-01) topglue new &3 harbox new vfixbox 1 1 vviewport new DS[ (straction stredit new ^^bind COPYING $42 setup-edit &1 vabox new ]DS ( MINOS ) $0 $1 *hfil $0 $1 *vfil glue new &2 habox new &1 habox new panel dup ^^ with C[ (topindex-00) ]C ( MINOS ) endwith 1 1 vviewport new DS[ (straction stredit new ^^bind LGPL $40 setup-edit &1 vabox new ]DS ( MINOS ) &1 habox new flipbox panel dup ^^ with C[ (topindex-01) ]C ( MINOS ) endwith &2 habox new $10 noborderbox &2 borderbox &2 vabox new &5 vabox new &1 vskips $10 $1 *hfill $10 $1 *vfil glue new ^^ S[ close ]S ( MINOS ) X" OK " button new ^^bind gpl-ok Loading minos.fs +18 −0 Original line number Diff line number Diff line \ *** X-Windows Widgets for bigFORTH *** 25aug96py \ Copyright (C) 1996,1997,1998,2000,2003,2004,2005,2006,2007,2008 Bernd Paysan \ This file is part of MINOS \ MINOS is free software; you can redistribute it and/or \ modify it under the terms of the GNU Lesser General Public License \ as published by the Free Software Foundation, either version 3 \ of the License, or (at your option) any later version. \ This program is distributed in the hope that it will be useful, \ but WITHOUT ANY WARRANTY; without even the implied warranty of \ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the \ GNU Lesser General Public License for more details. \ You should have received a copy of the GNU Lesser General Public License \ along with this program; if not, see http://www.gnu.org/licenses/. \ generic loadscreen 21sep07py Loading Loading
Makefile.in +1 −1 Original line number Diff line number Diff line Loading @@ -119,7 +119,7 @@ float.fm: float.fb forthker.fi $(SYSSRC) -@$(MV) $@ $@~ ./bigforth -e "$(WARNING) use x.fs use glconst.fs include float.fb m' float savemod float $(BYE)" CPYDIST = bigforth/{README,COPYING,CREDITS} CPYDIST = bigforth/{README,COPYING,CREDITS,LGPLv3} DOSDIST = bigforth/{forthker,bigforth,xbigforth}$(EXE) bigforth/{forthker,bigforth}.fi bigforth/{version.h,minos-version.h} Loading
gpl-about.m +22 −5 Original line number Diff line number Diff line Loading @@ -10,7 +10,10 @@ public: early open early dialog early open-app | topindex ptr (topindex-00) | topindex ptr (topindex-01) stredit ptr COPYING stredit ptr LGPL button ptr gpl-ok ( [varstart] ) ( [varend] ) how: Loading Loading @@ -48,6 +51,11 @@ gpl-about implements 0 copying edifile ! 1 $10 dpy geometry ELSE drop THEN s" LGPLv3" r/o open-file 0= IF lgpl assign lgpl resized 0 lgpl edifile ! 1 $10 dpy geometry ELSE drop THEN [ previous ] ; ( [methodend] ) : widget ( [dumpstart] ) X" bigFORTH is a native code Forth system, MINOS is a GUI library." text-label new Loading @@ -70,11 +78,20 @@ gpl-about implements X" You should have received a copy of the GNU General Public License" text-label new X" along with this program. If not, see <http://www.gnu.org/licenses/>." text-label new &2 vabox new vfixbox 0 -1 flipper X" GPL" topindex new ^^bind (topindex-00) 0 0 flipper X" LGPL" topindex new ^^bind (topindex-01) topglue new &3 harbox new vfixbox 1 1 vviewport new DS[ (straction stredit new ^^bind COPYING $42 setup-edit &1 vabox new ]DS ( MINOS ) $0 $1 *hfil $0 $1 *vfil glue new &2 habox new &1 habox new panel dup ^^ with C[ (topindex-00) ]C ( MINOS ) endwith 1 1 vviewport new DS[ (straction stredit new ^^bind LGPL $40 setup-edit &1 vabox new ]DS ( MINOS ) &1 habox new flipbox panel dup ^^ with C[ (topindex-01) ]C ( MINOS ) endwith &2 habox new $10 noborderbox &2 borderbox &2 vabox new &5 vabox new &1 vskips $10 $1 *hfill $10 $1 *vfil glue new ^^ S[ close ]S ( MINOS ) X" OK " button new ^^bind gpl-ok Loading
minos.fs +18 −0 Original line number Diff line number Diff line \ *** X-Windows Widgets for bigFORTH *** 25aug96py \ Copyright (C) 1996,1997,1998,2000,2003,2004,2005,2006,2007,2008 Bernd Paysan \ This file is part of MINOS \ MINOS is free software; you can redistribute it and/or \ modify it under the terms of the GNU Lesser General Public License \ as published by the Free Software Foundation, either version 3 \ of the License, or (at your option) any later version. \ This program is distributed in the hope that it will be useful, \ but WITHOUT ANY WARRANTY; without even the implied warranty of \ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the \ GNU Lesser General Public License for more details. \ You should have received a copy of the GNU Lesser General Public License \ along with this program; if not, see http://www.gnu.org/licenses/. \ generic loadscreen 21sep07py Loading
