Changeset 2509 for code/branches/buildsystem2/src/tolua/lua/verbatim.lua

Timestamp:

Dec 17, 2008, 8:59:48 PM (16 years ago)

Author:

rgrieder

Message:

Merged revisions 1875-2278 of the buildsystem branch to buildsystem2.

Location:

code/branches/buildsystem2

Files:

• . (modified) (2 props)
• src/tolua/lua/verbatim.lua (modified) (4 diffs)

code/branches/buildsystem2/src/tolua/lua/verbatim.lua

@@ -17 +17 @@
 --   line = line text
 classVerbatim = {
- line = '',
-        cond = nil,    -- condition: where to generate the code (s=suport, r=register)
+    line = '',
+    cond = nil,    -- condition: where to generate the code (s=suport, r=register)
 }
 classVerbatim.__index = classVerbatim
@@ -25 +25 @@
 -- preamble verbatim
 function classVerbatim:preamble ()
- if self.cond == '' then
-  write(self.line)
- end
+    if self.cond == '' then
+        write(self.line)
+    end
 end
 
 -- support code
 function classVerbatim:supcode ()
- if strfind(self.cond,'s') then
-  write(self.line)
-  write('\n')
- end
+    if strfind(self.cond,'s') then
+        write(self.line)
+        write('\n')
+    end
 end
 
 -- register code
 function classVerbatim:register (pre)
- if strfind(self.cond,'r') then
-  write(self.line)
- end
+    if strfind(self.cond,'r') then
+        write(self.line)
+    end
 end
 
@@ -48 +48 @@
 -- Print method
 function classVerbatim:print (ident,close)
- print(ident.."Verbatim{")
- print(ident.." line = '"..self.line.."',")
- print(ident.."}"..close)
-end
+    print(ident.."Verbatim{")
+    print(ident.." line = '"..self.line.."',")
+    print(ident.."}"..close)
+    end
 
 
 -- Internal constructor
 function _Verbatim (t)
- setmetatable(t,classVerbatim)
- append(t)
- return t
+    setmetatable(t,classVerbatim)
+    append(t)
+    return t
 end
 
@@ -64 +64 @@
 -- Expects a string representing the text line
 function Verbatim (l,cond)
- if strsub(l,1,1) == "'" then
-  l = strsub(l,2)
- elseif strsub(l,1,1) == '$' then
-  cond = 'sr'       -- generates in both suport and register fragments
-  l = strsub(l,2)
- end
- return _Verbatim {
-  line = l,
-  cond = cond or '',
- }
+    if strsub(l,1,1) == "'" then
+        l = strsub(l,2)
+    elseif strsub(l,1,1) == '$' then
+        cond = 'sr'       -- generates in both suport and register fragments
+        l = strsub(l,2)
+    end
+    return _Verbatim {
+        line = l,
+        cond = cond or '',
+    }
 end