[svn:parrot] r38307 - branches/pmc_pct/config/gen/crypto

bacek at svn.parrot.org bacek at svn.parrot.org
Fri Apr 24 14:07:08 UTC 2009


Author: bacek
Date: Fri Apr 24 14:07:08 2009
New Revision: 38307
URL: https://trac.parrot.org/parrot/changeset/38307

Log:
[cage] Fix md.? template.

Modified:
   branches/pmc_pct/config/gen/crypto/digest_pmc.in

Modified: branches/pmc_pct/config/gen/crypto/digest_pmc.in
==============================================================================
--- branches/pmc_pct/config/gen/crypto/digest_pmc.in	Fri Apr 24 14:06:49 2009	(r38306)
+++ branches/pmc_pct/config/gen/crypto/digest_pmc.in	Fri Apr 24 14:07:08 2009	(r38307)
@@ -33,7 +33,7 @@
 =cut
 
 */
-    void init() {
+    VTABLE void init() {
 @TEMP_md_guard@
         @TEMP_md_ctx@ *c    = mem_allocate_zeroed_typed(@TEMP_md_ctx@);
         PMC_data(SELF) = c;
@@ -51,7 +51,7 @@
 =cut
 
 */
-    void destroy() {
+    VTABLE void destroy() {
 @TEMP_md_guard@
         @TEMP_md_ctx@ *c = PMC_data_typed(SELF, @TEMP_md_ctx@ *);
         if (c) {
@@ -68,7 +68,7 @@
 =cut
 
 */
-    PMC* clone() {
+    VTABLE PMC* clone() {
 @TEMP_md_guard@
         PMC     *retval  = pmc_new_noinit(INTERP, SELF->vtable->base_type);
         @TEMP_md_ctx@ *c       = mem_allocate_zeroed_typed(@TEMP_md_ctx@);
@@ -97,7 +97,7 @@
 =cut
 
 */
-    METHOD void Init() {
+    METHOD Init() {
 @TEMP_md_guard@
         @TEMP_md_ctx@ *c = PMC_data_typed(SELF, @TEMP_md_ctx@ *);
         (void)@TEMP_md_name at _Init(c);
@@ -111,7 +111,7 @@
 =cut
 
 */
-    METHOD void Update(STRING *buf) {
+    METHOD Update(STRING *buf) {
 @TEMP_md_guard@
         @TEMP_md_ctx@ *c = PMC_data_typed(SELF, @TEMP_md_ctx@ *);
         (void)@TEMP_md_name at _Update(c, (unsigned char *)buf->strstart, buf->bufused);
@@ -125,7 +125,7 @@
 =cut
 
 */
-    METHOD STRING* Final() {
+    METHOD Final() {
 @TEMP_md_guard@
         unsigned char digest[@TEMP_md_digest at _LENGTH];
         @TEMP_md_ctx@      *c = PMC_data_typed(SELF, @TEMP_md_ctx@ *);


More information about the parrot-commits mailing list