Mercurial > hg > amuse

diff base/database/implementations-setup.lisp @ 218:385935631532

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add function assigning a list of composition identifiers to a dataset. Ignore-this: aa2078c1427801491a54d23ffca7da70 darcs-hash:20090716170022-16a00-d95599a9631d18530c0d0d51ef095133f9bbde5a.gz committer: Jamie Forth <j.forth@gold.ac.uk>
author j.forth <j.forth@gold.ac.uk>
date Thu, 24 Feb 2011 11:23:18 +0000
parents e1842efb1dd4
children 6a3adca16910
line wrap: on
line diff
--- a/base/database/implementations-setup.lisp	Thu Feb 24 11:23:18 2011 +0000
+++ b/base/database/implementations-setup.lisp	Thu Feb 24 11:23:18 2011 +0000
@@ -42,6 +42,7 @@
 CREATE FUNCTION get_impl_id (
 impl_name VARCHAR(255))
 RETURNS SMALLINT
+READS SQL DATA
 RETURN (SELECT implementation_id
 FROM amuse_implementations
 WHERE implementation_name = impl_name);"
@@ -57,6 +58,7 @@
 CREATE FUNCTION get_impl_name (
 impl_id SMALLINT)
 RETURNS VARCHAR(255)
+READS SQL DATA
 RETURN (SELECT implementation_name
 FROM amuse_implementations
 WHERE implementation_id = impl_id);"