agent | 27 Apr 20:12

[chatter] r11783 - trunk/gwydion/d2c/runtime/dylan

Author: agent
Date: Sun Apr 27 20:14:57 2008
New Revision: 11783

Modified:
   trunk/gwydion/d2c/runtime/dylan/limited-collection.dylan
Log:
Job: minor
Detabbed file.

Modified: trunk/gwydion/d2c/runtime/dylan/limited-collection.dylan
==============================================================================
--- trunk/gwydion/d2c/runtime/dylan/limited-collection.dylan	(original)
+++ trunk/gwydion/d2c/runtime/dylan/limited-collection.dylan	Sun Apr 27 20:14:57 2008
@@ -56,9 +56,9 @@
     (type :: <limited-collection>, #rest supplied-keys, #key, #all-keys)
  => (instance :: <collection>)
   apply(make-limited-collection,
-	type.limited-type-base-class,
-	type.limited-element-type,
-	type, supplied-keys);
+        type.limited-type-base-class,
+        type.limited-element-type,
+        type, supplied-keys);
 end method make;

 // Note that we should specify tight return types on the individual methods,
@@ -152,11 +152,11 @@
   let choice =
     case
(Continue reading)

agent | 27 Apr 18:29

[chatter] r11782 - in trunk/libraries/monday: examples/calc examples/simple-compiler lib/compression/coding lib/language/grammar lib/language/regular lib/language/simple-parser lib/markup/entmgr lib/markup/xml-sax lib/program-representation/cpr lib/program-representation/source-location lib/program-representation/system-f tools/language/parsergen tools/program/cpr-cpp

Author: agent
Date: Sun Apr 27 18:30:23 2008
New Revision: 11782

Modified:
   trunk/libraries/monday/examples/calc/calc.lid
   trunk/libraries/monday/examples/simple-compiler/simple-compiler.lid
   trunk/libraries/monday/lib/compression/coding/coding.lid
   trunk/libraries/monday/lib/language/grammar/grammar.lid
   trunk/libraries/monday/lib/language/regular/regular.lid
   trunk/libraries/monday/lib/language/simple-parser/simple-parser.lid
   trunk/libraries/monday/lib/markup/entmgr/entity-manager.lid
   trunk/libraries/monday/lib/markup/xml-sax/xml-sax.lid
   trunk/libraries/monday/lib/program-representation/cpr/cpr.lid
   trunk/libraries/monday/lib/program-representation/source-location/source-location.lid
   trunk/libraries/monday/lib/program-representation/system-f/system-f.lid
   trunk/libraries/monday/tools/language/parsergen/parsergen.lid
   trunk/libraries/monday/tools/program/cpr-cpp/cpr-cpp.lid
Log:
Job: minor
Removed .dylan file extensions; OD doesn't care, but GD does.

Modified: trunk/libraries/monday/examples/calc/calc.lid
==============================================================================
--- trunk/libraries/monday/examples/calc/calc.lid	(original)
+++ trunk/libraries/monday/examples/calc/calc.lid	Sun Apr 27 18:30:23 2008
@@ -1,4 +1,4 @@
 Library: calc
 Executable: calc
-Files: calc-exports.dylan
(Continue reading)

agent | 27 Apr 18:04

[chatter] r11781 - trunk/libraries/collection-extensions

Author: agent
Date: Sun Apr 27 18:04:43 2008
New Revision: 11781

Modified:
   trunk/libraries/collection-extensions/collection-utils.dylan
Log:
Job: minor
Fixed collection-extensions:collection-utilities:key-exists?

Modified: trunk/libraries/collection-extensions/collection-utils.dylan
==============================================================================
--- trunk/libraries/collection-extensions/collection-utils.dylan	(original)
+++ trunk/libraries/collection-extensions/collection-utils.dylan	Sun Apr 27 18:04:43 2008
@@ -55,9 +55,9 @@
     (collection :: <collection>, key)
  => (key-exists? :: <boolean>, value :: <object>);
   let result = element(collection, key, default: $not-found);
