From 9e4ad6f948cc0d4f90821ac8fc9ab9f0dfd1d5cb Mon Sep 17 00:00:00 2001 From: GeneralGuy4872 Date: Sun, 6 Oct 2019 23:28:45 -0500 Subject: [PATCH] fix typoes and changes --- src/modules/IWannaFly/Macro.pm | 2 -- src/modules/IWannaFly/Main.pm | 6 ++---- src/modules/IWannaFly/Types/Struct/classtyp/classtyp.pm | 2 +- 3 files changed, 3 insertions(+), 7 deletions(-) diff --git a/src/modules/IWannaFly/Macro.pm b/src/modules/IWannaFly/Macro.pm index c4aa38c..c6b5c23 100644 --- a/src/modules/IWannaFly/Macro.pm +++ b/src/modules/IWannaFly/Macro.pm @@ -34,8 +34,6 @@ FILTER_ONLY code => sub { s/§/\$/g }; FILTER_ONLY code => sub { s/♯/\$/g }; -FILTER_ONLY - code => sub { s/¶/\$/g }; FILTER_ONLY code => sub { s/‽(\()?/refaddr$1 /g }; FILTER_ONLY diff --git a/src/modules/IWannaFly/Main.pm b/src/modules/IWannaFly/Main.pm index c0e9590..b61c874 100644 --- a/src/modules/IWannaFly/Main.pm +++ b/src/modules/IWannaFly/Main.pm @@ -32,9 +32,8 @@ with :: for directories and ' for files--> # €foo is a doubly, half-circularly linked list object # §foo is a doubly, circularly linked list object # -# any struct pointer fields are converted to tied hash objects, -# and a Ptr field will be added to these objects to hold the heap -# pointer that values are tied to. the DESTROY routine is +# any struct pointer fields are converted to hash objects. +# a Ptr field and a SYNC method will be added to these objects. # # Similarly, prev, next, or other pointer fields may be NULL # (a Filter::Simple macro in IWannaFly'Null, which wrapps the C NULL), @@ -49,7 +48,6 @@ with :: for directories and ' for files--> # ¤bar is a reference # °bar is a C pointer # ♯bar is a bitfield or boolean -# ¶bar is a string # ‽$bar is the refaddr function # # all these extra sigils except ‰ and ‽ are processed to $ by diff --git a/src/modules/IWannaFly/Types/Struct/classtyp/classtyp.pm b/src/modules/IWannaFly/Types/Struct/classtyp/classtyp.pm index 233ebda..4442454 100644 --- a/src/modules/IWannaFly/Types/Struct/classtyp/classtyp.pm +++ b/src/modules/IWannaFly/Types/Struct/classtyp/classtyp.pm @@ -18,7 +18,7 @@ sub calloc { sub new($) { my $self = shift; £struct = IWannaFly::Types::Struct::classtyp'xs::iwfperl_new_struct_classtyp; - £struct->{sync} = IWannaFly::Types::classtyp'xs::iwfperl_sync_struct_classtype(£struct->{Ptr}); + £struct->{SYNC} = IWannaFly::Types::classtyp'xs::iwfperl_sync_struct_classtype(£struct->{Ptr}); lock_keys(%£struct); bless £struct, $self; }