carp-lang/Carp
1
1
Fork 0
mirror of https://github.com/carp-lang/Carp.git synced 2024-09-17 16:38:14 +03:00
Code Issues Projects Releases Wiki Activity

Handle const args.

Browse Source
This commit is contained in:
Erik Svedäng 2018-02-27 14:28:48 +01:00
parent 10b5ec1ef4
commit c4a0f51e09
2 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
examples/parse_me.h
View File

@ -17,3 +17,5 @@ void dah(int *x, float* y);
char *blah(int *x, float* y);
vector2 *more(vector3* in);
GLFWAPI GLFWwindow* glfwCreateWindow(int width, int height, const char* title, GLFWmonitor* monitor, GLFWwindow* share);

2
headerparse/Main.hs
View File

@ -68,6 +68,8 @@ parseHeaderFile path src sedCommand =
arg :: Parsec.Parsec String () (String, Int)
arg = do Parsec.many spaceOrTab
_ <- Parsec.option "" $ do Parsec.string "const"
Parsec.many spaceOrTab
argTypeAsString <- Parsec.many1 identifierChar
stars1 <- stars
Parsec.many1 spaceOrTab