The Meta-Environment API

asf-initialize.tb

Go to the documentation of this file.
00001 #ifndef __ASF_INITIALIZE__
00002 #define __ASF_INITIALIZE__
00003 
00004 process AddAsfProperties is
00005 let
00006   Contents: str,
00007   Error: term
00008 in
00009   snd-msg(io-read-file("/export/scratch1/daybuild/sisyphus-builds/install/12345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890/asfsdf-meta/26491/64800/share/asfsdf-meta//standard.asfsdf.actions")) .
00010   (
00011     rec-msg(io-file-contents(Contents?))
00012     . snd-msg(cm-add-system-properties(Contents))
00013   +
00014     rec-msg(io-error-reading(Error?))
00015     . printf("AddAsfProperties: %t\n", Error)
00016   )
00017 endlet
00018 
00019 toolbus(AddAsfProperties)
00020 
00021 #endif /* __ASF_INITIALIZE__ */

Generated on Fri Sep 12 13:16:07 2008 for asfsdf-meta by  doxygen 1.4.6