-  if (result)
-    values(#t, result);
+  if (result == $not-found)
+    values(#f, #f);
   else
-    values(#f, result);
+    values(#t, result);
   end if;
 end method key-exists?;
_______________________________________________
chatter mailing list
chatter <at> lists.opendylan.org
(Continue reading)

cgay | 27 Apr 13:09

[chatter] r11778 - in trunk/fundev/sources: dylan/tests functional-dylan/tests system/locators system/tests

Author: cgay
Date: Sun Apr 27 13:13:03 2008
New Revision: 11778

Modified:
   trunk/fundev/sources/dylan/tests/control.dylan
   trunk/fundev/sources/functional-dylan/tests/functions.dylan
   trunk/fundev/sources/system/locators/web-locators.dylan
   trunk/fundev/sources/system/tests/date.dylan
   trunk/fundev/sources/system/tests/temp-files.dylan
Log:
job: fd
Fixed some compiler warnings in the dylan-test-suite.  Please
carefully review the change from check-equal to check-condition.  I
convinced myself this is correct after reading the Parameter Lists
section in the DRM again, but it's a bit complicated.

A few other minor changes as well.

Modified: trunk/fundev/sources/dylan/tests/control.dylan
==============================================================================
--- trunk/fundev/sources/dylan/tests/control.dylan	(original)
+++ trunk/fundev/sources/dylan/tests/control.dylan	Sun Apr 27 13:13:03 2008
@@ -488,11 +488,11 @@
   check-equal("one param call one arg",
 	     (method (x) x end)(1), 1);
   check-condition("no param call one arg", <error>,
-   		  no-param-function(1));
+                  apply(no-param-function, #[1]));
   check-condition("one param call no args", <error>,
(Continue reading)

cgay | 27 Apr 13:22

[chatter] r11779 - in trunk/fundev/sources: environment/manager lib/release-info

Author: cgay
Date: Sun Apr 27 13:23:51 2008
New Revision: 11779

Modified:
   trunk/fundev/sources/environment/manager/commands.dylan
   trunk/fundev/sources/lib/release-info/libraries.dylan
Log:
job: minor
Add some comments.

Modified: trunk/fundev/sources/environment/manager/commands.dylan
==============================================================================
--- trunk/fundev/sources/environment/manager/commands.dylan	(original)
+++ trunk/fundev/sources/environment/manager/commands.dylan	Sun Apr 27 13:23:51 2008
@@ -112,6 +112,7 @@
   // where "<>" surrounds 'placeholders' and "[]" indicates "optional"
   // Any of the placeholders may be empty.

+  // Replace with common-dylan:split. --cgay
   local
     method split
 	(string :: <string>, char :: <character>)

Modified: trunk/fundev/sources/lib/release-info/libraries.dylan
==============================================================================
--- trunk/fundev/sources/lib/release-info/libraries.dylan	(original)
+++ trunk/fundev/sources/lib/release-info/libraries.dylan	Sun Apr 27 13:23:51 2008
@@ -461,8 +461,9 @@
   root-category.info-subcategories
(Continue reading)

agent | 27 Apr 18:00

[chatter] r11780 - trunk/libraries/utilities/peg-parser

Author: agent
Date: Sun Apr 27 18:02:27 2008
New Revision: 11780

Modified:
   trunk/libraries/utilities/peg-parser/parser-definers.dylan
   trunk/libraries/utilities/peg-parser/parser-rules.dylan
   trunk/libraries/utilities/peg-parser/parser-support.dylan
Log:
Job: minor
* Added add'l optional type specs to macros.
* Fixed semicolon error in afterwards clause.
* Improved collect-subelements function.

Modified: trunk/libraries/utilities/peg-parser/parser-definers.dylan
==============================================================================
--- trunk/libraries/utilities/peg-parser/parser-definers.dylan	(original)
+++ trunk/libraries/utilities/peg-parser/parser-definers.dylan	Sun Apr 27 18:02:27 2008
@@ -5,7 +5,7 @@
 // rule parsers parse a stream in a given context and return a value or sequence
 // of values called the "product."

-/// SYNOPSIS: Defines an arbitrary 'rule parser'.
+/// SYNOPSIS: Defines an arbitrary rule parser.
 /// DISCUSSION: This macro defines a rule parser that includes support for
 /// debugging and other features described for rule parsers. The main part of
 /// the parser is Dylan code supplied by you.
@@ -53,7 +53,7 @@
 end macro;

(Continue reading)

hannes | 26 Apr 13:03

[chatter] r11777 - trunk/www

Author: hannes
Date: Sat Apr 26 13:03:55 2008
New Revision: 11777

Modified:
   trunk/www/community.phtml
   trunk/www/footer.html
   trunk/www/news.phtml
   trunk/www/ports.phtml
   trunk/www/shared.inc
Log:
Job: website
update to new mailing list names ("gd-" prefix is gone)

Modified: trunk/www/community.phtml
==============================================================================
--- trunk/www/community.phtml	(original)
+++ trunk/www/community.phtml	Sat Apr 26 13:03:55 2008
@@ -72,41 +72,34 @@
 </dd>
 <dl>
 <dt>
-<strong><a href="/mailman/listinfo/gd-hackers">gd-hackers</a></strong>
-<a href="mailto:gd-hackers-request <at> gwydiondylan.org?subject=subscribe">subscribe</a>
-<a href="/pipermail/gd-hackers/">archives</a>
+<strong><a href="/mailman/listinfo/hackers">hackers</a></strong>
+<a href="mailto:hackers-request <at> lists.opendylan.org?subject=subscribe">subscribe</a>
+<a href="/pipermail/hackers/">archives</a>
 </dt>
 <dd><p>Our public development list. Here's where we talk about improving
(Continue reading)

hannes | 26 Apr 12:59

[chatter] r11776 - trunk/www/books/dpg

Author: hannes
Date: Sat Apr 26 13:02:57 2008
New Revision: 11776

Modified:
   trunk/www/books/dpg/db_253.html
Log:
Job: website
unindent the "end class"

Modified: trunk/www/books/dpg/db_253.html
==============================================================================
--- trunk/www/books/dpg/db_253.html	(original)
+++ trunk/www/books/dpg/db_253.html	Sat Apr 26 13:02:57 2008
@@ -32,7 +32,7 @@
   // smaller than another comparison value</em>
   constant slot comparison-function :: &lt;function&gt; = \&lt;,
     init-keyword: comparison-function:;
-    end class &lt;sorted-sequence&gt;; </pre></td></tr></table>
+end class &lt;sorted-sequence&gt;; </pre></td></tr></table>
 <p>Because is there is a well-defined ordering of the elements of sorted sequences, we choose
<code>&lt;sequence&gt;</code> to be the superclass of <code>&lt;sorted-sequence&gt;</code>. We
use the built-in collection class called <code>&lt;stretchy-vector&gt;</code> to store the elements
of our sorted sequence, because we want to be able to have the sorted sequence grow to any size in a
convenient way.</p>
 <p>The slots <code>comparison-function</code> and <code>value-function</code> are constant slots,
because we intend to have clients specify these functions only when they create the sorted sequence. If we
had decided to let clients change the value of these slots, we would have made the slots virtual, so that we
could reorder the data vector after either function had changed. </p>
 <p>Now that we have covered the structure and initialization of the sorted sequence data structure, we can
(Continue reading)

andreas | 26 Apr 12:03

[chatter] r11775 - in trunk/fundev/sources: databases/odbc-ffi databases/sql-odbc registry/generic

Author: andreas
Date: Sat Apr 26 12:05:14 2008
New Revision: 11775

Added:
   trunk/fundev/sources/databases/odbc-ffi/sql-unix.dylan
      - copied, changed from r11774, trunk/fundev/sources/databases/odbc-ffi/sql.dylan
   trunk/fundev/sources/databases/odbc-ffi/sqlext-unix.dylan
      - copied, changed from r11774, trunk/fundev/sources/databases/odbc-ffi/sqlext.dylan
   trunk/fundev/sources/registry/generic/odbc-ffi   (contents, props changed)
Modified:
   trunk/fundev/sources/databases/odbc-ffi/constant.dylan
   trunk/fundev/sources/databases/odbc-ffi/odbc-library.dylan
   trunk/fundev/sources/databases/odbc-ffi/unix-odbc.lid
   trunk/fundev/sources/databases/sql-odbc/binding.dylan
   trunk/fundev/sources/databases/sql-odbc/conditions.dylan
Log:
job: fd

Make ODBC binding work on Unixen, support for LONGVARCHAR.

Modified: trunk/fundev/sources/databases/odbc-ffi/constant.dylan
==============================================================================
--- trunk/fundev/sources/databases/odbc-ffi/constant.dylan	(original)
+++ trunk/fundev/sources/databases/odbc-ffi/constant.dylan	Sat Apr 26 12:05:14 2008
@@ -90,6 +90,14 @@
 define constant $SQL-DOUBLE                         =    8;
 define constant $SQL-DATETIME                       =    9;
 define constant $SQL-VARCHAR                        =   12;
+define constant $SQL-LONGVARCHAR                    =   -1;
(Continue reading)

andreas | 3 Apr 14:05

r11774 - trunk/fundev/sources/lib/run-time/pentium-freebsd

Author: andreas
Date: Thu Apr  3 14:05:42 2008
New Revision: 11774

Modified:
   trunk/fundev/sources/lib/run-time/pentium-freebsd/x86-freebsd-build.jam
Log:
job: fd

Set rpath in .so files too.

Modified: trunk/fundev/sources/lib/run-time/pentium-freebsd/x86-freebsd-build.jam
==============================================================================
--- trunk/fundev/sources/lib/run-time/pentium-freebsd/x86-freebsd-build.jam	(original)
+++ trunk/fundev/sources/lib/run-time/pentium-freebsd/x86-freebsd-build.jam	Thu Apr  3 14:05:42 2008
@@ -336,7 +336,7 @@
 }

 actions together LinkDLL bind NEEDLIBS {
-  $(CC) -shared -o $(<) -T $(LINKSCRIPTDLL) $(LINKFLAGS) $(>) -L"$(LIBPATH)" $(NEEDLIBS) $(LINKLIBS)
+  $(CC) -shared -o $(<) -T $(LINKSCRIPTDLL) -Wl,-rpath,"$(LIBPATH:J=:)" $(LINKFLAGS) $(>)
-L"$(LIBPATH)" $(NEEDLIBS) $(LINKLIBS)
 }

 rule LinkEXE {
--

-- 
Gd-chatter mailing list
Gd-chatter <at> gwydiondylan.org
https://www.opendylan.org/mailman/listinfo/gd-chatter

(Continue reading)

andreas | 3 Apr 13:22

r11773 - trunk/libraries/network/koala/sources/koala

Author: andreas
Date: Thu Apr  3 13:25:31 2008
New Revision: 11773

Modified:
   trunk/libraries/network/koala/sources/koala/errors.dylan
   trunk/libraries/network/koala/sources/koala/library-unix.dylan
   trunk/libraries/network/koala/sources/koala/urls.dylan
Log:
job: minor

Temporarily redirect.

Modified: trunk/libraries/network/koala/sources/koala/errors.dylan
==============================================================================
--- trunk/libraries/network/koala/sources/koala/errors.dylan	(original)
+++ trunk/libraries/network/koala/sources/koala/errors.dylan	Thu Apr  3 13:25:31 2008
@@ -136,6 +136,11 @@
     "The requested document has moved permanently to %s",
     location;

+define http-error moved-temporarily-redirect (<http-redirect-error>)
+    302
+    "The document has moved temporarily to %s",
+    loction;
+
 define http-error see-other-redirect (<http-redirect-error>)
     303 "See Other";

Modified: trunk/libraries/network/koala/sources/koala/library-unix.dylan
(Continue reading)


Gmane